244: x_bin_name => l_bin_name);
245: /* dbms_output.put_line ('bin_name=' || l_bin_name); */
246:
247: IF NOT (x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
248: FND_MESSAGE.SET_NAME('IBU','IBU_HOM_BINNAME_ERROR');
249: FND_MSG_PUB.Add;
250: RAISE FND_API.G_EXC_ERROR;
251: END IF;
252:
258: p_bin_id => p_bin_id,
259: x_bin_info => l_bin_info);
260:
261: IF NOT (x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
262: FND_MESSAGE.SET_NAME('IBU','IBU_HOM_BININFO_ERROR');
263: FND_MSG_PUB.Add;
264: RAISE FND_API.G_EXC_ERROR;
265: END IF;
266:
268: IF (category_id is NULL)
269: THEN
270: /* dbms_output.put_line('No Categories found='); */
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: FND_MESSAGE.SET_NAME('IBU', 'IBU_HOM_NO_CAT_FOR_CNEWS');
273: FND_MSG_PUB.Add;
274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276:
315:
316: if (x_return_status = 'F')
317: THEN
318: /* dbms_output.put_line('No Items Found='); */
319: fnd_message.set_name('IBU', 'IBU_HOM_ITEMS_ERROR');
320: fnd_msg_pub.Add;
321: RAISE FND_API.G_EXC_ERROR;
322: END IF;
323:
353: if (x_return_status = 'F')
354: THEN
355: x_return_status := FND_API.G_RET_STS_SUCCESS;
356: dbms_lob.writeappend(res_clob,length(newln), newln);
357: tmp_str := FND_MESSAGE.GET_STRING('IBU', 'IBU_HOM_ITEMS_ERROR');
358: dbms_lob.writeappend(res_clob,length(tmp_str), tmp_str);
359: dbms_lob.writeappend(res_clob,length(newln), newln);
360: exit;
361: END IF;
391: if (x_return_status = 'F')
392: THEN
393: x_return_status := FND_API.G_RET_STS_SUCCESS;
394: dbms_lob.writeappend(res_clob,length(newln), newln);
395: tmp_str := FND_MESSAGE.GET_STRING('IBU', 'IBU_HOM_ITEMS_ERROR');
396: dbms_lob.writeappend(res_clob,length(tmp_str), tmp_str);
397: dbms_lob.writeappend(res_clob,length(newln), newln);
398: exit;
399: END IF;
417:
418: THEN
419: x_return_status := FND_API.G_RET_STS_SUCCESS;
420: dbms_lob.writeappend(res_clob,length(newln), newln);
421: tmp_str := FND_MESSAGE.GET_STRING('IBU', 'IBU_HOM_ITEMS_ERROR');
422: dbms_lob.writeappend(res_clob,length(tmp_str), tmp_str);
423: dbms_lob.writeappend(res_clob,length(newln), newln);
424: exit;
425: END IF;
537:
538: -- do validation
539: IF p_bin_id is NULL THEN
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: FND_MESSAGE.SET_NAME('IBU','IBU_HOM_BIN_ID_MISSING');
542: FND_MSG_PUB.Add;
543: RAISE FND_API.G_EXC_ERROR;
544: END IF;
545:
553: x_msg_data => x_msg_data,
554: x_bin_name => l_bin_name);
555:
556: IF NOT (x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
557: FND_MESSAGE.SET_NAME('IBU','IBU_HOM_BINNAME_ERROR');
558: FND_MSG_PUB.Add;
559: RAISE FND_API.G_EXC_ERROR;
560: END IF;
561:
567: p_bin_id => p_bin_id,
568: x_bin_info => l_bin_info);
569:
570: IF NOT (x_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
571: FND_MESSAGE.SET_NAME('IBU','IBU_HOM_BININFO_ERROR');
572: FND_MSG_PUB.Add;
573: RAISE FND_API.G_EXC_ERROR;
574: END IF;
575:
577: IF (category_id is NULL)
578: THEN
579: /* dbms_output.put_line('No Categories found=');*/
580: x_return_status := FND_API.G_RET_STS_ERROR;
581: FND_MESSAGE.SET_NAME('IBU', 'IBU_HOM_NO_CAT_FOR_CNEWS');
582: FND_MSG_PUB.Add;
583: RAISE FND_API.G_EXC_ERROR;
584: END IF;
585:
650:
651: if (x_return_status = 'F')
652: THEN
653: /* dbms_output.put_line('No Items Found='); */
654: fnd_message.set_name('IBU', 'IBU_HOM_ITEMS_ERROR');
655: fnd_msg_pub.Add;
656: RAISE FND_API.G_EXC_ERROR;
657: END IF;
658:
686: x_return_status := FND_API.G_RET_STS_SUCCESS;
687: dbms_lob.writeappend(res_clob,6, '
752: /* dbms_output.put_line('No Items for this chanel='); */
753: x_return_status := FND_API.G_RET_STS_SUCCESS;
754: dbms_lob.writeappend(res_clob,6, '
785: /* dbms_output.put_line('No Items for this chanel=');*/
786: x_return_status := FND_API.G_RET_STS_SUCCESS;
787: dbms_lob.writeappend(res_clob,6, '
853: x_return_status := FND_API.G_RET_STS_SUCCESS;
854: dbms_lob.writeappend(res_clob,6, '
918: /* dbms_output.put_line('No Items for this chanel='); */
919: x_return_status := FND_API.G_RET_STS_SUCCESS;
920: dbms_lob.writeappend(res_clob,6, '
951: /* dbms_output.put_line('No Items for this chanel=');*/
952: x_return_status := FND_API.G_RET_STS_SUCCESS;
953: dbms_lob.writeappend(res_clob,6, '
999:
1000: -- ujagarla - If no content exist, show message to the user.
1001: IF ( no_items_exist = FND_API.G_TRUE )THEN
1002: tmp_str := '