74:
75: -- Initialize message list if p_init_msg_list is set to TRUE.
76:
77: IF FND_API.to_Boolean( p_init_msg_list ) THEN
78: FND_MSG_PUB.initialize;
79: END IF;
80:
81: -- Initialize API return status to SUCCESS
82:
153: COMMIT WORK;
154: END IF;
155:
156: -- Standard callto get message count and if count is 1, get message info.
157: FND_MSG_PUB.Count_And_Get
158: ( p_count => x_msg_count,
159: p_data => x_msg_data
160: );
161:
164:
165: ROLLBACK TO create_item_acct_routes_PVT;
166:
167: x_return_status := FND_API.G_RET_STS_ERROR ;
168: FND_MSG_PUB.Count_And_Get
169: ( p_count => x_msg_count,
170: p_data => x_msg_data
171: );
172:
172:
173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
174: ROLLBACK TO create_item_acct_routes_PVT;
175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
176: FND_MSG_PUB.Count_And_Get
177: ( p_count => x_msg_count,
178:
179: p_data => x_msg_data
180: );
182:
183: WHEN OTHERS THEN
184: ROLLBACK TO create_item_acct_routes_PVT;
185: x_return_status := FND_API.G_RET_STS_ERROR;
186: IF FND_MSG_PUB.Check_Msg_Level
187: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
188: THEN
189: FND_MSG_PUB.Add_Exc_Msg
190: ( G_PKG_NAME ,
183: WHEN OTHERS THEN
184: ROLLBACK TO create_item_acct_routes_PVT;
185: x_return_status := FND_API.G_RET_STS_ERROR;
186: IF FND_MSG_PUB.Check_Msg_Level
187: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
188: THEN
189: FND_MSG_PUB.Add_Exc_Msg
190: ( G_PKG_NAME ,
191: l_api_name
185: x_return_status := FND_API.G_RET_STS_ERROR;
186: IF FND_MSG_PUB.Check_Msg_Level
187: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
188: THEN
189: FND_MSG_PUB.Add_Exc_Msg
190: ( G_PKG_NAME ,
191: l_api_name
192:
193: );
191: l_api_name
192:
193: );
194: END IF;
195: FND_MSG_PUB.Count_And_Get
196:
197: ( p_count => x_msg_count ,
198: p_data => x_msg_data
199: );
244:
245: -- Initialize message list if p_init_msg_list is set to TRUE.
246: IF FND_API.to_Boolean( p_init_msg_list )
247: THEN
248: FND_MSG_PUB.initialize;
249: END IF;
250:
251: -- Initialize API return status to SUCCESS
252: x_return_status := FND_API.G_RET_STS_SUCCESS;
318: COMMIT WORK;
319: END IF;
320:
321: -- Standard callto get message count and if count is 1, get message info.
322: FND_MSG_PUB.Count_And_Get
323: ( p_count => x_msg_count,
324: p_data => x_msg_data
325: );
326:
328: EXCEPTION
329: WHEN l_IEM_INVALID_PROCEDURE THEN
330: ROLLBACK TO update_item_route;
331: x_return_status := FND_API.G_RET_STS_ERROR ;
332: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
333:
334: WHEN IEM_ADM_G_MISS_FOR_NOTNULL THEN
335: ROLLBACK TO update_item_route;
336: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_G_MISS_FOR_NOTNULL');
333:
334: WHEN IEM_ADM_G_MISS_FOR_NOTNULL THEN
335: ROLLBACK TO update_item_route;
336: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_G_MISS_FOR_NOTNULL');
337: FND_MSG_PUB.Add;
338: x_return_status := FND_API.G_RET_STS_ERROR ;
339: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
340:
341: WHEN IEM_ADM_DUP_NAME THEN
335: ROLLBACK TO update_item_route;
336: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_G_MISS_FOR_NOTNULL');
337: FND_MSG_PUB.Add;
338: x_return_status := FND_API.G_RET_STS_ERROR ;
339: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
340:
341: WHEN IEM_ADM_DUP_NAME THEN
342: ROLLBACK TO update_item_route;
343: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_DUP_NAME');
340:
341: WHEN IEM_ADM_DUP_NAME THEN
342: ROLLBACK TO update_item_route;
343: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_DUP_NAME');
344: FND_MSG_PUB.Add;
345: x_return_status := FND_API.G_RET_STS_ERROR ;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347:
348: WHEN IEM_ADMIN_ROUTE_NO_PROC THEN
342: ROLLBACK TO update_item_route;
343: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_DUP_NAME');
344: FND_MSG_PUB.Add;
345: x_return_status := FND_API.G_RET_STS_ERROR ;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347:
348: WHEN IEM_ADMIN_ROUTE_NO_PROC THEN
349: ROLLBACK TO update_item_route;
350: FND_MESSAGE.SET_NAME('IEM','IEM_ADMIN_ROUTE_NO_PROC');
347:
348: WHEN IEM_ADMIN_ROUTE_NO_PROC THEN
349: ROLLBACK TO update_item_route;
350: FND_MESSAGE.SET_NAME('IEM','IEM_ADMIN_ROUTE_NO_PROC');
351: FND_MSG_PUB.Add;
352: x_return_status := FND_API.G_RET_STS_ERROR ;
353: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
354:
355: WHEN FND_API.G_EXC_ERROR THEN
349: ROLLBACK TO update_item_route;
350: FND_MESSAGE.SET_NAME('IEM','IEM_ADMIN_ROUTE_NO_PROC');
351: FND_MSG_PUB.Add;
352: x_return_status := FND_API.G_RET_STS_ERROR ;
353: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
354:
355: WHEN FND_API.G_EXC_ERROR THEN
356: ROLLBACK TO update_item_route;
357: x_return_status := FND_API.G_RET_STS_ERROR ;
354:
355: WHEN FND_API.G_EXC_ERROR THEN
356: ROLLBACK TO update_item_route;
357: x_return_status := FND_API.G_RET_STS_ERROR ;
358: FND_MSG_PUB.Count_And_Get
359:
360:
361: ( p_count => x_msg_count,
362: p_data => x_msg_data
364:
365: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
366: ROLLBACK TO update_item_route;
367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
368: FND_MSG_PUB.Count_And_Get
369: ( p_count => x_msg_count,
370: p_data => x_msg_data
371: );
372:
374: WHEN OTHERS THEN
375:
376: ROLLBACK TO update_item_route;
377: x_return_status := FND_API.G_RET_STS_ERROR;
378: IF FND_MSG_PUB.Check_Msg_Level
379: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
380: THEN
381: FND_MSG_PUB.Add_Exc_Msg
382: ( G_PKG_NAME ,
375:
376: ROLLBACK TO update_item_route;
377: x_return_status := FND_API.G_RET_STS_ERROR;
378: IF FND_MSG_PUB.Check_Msg_Level
379: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
380: THEN
381: FND_MSG_PUB.Add_Exc_Msg
382: ( G_PKG_NAME ,
383: l_api_name
377: x_return_status := FND_API.G_RET_STS_ERROR;
378: IF FND_MSG_PUB.Check_Msg_Level
379: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
380: THEN
381: FND_MSG_PUB.Add_Exc_Msg
382: ( G_PKG_NAME ,
383: l_api_name
384: );
385: END IF;
382: ( G_PKG_NAME ,
383: l_api_name
384: );
385: END IF;
386: FND_MSG_PUB.Count_And_Get
387:
388: ( p_count => x_msg_count ,
389: p_data => x_msg_data
390:
429: -- Initialize message list if p_init_msg_list is set to TRUE.
430: IF FND_API.to_Boolean( p_init_msg_list )
431: THEN
432:
433: FND_MSG_PUB.initialize;
434: END IF;
435: -- Initialize API return status to SUCCESS
436: x_return_status := FND_API.G_RET_STS_SUCCESS;
437:
482: COMMIT WORK;
483: END IF;
484:
485: -- Standard callto get message count and if count is 1, get message info.
486: FND_MSG_PUB.Count_And_Get
487: ( p_count => x_msg_count,
488: p_data => x_msg_data
489: );
490: EXCEPTION
491: WHEN IEM_NO_RULE_UPDATE THEN
492: ROLLBACK TO update_item_rule;
493: FND_MESSAGE.SET_NAME('IEM','IEM_NO_RULE_UPDATE');
494:
495: FND_MSG_PUB.Add;
496: x_return_status := FND_API.G_RET_STS_ERROR ;
497: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
498:
499: WHEN IEM_ADM_G_MISS_FOR_NOTNULL THEN
493: FND_MESSAGE.SET_NAME('IEM','IEM_NO_RULE_UPDATE');
494:
495: FND_MSG_PUB.Add;
496: x_return_status := FND_API.G_RET_STS_ERROR ;
497: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
498:
499: WHEN IEM_ADM_G_MISS_FOR_NOTNULL THEN
500: ROLLBACK TO update_item_rule;
501: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_G_MISS_FOR_NOTNULL');
499: WHEN IEM_ADM_G_MISS_FOR_NOTNULL THEN
500: ROLLBACK TO update_item_rule;
501: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_G_MISS_FOR_NOTNULL');
502:
503: FND_MSG_PUB.Add;
504: x_return_status := FND_API.G_RET_STS_ERROR ;
505: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
506: /*
507: WHEN IEM_INVALID_DATE_FORMAT THEN
501: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_G_MISS_FOR_NOTNULL');
502:
503: FND_MSG_PUB.Add;
504: x_return_status := FND_API.G_RET_STS_ERROR ;
505: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
506: /*
507: WHEN IEM_INVALID_DATE_FORMAT THEN
508: ROLLBACK TO update_item_rule;
509: FND_MESSAGE.SET_NAME('IEM','IEM_INVALID_DATE_FORMAT');
506: /*
507: WHEN IEM_INVALID_DATE_FORMAT THEN
508: ROLLBACK TO update_item_rule;
509: FND_MESSAGE.SET_NAME('IEM','IEM_INVALID_DATE_FORMAT');
510: FND_MSG_PUB.Add;
511: x_return_status := FND_API.G_RET_STS_ERROR ;
512: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
513: */
514: WHEN FND_API.G_EXC_ERROR THEN
508: ROLLBACK TO update_item_rule;
509: FND_MESSAGE.SET_NAME('IEM','IEM_INVALID_DATE_FORMAT');
510: FND_MSG_PUB.Add;
511: x_return_status := FND_API.G_RET_STS_ERROR ;
512: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
513: */
514: WHEN FND_API.G_EXC_ERROR THEN
515: ROLLBACK TO update_item_rule;
516:
514: WHEN FND_API.G_EXC_ERROR THEN
515: ROLLBACK TO update_item_rule;
516:
517: x_return_status := FND_API.G_RET_STS_ERROR ;
518: FND_MSG_PUB.Count_And_Get
519:
520: ( p_count => x_msg_count,
521: p_data => x_msg_data
522: );
522: );
523: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
524: ROLLBACK TO update_item_rule;
525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
526: FND_MSG_PUB.Count_And_Get
527: ( p_count => x_msg_count,
528: p_data => x_msg_data
529: );
530: WHEN OTHERS THEN
531:
532: ROLLBACK TO update_item_rule;
533:
534: x_return_status := FND_API.G_RET_STS_ERROR;
535: IF FND_MSG_PUB.Check_Msg_Level
536: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
537: THEN
538: FND_MSG_PUB.Add_Exc_Msg
539: ( G_PKG_NAME ,
532: ROLLBACK TO update_item_rule;
533:
534: x_return_status := FND_API.G_RET_STS_ERROR;
535: IF FND_MSG_PUB.Check_Msg_Level
536: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
537: THEN
538: FND_MSG_PUB.Add_Exc_Msg
539: ( G_PKG_NAME ,
540: l_api_name
534: x_return_status := FND_API.G_RET_STS_ERROR;
535: IF FND_MSG_PUB.Check_Msg_Level
536: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
537: THEN
538: FND_MSG_PUB.Add_Exc_Msg
539: ( G_PKG_NAME ,
540: l_api_name
541: );
542: END IF;
539: ( G_PKG_NAME ,
540: l_api_name
541: );
542: END IF;
543: FND_MSG_PUB.Count_And_Get
544: ( p_count => x_msg_count ,
545: p_data => x_msg_data
546:
547:
588:
589: IF FND_API.to_Boolean( p_init_msg_list )
590:
591: THEN
592: FND_MSG_PUB.initialize;
593: END IF;
594: -- Initialize API return status to SUCCESS
595: x_return_status := FND_API.G_RET_STS_SUCCESS;
596:
650: COMMIT WORK;
651:
652: END IF;
653: -- Standard callto get message count and if count is 1, get message info.
654: FND_MSG_PUB.Count_And_Get
655: ( p_count => x_msg_count,
656: p_data => x_msg_data
657:
658: );
660:
661: WHEN FND_API.G_EXC_ERROR THEN
662: ROLLBACK TO update_account_emailprocs_PVT;
663: x_return_status := FND_API.G_RET_STS_ERROR ;
664: FND_MSG_PUB.Count_And_Get
665:
666: ( p_count => x_msg_count,
667: p_data => x_msg_data
668: );
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO update_account_emailprocs_PVT;
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672:
673: FND_MSG_PUB.Count_And_Get
674: ( p_count => x_msg_count,
675: p_data => x_msg_data
676: );
677: WHEN OTHERS THEN
677: WHEN OTHERS THEN
678: ROLLBACK TO update_account_emailprocs_PVT;
679:
680: x_return_status := FND_API.G_RET_STS_ERROR;
681: IF FND_MSG_PUB.Check_Msg_Level
682: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
683: THEN
684: FND_MSG_PUB.Add_Exc_Msg
685: ( G_PKG_NAME ,
678: ROLLBACK TO update_account_emailprocs_PVT;
679:
680: x_return_status := FND_API.G_RET_STS_ERROR;
681: IF FND_MSG_PUB.Check_Msg_Level
682: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
683: THEN
684: FND_MSG_PUB.Add_Exc_Msg
685: ( G_PKG_NAME ,
686: l_api_name
680: x_return_status := FND_API.G_RET_STS_ERROR;
681: IF FND_MSG_PUB.Check_Msg_Level
682: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
683: THEN
684: FND_MSG_PUB.Add_Exc_Msg
685: ( G_PKG_NAME ,
686: l_api_name
687:
688: );
686: l_api_name
687:
688: );
689: END IF;
690: FND_MSG_PUB.Count_And_Get
691: ( p_count => x_msg_count,
692: p_data => x_msg_data
693:
694: );
747:
748: -- Initialize message list if p_init_msg_list is set to TRUE.
749: IF FND_API.to_Boolean( p_init_msg_list )
750: THEN
751: FND_MSG_PUB.initialize;
752: END IF;
753:
754:
755: -- Initialize API return status to SUCCESS
870: COMMIT WORK;
871: END IF;
872:
873: -- Standard callto get message count and if count is 1, get message info.
874: FND_MSG_PUB.Count_And_Get
875: ( p_count => x_msg_count,
876: p_data => x_msg_data
877: );
878:
881: EXCEPTION
882: WHEN l_IEM_INVALID_PROCEDURE THEN
883: ROLLBACK TO create_item_routes_PVT;
884: x_return_status := FND_API.G_RET_STS_ERROR ;
885: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
886:
887: WHEN IEM_ADM_DUP_NAME THEN
888: ROLLBACK TO create_item_routes_PVT;
889: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_DUP_NAME');
886:
887: WHEN IEM_ADM_DUP_NAME THEN
888: ROLLBACK TO create_item_routes_PVT;
889: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_DUP_NAME');
890: FND_MSG_PUB.Add;
891: x_return_status := FND_API.G_RET_STS_ERROR ;
892: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
893:
894: WHEN FND_API.G_EXC_ERROR THEN
888: ROLLBACK TO create_item_routes_PVT;
889: FND_MESSAGE.SET_NAME('IEM','IEM_ADM_DUP_NAME');
890: FND_MSG_PUB.Add;
891: x_return_status := FND_API.G_RET_STS_ERROR ;
892: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
893:
894: WHEN FND_API.G_EXC_ERROR THEN
895: ROLLBACK TO create_item_routes_PVT;
896: x_return_status := FND_API.G_RET_STS_ERROR ;
894: WHEN FND_API.G_EXC_ERROR THEN
895: ROLLBACK TO create_item_routes_PVT;
896: x_return_status := FND_API.G_RET_STS_ERROR ;
897:
898: FND_MSG_PUB.Count_And_Get
899:
900: ( p_count => x_msg_count,
901: p_data => x_msg_data
902: );
903:
904: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
905: ROLLBACK TO create_item_routes_PVT;
906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
907: FND_MSG_PUB.Count_And_Get
908: ( p_count => x_msg_count,
909: p_data => x_msg_data
910: );
911:
913: WHEN OTHERS THEN
914:
915: ROLLBACK TO create_item_routes_PVT;
916: x_return_status := FND_API.G_RET_STS_ERROR;
917: IF FND_MSG_PUB.Check_Msg_Level
918: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
919: THEN
920: FND_MSG_PUB.Add_Exc_Msg
921: ( G_PKG_NAME ,
914:
915: ROLLBACK TO create_item_routes_PVT;
916: x_return_status := FND_API.G_RET_STS_ERROR;
917: IF FND_MSG_PUB.Check_Msg_Level
918: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
919: THEN
920: FND_MSG_PUB.Add_Exc_Msg
921: ( G_PKG_NAME ,
922: l_api_name
916: x_return_status := FND_API.G_RET_STS_ERROR;
917: IF FND_MSG_PUB.Check_Msg_Level
918: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
919: THEN
920: FND_MSG_PUB.Add_Exc_Msg
921: ( G_PKG_NAME ,
922: l_api_name
923: );
924: END IF;
922: l_api_name
923: );
924: END IF;
925:
926: FND_MSG_PUB.Count_And_Get
927: ( p_count => x_msg_count,
928: p_data => x_msg_data
929:
930: );
968: -- Initialize message list if p_init_msg_list is set to TRUE.
969: IF FND_API.to_Boolean( p_init_msg_list )
970: THEN
971:
972: FND_MSG_PUB.initialize;
973: END IF;
974:
975: -- Initialize API return status to SUCCESS
976: x_return_status := FND_API.G_RET_STS_SUCCESS;
1064:
1065: END IF;
1066:
1067: -- Standard callto get message count and if count is 1, get message info.
1068: FND_MSG_PUB.Count_And_Get
1069: ( p_count => x_msg_count,
1070: p_data => x_msg_data
1071: );
1072:
1073: EXCEPTION
1074: WHEN FND_API.G_EXC_ERROR THEN
1075: ROLLBACK TO create_emailproc_rules_PVT;
1076: x_return_status := FND_API.G_RET_STS_ERROR ;
1077: FND_MSG_PUB.Count_And_Get
1078: ( p_count => x_msg_count,
1079: p_data => x_msg_data
1080: );
1081:
1081:
1082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1083: ROLLBACK TO create_emailproc_rules_PVT;
1084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1085: FND_MSG_PUB.Count_And_Get
1086: ( p_count => x_msg_count,
1087: p_data => x_msg_data
1088: );
1089:
1089:
1090: WHEN OTHERS THEN
1091: ROLLBACK TO create_emailproc_rules_PVT;
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093: IF FND_MSG_PUB.Check_Msg_Level
1094: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1095: THEN
1096: FND_MSG_PUB.Add_Exc_Msg
1097: ( G_PKG_NAME ,
1090: WHEN OTHERS THEN
1091: ROLLBACK TO create_emailproc_rules_PVT;
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093: IF FND_MSG_PUB.Check_Msg_Level
1094: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1095: THEN
1096: FND_MSG_PUB.Add_Exc_Msg
1097: ( G_PKG_NAME ,
1098: l_api_name
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093: IF FND_MSG_PUB.Check_Msg_Level
1094: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1095: THEN
1096: FND_MSG_PUB.Add_Exc_Msg
1097: ( G_PKG_NAME ,
1098: l_api_name
1099: );
1100: END IF;
1097: ( G_PKG_NAME ,
1098: l_api_name
1099: );
1100: END IF;
1101: FND_MSG_PUB.Count_And_Get
1102: ( p_count => x_msg_count ,
1103: p_data => x_msg_data
1104: );
1105: END create_item_emailproc_rules;
1136:
1137: -- Initialize message list if p_init_msg_list is set to TRUE.
1138:
1139: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1140: FND_MSG_PUB.initialize;
1141: END IF;
1142:
1143: -- Initialize API return status to SUCCESS
1144:
1211: COMMIT WORK;
1212: END IF;
1213:
1214: -- Standard callto get message count and if count is 1, get message info.
1215: FND_MSG_PUB.Count_And_Get
1216: ( p_count => x_msg_count,
1217: p_data => x_msg_data
1218: );
1219:
1222:
1223: ROLLBACK TO create_item_actions_PVT;
1224:
1225: x_return_status := FND_API.G_RET_STS_ERROR ;
1226: FND_MSG_PUB.Count_And_Get
1227: ( p_count => x_msg_count,
1228: p_data => x_msg_data
1229: );
1230:
1230:
1231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1232: ROLLBACK TO create_item_actions_PVT;
1233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1234: FND_MSG_PUB.Count_And_Get
1235: ( p_count => x_msg_count,
1236:
1237: p_data => x_msg_data
1238: );
1240:
1241: WHEN OTHERS THEN
1242: ROLLBACK TO create_item_actions_PVT;
1243: x_return_status := FND_API.G_RET_STS_ERROR;
1244: IF FND_MSG_PUB.Check_Msg_Level
1245: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1246: THEN
1247: FND_MSG_PUB.Add_Exc_Msg
1248: ( G_PKG_NAME ,
1241: WHEN OTHERS THEN
1242: ROLLBACK TO create_item_actions_PVT;
1243: x_return_status := FND_API.G_RET_STS_ERROR;
1244: IF FND_MSG_PUB.Check_Msg_Level
1245: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1246: THEN
1247: FND_MSG_PUB.Add_Exc_Msg
1248: ( G_PKG_NAME ,
1249: l_api_name
1243: x_return_status := FND_API.G_RET_STS_ERROR;
1244: IF FND_MSG_PUB.Check_Msg_Level
1245: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1246: THEN
1247: FND_MSG_PUB.Add_Exc_Msg
1248: ( G_PKG_NAME ,
1249: l_api_name
1250:
1251: );
1249: l_api_name
1250:
1251: );
1252: END IF;
1253: FND_MSG_PUB.Count_And_Get
1254:
1255: ( p_count => x_msg_count ,
1256: p_data => x_msg_data
1257: );
1291:
1292: -- Initialize message list if p_init_msg_list is set to TRUE.
1293:
1294: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1295: FND_MSG_PUB.initialize;
1296: END IF;
1297:
1298: -- Initialize API return status to SUCCESS
1299:
1370: COMMIT WORK;
1371: END IF;
1372:
1373: -- Standard callto get message count and if count is 1, get message info.
1374: FND_MSG_PUB.Count_And_Get
1375: ( p_count => x_msg_count,
1376: p_data => x_msg_data
1377: );
1378:
1381:
1382: ROLLBACK TO create_item_action_dtls_pvt;
1383:
1384: x_return_status := FND_API.G_RET_STS_ERROR ;
1385: FND_MSG_PUB.Count_And_Get
1386: ( p_count => x_msg_count,
1387: p_data => x_msg_data
1388: );
1389:
1389:
1390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1391: ROLLBACK TO create_item_action_dtls_pvt;
1392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1393: FND_MSG_PUB.Count_And_Get
1394: ( p_count => x_msg_count,
1395:
1396: p_data => x_msg_data
1397: );
1399:
1400: WHEN OTHERS THEN
1401: ROLLBACK TO create_item_action_dtls_pvt;
1402: x_return_status := FND_API.G_RET_STS_ERROR;
1403: IF FND_MSG_PUB.Check_Msg_Level
1404: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1405: THEN
1406: FND_MSG_PUB.Add_Exc_Msg
1407: ( G_PKG_NAME ,
1400: WHEN OTHERS THEN
1401: ROLLBACK TO create_item_action_dtls_pvt;
1402: x_return_status := FND_API.G_RET_STS_ERROR;
1403: IF FND_MSG_PUB.Check_Msg_Level
1404: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1405: THEN
1406: FND_MSG_PUB.Add_Exc_Msg
1407: ( G_PKG_NAME ,
1408: l_api_name
1402: x_return_status := FND_API.G_RET_STS_ERROR;
1403: IF FND_MSG_PUB.Check_Msg_Level
1404: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1405: THEN
1406: FND_MSG_PUB.Add_Exc_Msg
1407: ( G_PKG_NAME ,
1408: l_api_name
1409:
1410: );
1408: l_api_name
1409:
1410: );
1411: END IF;
1412: FND_MSG_PUB.Count_And_Get
1413:
1414: ( p_count => x_msg_count ,
1415: p_data => x_msg_data
1416: );
1452:
1453: --Initialize the message list if p_init_msg_list is set to TRUE
1454:
1455: If FND_API.to_Boolean(p_init_msg_list) THEN
1456: FND_MSG_PUB.initialize;
1457: END IF;
1458:
1459: --Initialize API status return
1460: x_return_status := FND_API.G_RET_STS_SUCCESS;
1498:
1499: WHEN FND_API.G_EXC_ERROR THEN
1500: ROLLBACK TO delete_acct_emailproc_batch;
1501: x_return_status := FND_API.G_RET_STS_ERROR ;
1502: FND_MSG_PUB.Count_And_Get
1503: ( p_count => x_msg_count,p_data => x_msg_data);
1504:
1505: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1506:
1506:
1507: ROLLBACK TO delete_acct_emailproc_batch;
1508:
1509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1510: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,p_data => x_msg_data);
1511:
1512: WHEN OTHERS THEN
1513: ROLLBACK TO delete_acct_emailproc_batch;
1514: x_return_status := FND_API.G_RET_STS_ERROR;
1511:
1512: WHEN OTHERS THEN
1513: ROLLBACK TO delete_acct_emailproc_batch;
1514: x_return_status := FND_API.G_RET_STS_ERROR;
1515: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1516: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , l_api_name);
1517: END IF;
1518:
1519: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count ,p_data => x_msg_data);
1512: WHEN OTHERS THEN
1513: ROLLBACK TO delete_acct_emailproc_batch;
1514: x_return_status := FND_API.G_RET_STS_ERROR;
1515: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1516: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , l_api_name);
1517: END IF;
1518:
1519: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count ,p_data => x_msg_data);
1520:
1515: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1516: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , l_api_name);
1517: END IF;
1518:
1519: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count ,p_data => x_msg_data);
1520:
1521:
1522: END delete_acct_emailproc_batch;
1523: