170: IF p_commit='T' THEN
171: COMMIT WORK;
172: END IF;
173: -- Standard callto get message count and if count is 1, get message info.
174: FND_MSG_PUB.Count_And_Get
175: ( p_count => x_msg_count,
176: p_data => x_msg_data
177: );
178: EXCEPTION
180: WHEN NOT_A_VALID_AGENT THEN
181: ROLLBACK TO select_mail_count_PVT;
182: x_return_status := FND_API.G_RET_STS_ERROR ;
183: FND_MESSAGE.SET_NAME('IEM', 'IEM_UNRECOGNIZED_AGENT');
184: FND_MSG_PUB.ADD;
185: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
186: WHEN IEM_NO_DATA THEN
187: ROLLBACK TO select_mail_count_PVT;
188: x_return_status := FND_API.G_RET_STS_ERROR ;
181: ROLLBACK TO select_mail_count_PVT;
182: x_return_status := FND_API.G_RET_STS_ERROR ;
183: FND_MESSAGE.SET_NAME('IEM', 'IEM_UNRECOGNIZED_AGENT');
184: FND_MSG_PUB.ADD;
185: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
186: WHEN IEM_NO_DATA THEN
187: ROLLBACK TO select_mail_count_PVT;
188: x_return_status := FND_API.G_RET_STS_ERROR ;
189: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
186: WHEN IEM_NO_DATA THEN
187: ROLLBACK TO select_mail_count_PVT;
188: x_return_status := FND_API.G_RET_STS_ERROR ;
189: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
190: FND_MSG_PUB.ADD;
191: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
192: WHEN FND_API.G_EXC_ERROR THEN
193: ROLLBACK TO select_mail_count_PVT;
194: x_return_status := FND_API.G_RET_STS_ERROR ;
187: ROLLBACK TO select_mail_count_PVT;
188: x_return_status := FND_API.G_RET_STS_ERROR ;
189: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
190: FND_MSG_PUB.ADD;
191: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
192: WHEN FND_API.G_EXC_ERROR THEN
193: ROLLBACK TO select_mail_count_PVT;
194: x_return_status := FND_API.G_RET_STS_ERROR ;
195: FND_MSG_PUB.Count_And_Get
191: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
192: WHEN FND_API.G_EXC_ERROR THEN
193: ROLLBACK TO select_mail_count_PVT;
194: x_return_status := FND_API.G_RET_STS_ERROR ;
195: FND_MSG_PUB.Count_And_Get
196: ( p_count => x_msg_count,
197: p_data => x_msg_data
198: );
199: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
198: );
199: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
200: ROLLBACK TO select_mail_count_PVT;
201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
202: FND_MSG_PUB.Count_And_Get
203: ( p_count => x_msg_count,
204: p_data => x_msg_data
205: );
206: WHEN OTHERS THEN
205: );
206: WHEN OTHERS THEN
207: ROLLBACK TO select_mail_count_PVT;
208: x_return_status := FND_API.G_RET_STS_ERROR;
209: IF FND_MSG_PUB.Check_Msg_Level
210: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
211: THEN
212: FND_MSG_PUB.Add_Exc_Msg
213: ( G_PKG_NAME ,
206: WHEN OTHERS THEN
207: ROLLBACK TO select_mail_count_PVT;
208: x_return_status := FND_API.G_RET_STS_ERROR;
209: IF FND_MSG_PUB.Check_Msg_Level
210: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
211: THEN
212: FND_MSG_PUB.Add_Exc_Msg
213: ( G_PKG_NAME ,
214: l_api_name
208: x_return_status := FND_API.G_RET_STS_ERROR;
209: IF FND_MSG_PUB.Check_Msg_Level
210: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
211: THEN
212: FND_MSG_PUB.Add_Exc_Msg
213: ( G_PKG_NAME ,
214: l_api_name
215: );
216: END IF;
213: ( G_PKG_NAME ,
214: l_api_name
215: );
216: END IF;
217: FND_MSG_PUB.Count_And_Get
218: ( p_count => x_msg_count ,
219: p_data => x_msg_data
220: );
221:
310: IF p_commit='T' THEN
311: COMMIT WORK;
312: END IF;
313: -- Standard callto get message count and if count is 1, get message info.
314: FND_MSG_PUB.Count_And_Get
315: ( p_count => x_msg_count,
316: p_data => x_msg_data
317: );
318: EXCEPTION
319: WHEN IEM_NO_DATA THEN
320: ROLLBACK TO select_item_PVT;
321: x_return_status := FND_API.G_RET_STS_ERROR ;
322: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
323: FND_MSG_PUB.ADD;
324: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
325: WHEN FND_API.G_EXC_ERROR THEN
326: ROLLBACK TO select_item_PVT;
327: x_return_status := FND_API.G_RET_STS_ERROR ;
320: ROLLBACK TO select_item_PVT;
321: x_return_status := FND_API.G_RET_STS_ERROR ;
322: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
323: FND_MSG_PUB.ADD;
324: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
325: WHEN FND_API.G_EXC_ERROR THEN
326: ROLLBACK TO select_item_PVT;
327: x_return_status := FND_API.G_RET_STS_ERROR ;
328: FND_MSG_PUB.Count_And_Get
324: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
325: WHEN FND_API.G_EXC_ERROR THEN
326: ROLLBACK TO select_item_PVT;
327: x_return_status := FND_API.G_RET_STS_ERROR ;
328: FND_MSG_PUB.Count_And_Get
329: ( p_count => x_msg_count,
330: p_data => x_msg_data
331: );
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
331: );
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: ROLLBACK TO select_item_PVT;
334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
335: FND_MSG_PUB.Count_And_Get
336: ( p_count => x_msg_count,
337: p_data => x_msg_data
338: );
339: WHEN OTHERS THEN
338: );
339: WHEN OTHERS THEN
340: ROLLBACK TO select_item_PVT;
341: x_return_status := FND_API.G_RET_STS_ERROR;
342: IF FND_MSG_PUB.Check_Msg_Level
343: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
344: THEN
345: FND_MSG_PUB.Add_Exc_Msg
346: ( G_PKG_NAME ,
339: WHEN OTHERS THEN
340: ROLLBACK TO select_item_PVT;
341: x_return_status := FND_API.G_RET_STS_ERROR;
342: IF FND_MSG_PUB.Check_Msg_Level
343: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
344: THEN
345: FND_MSG_PUB.Add_Exc_Msg
346: ( G_PKG_NAME ,
347: l_api_name
341: x_return_status := FND_API.G_RET_STS_ERROR;
342: IF FND_MSG_PUB.Check_Msg_Level
343: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
344: THEN
345: FND_MSG_PUB.Add_Exc_Msg
346: ( G_PKG_NAME ,
347: l_api_name
348: );
349: END IF;
346: ( G_PKG_NAME ,
347: l_api_name
348: );
349: END IF;
350: FND_MSG_PUB.Count_And_Get
351: ( p_count => x_msg_count ,
352: p_data => x_msg_data
353: );
354:
404: IF p_commit='T' THEN
405: COMMIT WORK;
406: END IF;
407: -- Standard callto get message count and if count is 1, get message info.
408: FND_MSG_PUB.Count_And_Get
409: ( p_count => x_msg_count,
410: p_data => x_msg_data
411: );
412: EXCEPTION
413: WHEN IEM_NO_DATA THEN
414: ROLLBACK TO select_item_PVT;
415: x_return_status := FND_API.G_RET_STS_ERROR ;
416: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
417: FND_MSG_PUB.ADD;
418: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
419: WHEN FND_API.G_EXC_ERROR THEN
420: ROLLBACK TO select_item_PVT;
421: x_return_status := FND_API.G_RET_STS_ERROR ;
414: ROLLBACK TO select_item_PVT;
415: x_return_status := FND_API.G_RET_STS_ERROR ;
416: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
417: FND_MSG_PUB.ADD;
418: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
419: WHEN FND_API.G_EXC_ERROR THEN
420: ROLLBACK TO select_item_PVT;
421: x_return_status := FND_API.G_RET_STS_ERROR ;
422: FND_MSG_PUB.Count_And_Get
418: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
419: WHEN FND_API.G_EXC_ERROR THEN
420: ROLLBACK TO select_item_PVT;
421: x_return_status := FND_API.G_RET_STS_ERROR ;
422: FND_MSG_PUB.Count_And_Get
423: ( p_count => x_msg_count,
424: p_data => x_msg_data
425: );
426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
425: );
426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
427: ROLLBACK TO select_item_PVT;
428: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
429: FND_MSG_PUB.Count_And_Get
430: ( p_count => x_msg_count,
431: p_data => x_msg_data
432: );
433: WHEN OTHERS THEN
432: );
433: WHEN OTHERS THEN
434: ROLLBACK TO select_item_PVT;
435: x_return_status := FND_API.G_RET_STS_ERROR;
436: IF FND_MSG_PUB.Check_Msg_Level
437: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
438: THEN
439: FND_MSG_PUB.Add_Exc_Msg
440: ( G_PKG_NAME ,
433: WHEN OTHERS THEN
434: ROLLBACK TO select_item_PVT;
435: x_return_status := FND_API.G_RET_STS_ERROR;
436: IF FND_MSG_PUB.Check_Msg_Level
437: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
438: THEN
439: FND_MSG_PUB.Add_Exc_Msg
440: ( G_PKG_NAME ,
441: l_api_name
435: x_return_status := FND_API.G_RET_STS_ERROR;
436: IF FND_MSG_PUB.Check_Msg_Level
437: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
438: THEN
439: FND_MSG_PUB.Add_Exc_Msg
440: ( G_PKG_NAME ,
441: l_api_name
442: );
443: END IF;
440: ( G_PKG_NAME ,
441: l_api_name
442: );
443: END IF;
444: FND_MSG_PUB.Count_And_Get
445: ( p_count => x_msg_count ,
446: p_data => x_msg_data
447: );
448:
522: IF p_commit='T' THEN
523: COMMIT WORK;
524: END IF;
525: -- Standard callto get message count and if count is 1, get message info.
526: FND_MSG_PUB.Count_And_Get
527: ( p_count => x_msg_count,
528: p_data => x_msg_data
529: );
530: EXCEPTION
531: WHEN IEM_NO_DATA THEN
532: ROLLBACK TO select_item_PVT;
533: x_return_status := FND_API.G_RET_STS_ERROR ;
534: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
535: FND_MSG_PUB.ADD;
536: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
537: WHEN FND_API.G_EXC_ERROR THEN
538: ROLLBACK TO select_item_PVT;
539: x_return_status := FND_API.G_RET_STS_ERROR ;
532: ROLLBACK TO select_item_PVT;
533: x_return_status := FND_API.G_RET_STS_ERROR ;
534: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
535: FND_MSG_PUB.ADD;
536: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
537: WHEN FND_API.G_EXC_ERROR THEN
538: ROLLBACK TO select_item_PVT;
539: x_return_status := FND_API.G_RET_STS_ERROR ;
540: FND_MSG_PUB.Count_And_Get
536: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
537: WHEN FND_API.G_EXC_ERROR THEN
538: ROLLBACK TO select_item_PVT;
539: x_return_status := FND_API.G_RET_STS_ERROR ;
540: FND_MSG_PUB.Count_And_Get
541: ( p_count => x_msg_count,
542: p_data => x_msg_data
543: );
544: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
543: );
544: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
545: ROLLBACK TO select_item_PVT;
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
547: FND_MSG_PUB.Count_And_Get
548: ( p_count => x_msg_count,
549: p_data => x_msg_data
550: );
551: WHEN OTHERS THEN
550: );
551: WHEN OTHERS THEN
552: ROLLBACK TO select_item_PVT;
553: x_return_status := FND_API.G_RET_STS_ERROR;
554: IF FND_MSG_PUB.Check_Msg_Level
555: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
556: THEN
557: FND_MSG_PUB.Add_Exc_Msg
558: ( G_PKG_NAME ,
551: WHEN OTHERS THEN
552: ROLLBACK TO select_item_PVT;
553: x_return_status := FND_API.G_RET_STS_ERROR;
554: IF FND_MSG_PUB.Check_Msg_Level
555: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
556: THEN
557: FND_MSG_PUB.Add_Exc_Msg
558: ( G_PKG_NAME ,
559: l_api_name
553: x_return_status := FND_API.G_RET_STS_ERROR;
554: IF FND_MSG_PUB.Check_Msg_Level
555: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
556: THEN
557: FND_MSG_PUB.Add_Exc_Msg
558: ( G_PKG_NAME ,
559: l_api_name
560: );
561: END IF;
558: ( G_PKG_NAME ,
559: l_api_name
560: );
561: END IF;
562: FND_MSG_PUB.Count_And_Get
563: ( p_count => x_msg_count ,
564: p_data => x_msg_data
565: );
566:
715: IF p_commit='T' THEN
716: COMMIT WORK;
717: END IF;
718: -- Standard callto get message count and if count is 1, get message info.
719: FND_MSG_PUB.Count_And_Get
720: ( p_count => x_msg_count,
721: p_data => x_msg_data
722: );
723: EXCEPTION
724: WHEN IEM_NO_DATA THEN
725: ROLLBACK TO select_data_PVT;
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
728: FND_MSG_PUB.ADD;
729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
730: WHEN FND_API.G_EXC_ERROR THEN
731: ROLLBACK TO select_data_PVT;
732: x_return_status := FND_API.G_RET_STS_ERROR ;
725: ROLLBACK TO select_data_PVT;
726: x_return_status := FND_API.G_RET_STS_ERROR ;
727: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
728: FND_MSG_PUB.ADD;
729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
730: WHEN FND_API.G_EXC_ERROR THEN
731: ROLLBACK TO select_data_PVT;
732: x_return_status := FND_API.G_RET_STS_ERROR ;
733: FND_MSG_PUB.Count_And_Get
729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
730: WHEN FND_API.G_EXC_ERROR THEN
731: ROLLBACK TO select_data_PVT;
732: x_return_status := FND_API.G_RET_STS_ERROR ;
733: FND_MSG_PUB.Count_And_Get
734: ( p_count => x_msg_count,
735: p_data => x_msg_data
736: );
737: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
736: );
737: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
738: ROLLBACK TO select_data_PVT;
739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
740: FND_MSG_PUB.Count_And_Get
741: ( p_count => x_msg_count,
742: p_data => x_msg_data
743: );
744: WHEN NO_DATA_FOUND THEN
745: null;
746: WHEN OTHERS THEN
747: ROLLBACK TO select_data_PVT;
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: IF FND_MSG_PUB.Check_Msg_Level
750: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
751: THEN
752: FND_MSG_PUB.Add_Exc_Msg
753: ( G_PKG_NAME ,
746: WHEN OTHERS THEN
747: ROLLBACK TO select_data_PVT;
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: IF FND_MSG_PUB.Check_Msg_Level
750: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
751: THEN
752: FND_MSG_PUB.Add_Exc_Msg
753: ( G_PKG_NAME ,
754: l_api_name
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: IF FND_MSG_PUB.Check_Msg_Level
750: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
751: THEN
752: FND_MSG_PUB.Add_Exc_Msg
753: ( G_PKG_NAME ,
754: l_api_name
755: );
756: END IF;
753: ( G_PKG_NAME ,
754: l_api_name
755: );
756: END IF;
757: FND_MSG_PUB.Count_And_Get
758: ( p_count => x_msg_count ,
759: p_data => x_msg_data
760: );
761:
831: IF p_commit='T' THEN
832: COMMIT WORK;
833: END IF;
834: -- Standard callto get message count and if count is 1, get message info.
835: FND_MSG_PUB.Count_And_Get
836: ( p_count => x_msg_count,
837: p_data => x_msg_data
838: );
839: EXCEPTION
839: EXCEPTION
840: WHEN FND_API.G_EXC_ERROR THEN
841: ROLLBACK TO dispose_mail_item_PVT;
842: x_return_status := FND_API.G_RET_STS_ERROR ;
843: FND_MSG_PUB.Count_And_Get
844: ( p_count => x_msg_count,
845: p_data => x_msg_data
846: );
847: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
846: );
847: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
848: ROLLBACK TO dispose_mail_item_PVT;
849: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
850: FND_MSG_PUB.Count_And_Get
851: ( p_count => x_msg_count,
852: p_data => x_msg_data
853: );
854: WHEN OTHERS THEN
853: );
854: WHEN OTHERS THEN
855: ROLLBACK TO dispose_mail_item_PVT;
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: IF FND_MSG_PUB.Check_Msg_Level
858: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
859: THEN
860: FND_MSG_PUB.Add_Exc_Msg
861: ( G_PKG_NAME ,
854: WHEN OTHERS THEN
855: ROLLBACK TO dispose_mail_item_PVT;
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: IF FND_MSG_PUB.Check_Msg_Level
858: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
859: THEN
860: FND_MSG_PUB.Add_Exc_Msg
861: ( G_PKG_NAME ,
862: l_api_name
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: IF FND_MSG_PUB.Check_Msg_Level
858: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
859: THEN
860: FND_MSG_PUB.Add_Exc_Msg
861: ( G_PKG_NAME ,
862: l_api_name
863: );
864: END IF;
861: ( G_PKG_NAME ,
862: l_api_name
863: );
864: END IF;
865: FND_MSG_PUB.Count_And_Get
866: ( p_count => x_msg_count ,
867: p_data => x_msg_data
868: );
869:
905: IF p_commit='T' THEN
906: COMMIT WORK;
907: END IF;
908: -- Standard callto get message count and if count is 1, get message info.
909: FND_MSG_PUB.Count_And_Get
910: ( p_count => x_msg_count,
911: p_data => x_msg_data
912: );
913: EXCEPTION
914: WHEN NOT_A_VALID_AGENT THEN
915: ROLLBACK TO getgroupdetails_PVT;
916: x_return_status := FND_API.G_RET_STS_ERROR ;
917: FND_MESSAGE.SET_NAME('IEM', 'IEM_UNRECOGNIZED_AGENT');
918: FND_MSG_PUB.ADD;
919: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
920:
921: WHEN FND_API.G_EXC_ERROR THEN
922: ROLLBACK TO getgroupdetails_PVT;
915: ROLLBACK TO getgroupdetails_PVT;
916: x_return_status := FND_API.G_RET_STS_ERROR ;
917: FND_MESSAGE.SET_NAME('IEM', 'IEM_UNRECOGNIZED_AGENT');
918: FND_MSG_PUB.ADD;
919: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
920:
921: WHEN FND_API.G_EXC_ERROR THEN
922: ROLLBACK TO getgroupdetails_PVT;
923: x_return_status := FND_API.G_RET_STS_ERROR ;
920:
921: WHEN FND_API.G_EXC_ERROR THEN
922: ROLLBACK TO getgroupdetails_PVT;
923: x_return_status := FND_API.G_RET_STS_ERROR ;
924: FND_MSG_PUB.Count_And_Get
925: ( p_count => x_msg_count,
926: p_data => x_msg_data
927: );
928: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
927: );
928: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
929: ROLLBACK TO getgroupdetails_PVT;
930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
931: FND_MSG_PUB.Count_And_Get
932: ( p_count => x_msg_count,
933: p_data => x_msg_data
934: );
935: WHEN OTHERS THEN
934: );
935: WHEN OTHERS THEN
936: ROLLBACK TO getgroupdetails_PVT;
937: x_return_status := FND_API.G_RET_STS_ERROR;
938: IF FND_MSG_PUB.Check_Msg_Level
939: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
940: THEN
941: FND_MSG_PUB.Add_Exc_Msg
942: ( G_PKG_NAME ,
935: WHEN OTHERS THEN
936: ROLLBACK TO getgroupdetails_PVT;
937: x_return_status := FND_API.G_RET_STS_ERROR;
938: IF FND_MSG_PUB.Check_Msg_Level
939: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
940: THEN
941: FND_MSG_PUB.Add_Exc_Msg
942: ( G_PKG_NAME ,
943: l_api_name
937: x_return_status := FND_API.G_RET_STS_ERROR;
938: IF FND_MSG_PUB.Check_Msg_Level
939: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
940: THEN
941: FND_MSG_PUB.Add_Exc_Msg
942: ( G_PKG_NAME ,
943: l_api_name
944: );
945: END IF;
942: ( G_PKG_NAME ,
943: l_api_name
944: );
945: END IF;
946: FND_MSG_PUB.Count_And_Get
947: ( p_count => x_msg_count ,
948: p_data => x_msg_data
949: );
950: END getGroupDetails;
1010: COMMIT WORK;
1011: END IF;
1012:
1013: -- Standard callto get message count and if count is 1, get message info.
1014: FND_MSG_PUB.Count_And_Get
1015: ( p_count => x_msg_count,
1016: p_data => x_msg_data
1017: );
1018: EXCEPTION
1018: EXCEPTION
1019: WHEN FND_API.G_EXC_ERROR THEN
1020: ROLLBACK TO update_item_PVT;
1021: x_return_status := FND_API.G_RET_STS_ERROR ;
1022: FND_MSG_PUB.Count_And_Get
1023: ( p_count => x_msg_count,
1024: p_data => x_msg_data
1025: );
1026: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1025: );
1026: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1027: ROLLBACK TO update_item_PVT;
1028: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1029: FND_MSG_PUB.Count_And_Get
1030: ( p_count => x_msg_count,
1031: p_data => x_msg_data
1032: );
1033: WHEN OTHERS THEN
1032: );
1033: WHEN OTHERS THEN
1034: ROLLBACK TO update_item_PVT;
1035: x_return_status := FND_API.G_RET_STS_ERROR;
1036: IF FND_MSG_PUB.Check_Msg_Level
1037: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1038: THEN
1039: FND_MSG_PUB.Add_Exc_Msg
1040: ( G_PKG_NAME ,
1033: WHEN OTHERS THEN
1034: ROLLBACK TO update_item_PVT;
1035: x_return_status := FND_API.G_RET_STS_ERROR;
1036: IF FND_MSG_PUB.Check_Msg_Level
1037: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1038: THEN
1039: FND_MSG_PUB.Add_Exc_Msg
1040: ( G_PKG_NAME ,
1041: l_api_name
1035: x_return_status := FND_API.G_RET_STS_ERROR;
1036: IF FND_MSG_PUB.Check_Msg_Level
1037: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1038: THEN
1039: FND_MSG_PUB.Add_Exc_Msg
1040: ( G_PKG_NAME ,
1041: l_api_name
1042: );
1043: END IF;
1040: ( G_PKG_NAME ,
1041: l_api_name
1042: );
1043: END IF;
1044: FND_MSG_PUB.Count_And_Get
1045: ( p_count => x_msg_count ,
1046: p_data => x_msg_data
1047: );
1048:
1079: FROM iem_rt_proc_emails
1080: WHERE message_id=p_message_id;
1081: EXCEPTION WHEN NO_DATA_FOUND THEN
1082: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1083: FND_MSG_PUB.ADD;
1084: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1085: raise;
1086: END;
1087: ELSE -- Supervisor Mode
1080: WHERE message_id=p_message_id;
1081: EXCEPTION WHEN NO_DATA_FOUND THEN
1082: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1083: FND_MSG_PUB.ADD;
1084: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1085: raise;
1086: END;
1087: ELSE -- Supervisor Mode
1088: BEGIN
1091: FROM iem_rt_proc_emails
1092: WHERE message_id=p_message_id;
1093: EXCEPTION WHEN NO_DATA_FOUND THEN
1094: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1095: FND_MSG_PUB.ADD;
1096: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1097: raise;
1098: END;
1099: END IF;
1092: WHERE message_id=p_message_id;
1093: EXCEPTION WHEN NO_DATA_FOUND THEN
1094: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1095: FND_MSG_PUB.ADD;
1096: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1097: raise;
1098: END;
1099: END IF;
1100:
1099: END IF;
1100:
1101:
1102: -- Standard callto get message count and if count is 1, get message info.
1103: FND_MSG_PUB.Count_And_Get
1104: ( p_count => x_msg_count,
1105: p_data => x_msg_data
1106: );
1107: EXCEPTION
1107: EXCEPTION
1108: WHEN FND_API.G_EXC_ERROR THEN
1109: ROLLBACK TO get_mail_iteminfo_pvt;
1110: x_return_status := FND_API.G_RET_STS_ERROR ;
1111: FND_MSG_PUB.Count_And_Get
1112: ( p_count => x_msg_count,
1113: p_data => x_msg_data
1114: );
1115: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1114: );
1115: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1116: ROLLBACK TO get_mail_iteminfo_pvt;
1117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1118: FND_MSG_PUB.Count_And_Get
1119: ( p_count => x_msg_count,
1120: p_data => x_msg_data
1121: );
1122: WHEN OTHERS THEN
1121: );
1122: WHEN OTHERS THEN
1123: ROLLBACK TO get_mail_iteminfo_pvt;
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: IF FND_MSG_PUB.Check_Msg_Level
1126: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1127: THEN
1128: FND_MSG_PUB.Add_Exc_Msg
1129: ( G_PKG_NAME ,
1122: WHEN OTHERS THEN
1123: ROLLBACK TO get_mail_iteminfo_pvt;
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: IF FND_MSG_PUB.Check_Msg_Level
1126: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1127: THEN
1128: FND_MSG_PUB.Add_Exc_Msg
1129: ( G_PKG_NAME ,
1130: l_api_name
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125: IF FND_MSG_PUB.Check_Msg_Level
1126: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1127: THEN
1128: FND_MSG_PUB.Add_Exc_Msg
1129: ( G_PKG_NAME ,
1130: l_api_name
1131: );
1132: END IF;
1129: ( G_PKG_NAME ,
1130: l_api_name
1131: );
1132: END IF;
1133: FND_MSG_PUB.Count_And_Get
1134: ( p_count => x_msg_count ,
1135: p_data => x_msg_data
1136: );
1137: END getmailiteminfo;
1241: COMMIT WORK;
1242: END IF;
1243:
1244: -- Standard callto get message count and if count is 1, get message info.
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_count => x_msg_count,
1247: p_data => x_msg_data
1248: );
1249: EXCEPTION
1249: EXCEPTION
1250: WHEN FND_API.G_EXC_ERROR THEN
1251: ROLLBACK TO getemailheaders_pvt;
1252: x_return_status := FND_API.G_RET_STS_ERROR ;
1253: FND_MSG_PUB.Count_And_Get
1254: ( p_count => x_msg_count,
1255: p_data => x_msg_data
1256: );
1257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1256: );
1257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1258: ROLLBACK TO getemailheaders_pvt;
1259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1260: FND_MSG_PUB.Count_And_Get
1261: ( p_count => x_msg_count,
1262: p_data => x_msg_data
1263: );
1264: WHEN OTHERS THEN
1263: );
1264: WHEN OTHERS THEN
1265: ROLLBACK TO getemailheaders_pvt;
1266: x_return_status := FND_API.G_RET_STS_ERROR;
1267: IF FND_MSG_PUB.Check_Msg_Level
1268: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1269: THEN
1270: FND_MSG_PUB.Add_Exc_Msg
1271: ( G_PKG_NAME ,
1264: WHEN OTHERS THEN
1265: ROLLBACK TO getemailheaders_pvt;
1266: x_return_status := FND_API.G_RET_STS_ERROR;
1267: IF FND_MSG_PUB.Check_Msg_Level
1268: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1269: THEN
1270: FND_MSG_PUB.Add_Exc_Msg
1271: ( G_PKG_NAME ,
1272: l_api_name
1266: x_return_status := FND_API.G_RET_STS_ERROR;
1267: IF FND_MSG_PUB.Check_Msg_Level
1268: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1269: THEN
1270: FND_MSG_PUB.Add_Exc_Msg
1271: ( G_PKG_NAME ,
1272: l_api_name
1273: );
1274: END IF;
1271: ( G_PKG_NAME ,
1272: l_api_name
1273: );
1274: END IF;
1275: FND_MSG_PUB.Count_And_Get
1276: ( p_count => x_msg_count ,
1277: p_data => x_msg_data
1278: );
1279: END getEmailHeaders;
1340: IF p_commit='T' THEN
1341: COMMIT WORK;
1342: END IF;
1343: -- Standard callto get message count and if count is 1, get message info.
1344: FND_MSG_PUB.Count_And_Get
1345: ( p_count => x_msg_count,
1346: p_data => x_msg_data
1347: );
1348: EXCEPTION
1349: WHEN NO_DATA_FOUND THEN
1350: ROLLBACK TO select_data_PVT;
1351: x_return_status := 'N';
1352: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1353: FND_MSG_PUB.ADD;
1354: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1355: WHEN FND_API.G_EXC_ERROR THEN
1356: ROLLBACK TO select_data_PVT;
1357: x_return_status := FND_API.G_RET_STS_ERROR ;
1350: ROLLBACK TO select_data_PVT;
1351: x_return_status := 'N';
1352: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1353: FND_MSG_PUB.ADD;
1354: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1355: WHEN FND_API.G_EXC_ERROR THEN
1356: ROLLBACK TO select_data_PVT;
1357: x_return_status := FND_API.G_RET_STS_ERROR ;
1358: FND_MSG_PUB.Count_And_Get
1354: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1355: WHEN FND_API.G_EXC_ERROR THEN
1356: ROLLBACK TO select_data_PVT;
1357: x_return_status := FND_API.G_RET_STS_ERROR ;
1358: FND_MSG_PUB.Count_And_Get
1359: ( p_count => x_msg_count,
1360: p_data => x_msg_data
1361: );
1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1361: );
1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1363: ROLLBACK TO select_data_PVT;
1364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1365: FND_MSG_PUB.Count_And_Get
1366: ( p_count => x_msg_count,
1367: p_data => x_msg_data
1368: );
1369: WHEN OTHERS THEN
1368: );
1369: WHEN OTHERS THEN
1370: ROLLBACK TO select_data_PVT;
1371: x_return_status := FND_API.G_RET_STS_ERROR;
1372: IF FND_MSG_PUB.Check_Msg_Level
1373: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1374: THEN
1375: FND_MSG_PUB.Add_Exc_Msg
1376: ( G_PKG_NAME ,
1369: WHEN OTHERS THEN
1370: ROLLBACK TO select_data_PVT;
1371: x_return_status := FND_API.G_RET_STS_ERROR;
1372: IF FND_MSG_PUB.Check_Msg_Level
1373: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1374: THEN
1375: FND_MSG_PUB.Add_Exc_Msg
1376: ( G_PKG_NAME ,
1377: l_api_name
1371: x_return_status := FND_API.G_RET_STS_ERROR;
1372: IF FND_MSG_PUB.Check_Msg_Level
1373: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1374: THEN
1375: FND_MSG_PUB.Add_Exc_Msg
1376: ( G_PKG_NAME ,
1377: l_api_name
1378: );
1379: END IF;
1376: ( G_PKG_NAME ,
1377: l_api_name
1378: );
1379: END IF;
1380: FND_MSG_PUB.Count_And_Get
1381: ( p_count => x_msg_count ,
1382: p_data => x_msg_data
1383: );
1384: end GetQueueItemData;
1551: WHEN NO_DATA_FOUND THEN
1552: ROLLBACK TO resolve_data_pvt;
1553: x_return_status := 'N';
1554: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1555: FND_MSG_PUB.ADD;
1556: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: ROLLBACK TO resolve_data_pvt;
1559: x_return_status := FND_API.G_RET_STS_ERROR ;
1552: ROLLBACK TO resolve_data_pvt;
1553: x_return_status := 'N';
1554: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1555: FND_MSG_PUB.ADD;
1556: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: ROLLBACK TO resolve_data_pvt;
1559: x_return_status := FND_API.G_RET_STS_ERROR ;
1560: FND_MSG_PUB.Count_And_Get
1556: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: ROLLBACK TO resolve_data_pvt;
1559: x_return_status := FND_API.G_RET_STS_ERROR ;
1560: FND_MSG_PUB.Count_And_Get
1561: ( p_count => x_msg_count,
1562: p_data => x_msg_data
1563: );
1564: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1563: );
1564: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1565: ROLLBACK TO resolve_data_pvt;
1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1567: FND_MSG_PUB.Count_And_Get
1568: ( p_count => x_msg_count,
1569: p_data => x_msg_data
1570: );
1571: WHEN ERROR_CLOSING_MEDIA THEN
1573: x_return_status := FND_API.G_RET_STS_ERROR;
1574: WHEN OTHERS THEN
1575: ROLLBACK TO resolve_data_pvt;
1576: x_return_status := FND_API.G_RET_STS_ERROR;
1577: IF FND_MSG_PUB.Check_Msg_Level
1578: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1579: THEN
1580: FND_MSG_PUB.Add_Exc_Msg
1581: ( G_PKG_NAME ,
1574: WHEN OTHERS THEN
1575: ROLLBACK TO resolve_data_pvt;
1576: x_return_status := FND_API.G_RET_STS_ERROR;
1577: IF FND_MSG_PUB.Check_Msg_Level
1578: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1579: THEN
1580: FND_MSG_PUB.Add_Exc_Msg
1581: ( G_PKG_NAME ,
1582: l_api_name
1576: x_return_status := FND_API.G_RET_STS_ERROR;
1577: IF FND_MSG_PUB.Check_Msg_Level
1578: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1579: THEN
1580: FND_MSG_PUB.Add_Exc_Msg
1581: ( G_PKG_NAME ,
1582: l_api_name
1583: );
1584: END IF;
1581: ( G_PKG_NAME ,
1582: l_api_name
1583: );
1584: END IF;
1585: FND_MSG_PUB.Count_And_Get
1586: ( p_count => x_msg_count ,
1587: p_data => x_msg_data
1588: );
1589: end ResolvedMessage;