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;
1245: COMMIT WORK;
1246: END IF;
1247:
1248: -- Standard callto get message count and if count is 1, get message info.
1249: FND_MSG_PUB.Count_And_Get
1250: ( p_count => x_msg_count,
1251: p_data => x_msg_data
1252: );
1253: EXCEPTION
1253: EXCEPTION
1254: WHEN FND_API.G_EXC_ERROR THEN
1255: ROLLBACK TO getemailheaders_pvt;
1256: x_return_status := FND_API.G_RET_STS_ERROR ;
1257: FND_MSG_PUB.Count_And_Get
1258: ( p_count => x_msg_count,
1259: p_data => x_msg_data
1260: );
1261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1260: );
1261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1262: ROLLBACK TO getemailheaders_pvt;
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1264: FND_MSG_PUB.Count_And_Get
1265: ( p_count => x_msg_count,
1266: p_data => x_msg_data
1267: );
1268: WHEN OTHERS THEN
1267: );
1268: WHEN OTHERS THEN
1269: ROLLBACK TO getemailheaders_pvt;
1270: x_return_status := FND_API.G_RET_STS_ERROR;
1271: IF FND_MSG_PUB.Check_Msg_Level
1272: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1273: THEN
1274: FND_MSG_PUB.Add_Exc_Msg
1275: ( G_PKG_NAME ,
1268: WHEN OTHERS THEN
1269: ROLLBACK TO getemailheaders_pvt;
1270: x_return_status := FND_API.G_RET_STS_ERROR;
1271: IF FND_MSG_PUB.Check_Msg_Level
1272: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1273: THEN
1274: FND_MSG_PUB.Add_Exc_Msg
1275: ( G_PKG_NAME ,
1276: l_api_name
1270: x_return_status := FND_API.G_RET_STS_ERROR;
1271: IF FND_MSG_PUB.Check_Msg_Level
1272: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1273: THEN
1274: FND_MSG_PUB.Add_Exc_Msg
1275: ( G_PKG_NAME ,
1276: l_api_name
1277: );
1278: END IF;
1275: ( G_PKG_NAME ,
1276: l_api_name
1277: );
1278: END IF;
1279: FND_MSG_PUB.Count_And_Get
1280: ( p_count => x_msg_count ,
1281: p_data => x_msg_data
1282: );
1283: END getEmailHeaders;
1426: IF p_commit='T' THEN
1427: COMMIT WORK;
1428: END IF;
1429: -- Standard callto get message count and if count is 1, get message info.
1430: FND_MSG_PUB.Count_And_Get
1431: ( p_count => x_msg_count,
1432: p_data => x_msg_data
1433: );
1434: EXCEPTION
1434: EXCEPTION
1435: WHEN FND_API.G_EXC_ERROR THEN
1436: ROLLBACK TO getunreademailheaders_pvt;
1437: x_return_status := FND_API.G_RET_STS_ERROR ;
1438: FND_MSG_PUB.Count_And_Get
1439: ( p_count => x_msg_count,
1440: p_data => x_msg_data
1441: );
1442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1441: );
1442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1443: ROLLBACK TO getunreademailheaders_pvt;
1444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1445: FND_MSG_PUB.Count_And_Get
1446: ( p_count => x_msg_count,
1447: p_data => x_msg_data
1448: );
1449: WHEN OTHERS THEN
1448: );
1449: WHEN OTHERS THEN
1450: ROLLBACK TO getunreademailheaders_pvt;
1451: x_return_status := FND_API.G_RET_STS_ERROR;
1452: IF FND_MSG_PUB.Check_Msg_Level
1453: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1454: THEN
1455: FND_MSG_PUB.Add_Exc_Msg
1456: ( G_PKG_NAME ,
1449: WHEN OTHERS THEN
1450: ROLLBACK TO getunreademailheaders_pvt;
1451: x_return_status := FND_API.G_RET_STS_ERROR;
1452: IF FND_MSG_PUB.Check_Msg_Level
1453: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1454: THEN
1455: FND_MSG_PUB.Add_Exc_Msg
1456: ( G_PKG_NAME ,
1457: l_api_name
1451: x_return_status := FND_API.G_RET_STS_ERROR;
1452: IF FND_MSG_PUB.Check_Msg_Level
1453: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1454: THEN
1455: FND_MSG_PUB.Add_Exc_Msg
1456: ( G_PKG_NAME ,
1457: l_api_name
1458: );
1459: END IF;
1456: ( G_PKG_NAME ,
1457: l_api_name
1458: );
1459: END IF;
1460: FND_MSG_PUB.Count_And_Get
1461: ( p_count => x_msg_count ,
1462: p_data => x_msg_data
1463: );
1464: END getUnreadEmailHeaders;
1526: IF p_commit='T' THEN
1527: COMMIT WORK;
1528: END IF;
1529: -- Standard callto get message count and if count is 1, get message info.
1530: FND_MSG_PUB.Count_And_Get
1531: ( p_count => x_msg_count,
1532: p_data => x_msg_data
1533: );
1534: EXCEPTION
1535: WHEN NO_DATA_FOUND THEN
1536: ROLLBACK TO select_data_PVT;
1537: x_return_status := 'N';
1538: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1539: FND_MSG_PUB.ADD;
1540: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1541: WHEN FND_API.G_EXC_ERROR THEN
1542: ROLLBACK TO select_data_PVT;
1543: x_return_status := FND_API.G_RET_STS_ERROR ;
1536: ROLLBACK TO select_data_PVT;
1537: x_return_status := 'N';
1538: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1539: FND_MSG_PUB.ADD;
1540: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1541: WHEN FND_API.G_EXC_ERROR THEN
1542: ROLLBACK TO select_data_PVT;
1543: x_return_status := FND_API.G_RET_STS_ERROR ;
1544: FND_MSG_PUB.Count_And_Get
1540: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1541: WHEN FND_API.G_EXC_ERROR THEN
1542: ROLLBACK TO select_data_PVT;
1543: x_return_status := FND_API.G_RET_STS_ERROR ;
1544: FND_MSG_PUB.Count_And_Get
1545: ( p_count => x_msg_count,
1546: p_data => x_msg_data
1547: );
1548: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1547: );
1548: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1549: ROLLBACK TO select_data_PVT;
1550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1551: FND_MSG_PUB.Count_And_Get
1552: ( p_count => x_msg_count,
1553: p_data => x_msg_data
1554: );
1555: WHEN OTHERS THEN
1554: );
1555: WHEN OTHERS THEN
1556: ROLLBACK TO select_data_PVT;
1557: x_return_status := FND_API.G_RET_STS_ERROR;
1558: IF FND_MSG_PUB.Check_Msg_Level
1559: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1560: THEN
1561: FND_MSG_PUB.Add_Exc_Msg
1562: ( G_PKG_NAME ,
1555: WHEN OTHERS THEN
1556: ROLLBACK TO select_data_PVT;
1557: x_return_status := FND_API.G_RET_STS_ERROR;
1558: IF FND_MSG_PUB.Check_Msg_Level
1559: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1560: THEN
1561: FND_MSG_PUB.Add_Exc_Msg
1562: ( G_PKG_NAME ,
1563: l_api_name
1557: x_return_status := FND_API.G_RET_STS_ERROR;
1558: IF FND_MSG_PUB.Check_Msg_Level
1559: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1560: THEN
1561: FND_MSG_PUB.Add_Exc_Msg
1562: ( G_PKG_NAME ,
1563: l_api_name
1564: );
1565: END IF;
1562: ( G_PKG_NAME ,
1563: l_api_name
1564: );
1565: END IF;
1566: FND_MSG_PUB.Count_And_Get
1567: ( p_count => x_msg_count ,
1568: p_data => x_msg_data
1569: );
1570: end GetQueueItemData;
1737: WHEN NO_DATA_FOUND THEN
1738: ROLLBACK TO resolve_data_pvt;
1739: x_return_status := 'N';
1740: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1741: FND_MSG_PUB.ADD;
1742: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1743: WHEN FND_API.G_EXC_ERROR THEN
1744: ROLLBACK TO resolve_data_pvt;
1745: x_return_status := FND_API.G_RET_STS_ERROR ;
1738: ROLLBACK TO resolve_data_pvt;
1739: x_return_status := 'N';
1740: FND_MESSAGE.SET_NAME('IEM', 'IEM_NO_DATA');
1741: FND_MSG_PUB.ADD;
1742: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1743: WHEN FND_API.G_EXC_ERROR THEN
1744: ROLLBACK TO resolve_data_pvt;
1745: x_return_status := FND_API.G_RET_STS_ERROR ;
1746: FND_MSG_PUB.Count_And_Get
1742: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1743: WHEN FND_API.G_EXC_ERROR THEN
1744: ROLLBACK TO resolve_data_pvt;
1745: x_return_status := FND_API.G_RET_STS_ERROR ;
1746: FND_MSG_PUB.Count_And_Get
1747: ( p_count => x_msg_count,
1748: p_data => x_msg_data
1749: );
1750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1749: );
1750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1751: ROLLBACK TO resolve_data_pvt;
1752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1753: FND_MSG_PUB.Count_And_Get
1754: ( p_count => x_msg_count,
1755: p_data => x_msg_data
1756: );
1757: WHEN ERROR_CLOSING_MEDIA THEN
1759: x_return_status := FND_API.G_RET_STS_ERROR;
1760: WHEN OTHERS THEN
1761: ROLLBACK TO resolve_data_pvt;
1762: x_return_status := FND_API.G_RET_STS_ERROR;
1763: IF FND_MSG_PUB.Check_Msg_Level
1764: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1765: THEN
1766: FND_MSG_PUB.Add_Exc_Msg
1767: ( G_PKG_NAME ,
1760: WHEN OTHERS THEN
1761: ROLLBACK TO resolve_data_pvt;
1762: x_return_status := FND_API.G_RET_STS_ERROR;
1763: IF FND_MSG_PUB.Check_Msg_Level
1764: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1765: THEN
1766: FND_MSG_PUB.Add_Exc_Msg
1767: ( G_PKG_NAME ,
1768: l_api_name
1762: x_return_status := FND_API.G_RET_STS_ERROR;
1763: IF FND_MSG_PUB.Check_Msg_Level
1764: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1765: THEN
1766: FND_MSG_PUB.Add_Exc_Msg
1767: ( G_PKG_NAME ,
1768: l_api_name
1769: );
1770: END IF;
1767: ( G_PKG_NAME ,
1768: l_api_name
1769: );
1770: END IF;
1771: FND_MSG_PUB.Count_And_Get
1772: ( p_count => x_msg_count ,
1773: p_data => x_msg_data
1774: );
1775: end ResolvedMessage;