72:
73: -- Initialize message list if p_init_msg_list is set to TRUE.
74: IF FND_API.to_Boolean( p_init_msg_list )
75: THEN
76: FND_MSG_PUB.initialize;
77: END IF;
78:
79: -- Initialize API return status to SUCCESS
80: x_return_status := FND_API.G_RET_STS_SUCCESS;
166: END IF;
167:
168:
169: -- Standard callto get message count and if count is 1, get message info.
170: FND_MSG_PUB.Count_And_Get
171: ( p_count => x_msg_count,
172: p_data => x_msg_data
173: );
174:
176:
177: WHEN FND_API.G_EXC_ERROR THEN
178: ROLLBACK TO create_item_tag_PVT;
179: x_return_status := FND_API.G_RET_STS_ERROR ;
180: FND_MSG_PUB.Count_And_Get
181:
182: ( p_count => x_msg_count,
183: p_data => x_msg_data
184: );
185:
186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
187: ROLLBACK TO create_item_tag_PVT;
188: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
189: FND_MSG_PUB.Count_And_Get
190: ( p_count => x_msg_count,
191: p_data => x_msg_data
192: );
193:
193:
194: WHEN OTHERS THEN
195: ROLLBACK TO create_item_tag_PVT;
196: x_return_status := FND_API.G_RET_STS_ERROR;
197: IF FND_MSG_PUB.Check_Msg_Level
198: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
199: THEN
200: FND_MSG_PUB.Add_Exc_Msg
201: ( G_PKG_NAME ,
194: WHEN OTHERS THEN
195: ROLLBACK TO create_item_tag_PVT;
196: x_return_status := FND_API.G_RET_STS_ERROR;
197: IF FND_MSG_PUB.Check_Msg_Level
198: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
199: THEN
200: FND_MSG_PUB.Add_Exc_Msg
201: ( G_PKG_NAME ,
202: l_api_name
196: x_return_status := FND_API.G_RET_STS_ERROR;
197: IF FND_MSG_PUB.Check_Msg_Level
198: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
199: THEN
200: FND_MSG_PUB.Add_Exc_Msg
201: ( G_PKG_NAME ,
202: l_api_name
203: );
204: END IF;
202: l_api_name
203: );
204: END IF;
205:
206: FND_MSG_PUB.Count_And_Get
207: ( p_count => x_msg_count,
208: p_data => x_msg_data
209:
210: );
255:
256: -- Initialize message list if p_init_msg_list is set to TRUE.
257: IF FND_API.to_Boolean( p_init_msg_list )
258: THEN
259: FND_MSG_PUB.initialize;
260: END IF;
261:
262: -- Initialize API return status to SUCCESS
263: x_return_status := FND_API.G_RET_STS_SUCCESS;
296: COMMIT WORK;
297: END IF;
298:
299: -- Standard callto get message count and if count is 1, get message info.
300: FND_MSG_PUB.Count_And_Get
301: ( p_count => x_msg_count,
302: p_data => x_msg_data
303: );
304: EXCEPTION
304: EXCEPTION
305: WHEN FND_API.G_EXC_ERROR THEN
306: ROLLBACK TO get_queue_rec_PVT;
307: x_return_status := FND_API.G_RET_STS_ERROR ;
308: FND_MSG_PUB.Count_And_Get
309:
310: ( p_count => x_msg_count,
311: p_data => x_msg_data
312: );
313:
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
315: ROLLBACK TO get_queue_rec_PVT;
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
317: FND_MSG_PUB.Count_And_Get
318: ( p_count => x_msg_count,
319: p_data => x_msg_data
320: );
321:
321:
322: WHEN OTHERS THEN
323: ROLLBACK TO get_queue_rec_PVT;
324: x_return_status := FND_API.G_RET_STS_ERROR;
325: IF FND_MSG_PUB.Check_Msg_Level
326: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
327: THEN
328: FND_MSG_PUB.Add_Exc_Msg
329: ( G_PKG_NAME ,
322: WHEN OTHERS THEN
323: ROLLBACK TO get_queue_rec_PVT;
324: x_return_status := FND_API.G_RET_STS_ERROR;
325: IF FND_MSG_PUB.Check_Msg_Level
326: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
327: THEN
328: FND_MSG_PUB.Add_Exc_Msg
329: ( G_PKG_NAME ,
330: l_api_name
324: x_return_status := FND_API.G_RET_STS_ERROR;
325: IF FND_MSG_PUB.Check_Msg_Level
326: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
327: THEN
328: FND_MSG_PUB.Add_Exc_Msg
329: ( G_PKG_NAME ,
330: l_api_name
331: );
332: END IF;
330: l_api_name
331: );
332: END IF;
333:
334: FND_MSG_PUB.Count_And_Get
335: ( p_count => x_msg_count,
336: p_data => x_msg_data
337:
338: );
372:
373: -- Initialize message list if p_init_msg_list is set to TRUE.
374: IF FND_API.to_Boolean( p_init_msg_list )
375: THEN
376: FND_MSG_PUB.initialize;
377: END IF;
378:
379: -- Initialize API return status to SUCCESS
380: x_return_status := FND_API.G_RET_STS_SUCCESS;
394: END IF;
395:
396:
397: -- Standard callto get message count and if count is 1, get message info.
398: FND_MSG_PUB.Count_And_Get
399: ( p_count => x_msg_count,
400: p_data => x_msg_data
401: );
402:
404:
405: WHEN FND_API.G_EXC_ERROR THEN
406: ROLLBACK TO create_item_tag_PVT;
407: x_return_status := FND_API.G_RET_STS_ERROR ;
408: FND_MSG_PUB.Count_And_Get
409:
410: ( p_count => x_msg_count,
411: p_data => x_msg_data
412: );
413:
414: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
415: ROLLBACK TO create_item_tag_PVT;
416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
417: FND_MSG_PUB.Count_And_Get
418: ( p_count => x_msg_count,
419: p_data => x_msg_data
420: );
421:
421:
422: WHEN OTHERS THEN
423: ROLLBACK TO create_item_tag_PVT;
424: x_return_status := FND_API.G_RET_STS_ERROR;
425: IF FND_MSG_PUB.Check_Msg_Level
426: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
427: THEN
428: FND_MSG_PUB.Add_Exc_Msg
429: ( G_PKG_NAME ,
422: WHEN OTHERS THEN
423: ROLLBACK TO create_item_tag_PVT;
424: x_return_status := FND_API.G_RET_STS_ERROR;
425: IF FND_MSG_PUB.Check_Msg_Level
426: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
427: THEN
428: FND_MSG_PUB.Add_Exc_Msg
429: ( G_PKG_NAME ,
430: l_api_name
424: x_return_status := FND_API.G_RET_STS_ERROR;
425: IF FND_MSG_PUB.Check_Msg_Level
426: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
427: THEN
428: FND_MSG_PUB.Add_Exc_Msg
429: ( G_PKG_NAME ,
430: l_api_name
431: );
432: END IF;
430: l_api_name
431: );
432: END IF;
433:
434: FND_MSG_PUB.Count_And_Get
435: ( p_count => x_msg_count,
436: p_data => x_msg_data
437:
438: );
494:
495: -- Initialize message list if p_init_msg_list is set to TRUE.
496: IF FND_API.to_Boolean( p_init_msg_list )
497: THEN
498: FND_MSG_PUB.initialize;
499: END IF;
500:
501: -- Initialize API return status to SUCCESS
502: x_return_status := FND_API.G_RET_STS_SUCCESS;
569: COMMIT WORK;
570: END IF;
571:
572: -- Standard callto get message count and if count is 1, get message info.
573: FND_MSG_PUB.Count_And_Get
574: ( p_count => x_msg_count,
575: p_data => x_msg_data
576: );
577: EXCEPTION
577: EXCEPTION
578: WHEN FND_API.G_EXC_ERROR THEN
579: ROLLBACK TO get_queue_rec_PVT;
580: x_return_status := FND_API.G_RET_STS_ERROR ;
581: FND_MSG_PUB.Count_And_Get
582:
583: ( p_count => x_msg_count,
584: p_data => x_msg_data
585: );
586:
587: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
588: ROLLBACK TO get_queue_rec_PVT;
589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
590: FND_MSG_PUB.Count_And_Get
591: ( p_count => x_msg_count,
592: p_data => x_msg_data
593: );
594:
594:
595: WHEN OTHERS THEN
596: ROLLBACK TO get_queue_rec_PVT;
597: x_return_status := FND_API.G_RET_STS_ERROR;
598: IF FND_MSG_PUB.Check_Msg_Level
599: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
600: THEN
601: FND_MSG_PUB.Add_Exc_Msg
602: ( G_PKG_NAME ,
595: WHEN OTHERS THEN
596: ROLLBACK TO get_queue_rec_PVT;
597: x_return_status := FND_API.G_RET_STS_ERROR;
598: IF FND_MSG_PUB.Check_Msg_Level
599: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
600: THEN
601: FND_MSG_PUB.Add_Exc_Msg
602: ( G_PKG_NAME ,
603: l_api_name
597: x_return_status := FND_API.G_RET_STS_ERROR;
598: IF FND_MSG_PUB.Check_Msg_Level
599: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
600: THEN
601: FND_MSG_PUB.Add_Exc_Msg
602: ( G_PKG_NAME ,
603: l_api_name
604: );
605: END IF;
603: l_api_name
604: );
605: END IF;
606:
607: FND_MSG_PUB.Count_And_Get
608: ( p_count => x_msg_count,
609: p_data => x_msg_data
610:
611: );
648:
649: -- Initialize message list if p_init_msg_list is set to TRUE.
650: IF FND_API.to_Boolean( p_init_msg_list )
651: THEN
652: FND_MSG_PUB.initialize;
653: END IF;
654:
655: -- Initialize API return status to SUCCESS
656: x_return_status := FND_API.G_RET_STS_SUCCESS;
669:
670: end loop;
671:
672: -- Standard callto get message count and if count is 1, get message info.
673: FND_MSG_PUB.Count_And_Get
674: ( p_count => x_msg_count,
675: p_data => x_msg_data
676: );
677:
679:
680: WHEN FND_API.G_EXC_ERROR THEN
681: ROLLBACK TO create_item_tag_PVT;
682: x_return_status := FND_API.G_RET_STS_ERROR ;
683: FND_MSG_PUB.Count_And_Get
684:
685: ( p_count => x_msg_count,
686: p_data => x_msg_data
687: );
688:
689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
690: ROLLBACK TO create_item_tag_PVT;
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
692: FND_MSG_PUB.Count_And_Get
693: ( p_count => x_msg_count,
694: p_data => x_msg_data
695: );
696:
696:
697: WHEN OTHERS THEN
698: ROLLBACK TO create_item_tag_PVT;
699: x_return_status := FND_API.G_RET_STS_ERROR;
700: IF FND_MSG_PUB.Check_Msg_Level
701: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
702: THEN
703: FND_MSG_PUB.Add_Exc_Msg
704: ( G_PKG_NAME ,
697: WHEN OTHERS THEN
698: ROLLBACK TO create_item_tag_PVT;
699: x_return_status := FND_API.G_RET_STS_ERROR;
700: IF FND_MSG_PUB.Check_Msg_Level
701: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
702: THEN
703: FND_MSG_PUB.Add_Exc_Msg
704: ( G_PKG_NAME ,
705: l_api_name
699: x_return_status := FND_API.G_RET_STS_ERROR;
700: IF FND_MSG_PUB.Check_Msg_Level
701: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
702: THEN
703: FND_MSG_PUB.Add_Exc_Msg
704: ( G_PKG_NAME ,
705: l_api_name
706: );
707: END IF;
705: l_api_name
706: );
707: END IF;
708:
709: FND_MSG_PUB.Count_And_Get
710: ( p_count => x_msg_count,
711: p_data => x_msg_data
712:
713: );
748:
749: -- Initialize message list if p_init_msg_list is set to TRUE.
750: IF FND_API.to_Boolean( p_init_msg_list )
751: THEN
752: FND_MSG_PUB.initialize;
753: END IF;
754:
755: -- Initialize API return status to SUCCESS
756: x_return_status := FND_API.G_RET_STS_SUCCESS;
758: --begins here
759: update iem_rt_pp_queues set flag='N' where flag='A' and retry_count<=4;
760:
761: -- Standard callto get message count and if count is 1, get message info.
762: FND_MSG_PUB.Count_And_Get
763: ( p_count => x_msg_count,
764: p_data => x_msg_data
765: );
766:
768:
769: WHEN FND_API.G_EXC_ERROR THEN
770: ROLLBACK TO create_item_tag_PVT;
771: x_return_status := FND_API.G_RET_STS_ERROR ;
772: FND_MSG_PUB.Count_And_Get
773:
774: ( p_count => x_msg_count,
775: p_data => x_msg_data
776: );
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: ROLLBACK TO create_item_tag_PVT;
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
781: FND_MSG_PUB.Count_And_Get
782: ( p_count => x_msg_count,
783: p_data => x_msg_data
784: );
785:
785:
786: WHEN OTHERS THEN
787: ROLLBACK TO create_item_tag_PVT;
788: x_return_status := FND_API.G_RET_STS_ERROR;
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: FND_MSG_PUB.Add_Exc_Msg
793: ( G_PKG_NAME ,
786: WHEN OTHERS THEN
787: ROLLBACK TO create_item_tag_PVT;
788: x_return_status := FND_API.G_RET_STS_ERROR;
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: FND_MSG_PUB.Add_Exc_Msg
793: ( G_PKG_NAME ,
794: l_api_name
788: x_return_status := FND_API.G_RET_STS_ERROR;
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: FND_MSG_PUB.Add_Exc_Msg
793: ( G_PKG_NAME ,
794: l_api_name
795: );
796: END IF;
794: l_api_name
795: );
796: END IF;
797:
798: FND_MSG_PUB.Count_And_Get
799: ( p_count => x_msg_count,
800: p_data => x_msg_data
801:
802: );