111:
112:
113: SAVEPOINT create_rs_group_usage_pvt;
114:
115: x_return_status := fnd_api.g_ret_sts_success;
116:
117: -- DBMS_OUTPUT.put_line('Started Create Resource Group Usage Pvt ');
118:
119:
116:
117: -- DBMS_OUTPUT.put_line('Started Create Resource Group Usage Pvt ');
118:
119:
120: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
121:
122: RAISE fnd_api.g_exc_unexpected_error;
123:
124: END IF;
118:
119:
120: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
121:
122: RAISE fnd_api.g_exc_unexpected_error;
123:
124: END IF;
125:
126:
123:
124: END IF;
125:
126:
127: IF fnd_api.to_boolean(p_init_msg_list) THEN
128:
129: fnd_msg_pub.initialize;
130:
131: END IF;
152: p_group_id => l_group_id,
153: p_usage => l_usage,
154: x_return_status => x_return_status);
155:
156: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
157:
158: -- dbms_output.put_line('Returned Error status from the Pre Customer User Hook');
159:
160: x_return_status := fnd_api.g_ret_sts_unexp_error;
156: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
157:
158: -- dbms_output.put_line('Returned Error status from the Pre Customer User Hook');
159:
160: x_return_status := fnd_api.g_ret_sts_unexp_error;
161:
162: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
163: fnd_msg_pub.add;
164:
161:
162: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
163: fnd_msg_pub.add;
164:
165: RAISE fnd_api.g_exc_unexpected_error;
166:
167: END IF;
168:
169: END IF;
189: p_group_id => l_group_id,
190: p_usage => l_usage,
191: x_return_status => x_return_status);
192:
193: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
194:
195: -- dbms_output.put_line('Returned Error status from the Pre Vertical User Hook');
196:
197: x_return_status := fnd_api.g_ret_sts_unexp_error;
193: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
194:
195: -- dbms_output.put_line('Returned Error status from the Pre Vertical User Hook');
196:
197: x_return_status := fnd_api.g_ret_sts_unexp_error;
198:
199: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
200: fnd_msg_pub.add;
201:
198:
199: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
200: fnd_msg_pub.add;
201:
202: RAISE fnd_api.g_exc_unexpected_error;
203:
204: END IF;
205:
206: END IF;
226: p_group_id => l_group_id,
227: p_usage => l_usage,
228: x_return_status => x_return_status);
229:
230: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
231:
232: x_return_status := fnd_api.g_ret_sts_unexp_error;
233:
234: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
228: x_return_status => x_return_status);
229:
230: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
231:
232: x_return_status := fnd_api.g_ret_sts_unexp_error;
233:
234: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
235: fnd_msg_pub.add;
236:
233:
234: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
235: fnd_msg_pub.add;
236:
237: RAISE fnd_api.g_exc_unexpected_error;
238:
239: END IF;
240:
241: END IF;
255: IF l_check_count > 0 THEN
256:
257: -- dbms_output.put_line('Usage already assigned to the Group');
258:
259: x_return_status := fnd_api.g_ret_sts_error;
260:
261: fnd_message.set_name('JTF', 'JTF_RS_USAGE_EXISTS');
262: fnd_msg_pub.add;
263:
260:
261: fnd_message.set_name('JTF', 'JTF_RS_USAGE_EXISTS');
262: fnd_msg_pub.add;
263:
264: RAISE fnd_api.g_exc_unexpected_error;
265:
266: END IF;
267:
268:
287: CLOSE c_exclusive_group_check;
288:
289: END IF;
290:
291: x_return_status := fnd_api.g_ret_sts_unexp_error;
292:
293: fnd_message.set_name('JTF', 'JTF_RS_EXCLUSIVE_GROUP_ERR');
294: fnd_msg_pub.add;
295:
292:
293: fnd_message.set_name('JTF', 'JTF_RS_EXCLUSIVE_GROUP_ERR');
294: fnd_msg_pub.add;
295:
296: RAISE fnd_api.g_exc_unexpected_error;
297:
298: END IF;
299:
300:
356: IF c_jtf_rs_group_usages%NOTFOUND THEN
357:
358: -- dbms_output.put_line('Error in Table Handler');
359:
360: x_return_status := fnd_api.g_ret_sts_unexp_error;
361:
362: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
363: fnd_msg_pub.add;
364:
367: CLOSE c_jtf_rs_group_usages;
368:
369: END IF;
370:
371: RAISE fnd_api.g_exc_unexpected_error;
372:
373: ELSE
374:
375: -- dbms_output.put_line('Group Usage Successfully Created');
411: p_group_id => l_group_id,
412: p_usage => l_usage,
413: x_return_status => x_return_status);
414:
415: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
416:
417: -- dbms_output.put_line('Returned Error status from the Post Customer User Hook');
418:
419: x_return_status := fnd_api.g_ret_sts_unexp_error;
415: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
416:
417: -- dbms_output.put_line('Returned Error status from the Post Customer User Hook');
418:
419: x_return_status := fnd_api.g_ret_sts_unexp_error;
420:
421: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
422: fnd_msg_pub.add;
423:
420:
421: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
422: fnd_msg_pub.add;
423:
424: RAISE fnd_api.g_exc_unexpected_error;
425:
426: END IF;
427:
428: END IF;
449: p_group_id => l_group_id,
450: p_usage => l_usage,
451: x_return_status => x_return_status);
452:
453: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
454:
455: -- dbms_output.put_line('Returned Error status from the Post Vertical User Hook');
456:
457: x_return_status := fnd_api.g_ret_sts_unexp_error;
453: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
454:
455: -- dbms_output.put_line('Returned Error status from the Post Vertical User Hook');
456:
457: x_return_status := fnd_api.g_ret_sts_unexp_error;
458:
459: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
460: fnd_msg_pub.add;
461:
458:
459: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
460: fnd_msg_pub.add;
461:
462: RAISE fnd_api.g_exc_unexpected_error;
463:
464: END IF;
465:
466: END IF;
487: p_group_id => l_group_id,
488: p_usage => l_usage,
489: x_return_status => x_return_status);
490:
491: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
492:
493: x_return_status := fnd_api.g_ret_sts_unexp_error;
494:
495: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
489: x_return_status => x_return_status);
490:
491: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
492:
493: x_return_status := fnd_api.g_ret_sts_unexp_error;
494:
495: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
496: fnd_msg_pub.add;
497:
494:
495: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
496: fnd_msg_pub.add;
497:
498: RAISE fnd_api.g_exc_unexpected_error;
499:
500: END IF;
501:
502: END IF;
542: p_bind_data_id => l_bind_data_id,
543: x_return_code => x_return_status);
544:
545:
546: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
547:
548: -- dbms_output.put_line('Returned Error status from the Message Generation API');
549:
550: x_return_status := fnd_api.g_ret_sts_unexp_error;
546: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
547:
548: -- dbms_output.put_line('Returned Error status from the Message Generation API');
549:
550: x_return_status := fnd_api.g_ret_sts_unexp_error;
551:
552: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
553: fnd_msg_pub.add;
554:
551:
552: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
553: fnd_msg_pub.add;
554:
555: RAISE fnd_api.g_exc_unexpected_error;
556:
557: END IF;
558:
559: END IF;
561: END IF;
562: END IF;
563:
564:
565: IF fnd_api.to_boolean(p_commit) THEN
566:
567: COMMIT WORK;
568:
569: END IF;
573:
574: EXCEPTION
575:
576:
577: WHEN fnd_api.g_exc_unexpected_error THEN
578:
579: -- DBMS_OUTPUT.put_line (' ========================================== ');
580:
581: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
581: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
582:
583: ROLLBACK TO create_rs_group_usage_pvt;
584:
585: x_return_status := fnd_api.g_ret_sts_unexp_error;
586:
587: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
588:
589:
602: fnd_message.set_token('P_SQLERRM',SQLERRM);
603: fnd_message.set_token('P_API_NAME',l_api_name);
604: FND_MSG_PUB.add;
605:
606: x_return_status := fnd_api.g_ret_sts_unexp_error;
607:
608: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
609:
610:
662:
663:
664: SAVEPOINT delete_group_usage_pvt;
665:
666: x_return_status := fnd_api.g_ret_sts_success;
667:
668: -- DBMS_OUTPUT.put_line(' Started Delete Group Usage Pvt ');
669:
670:
667:
668: -- DBMS_OUTPUT.put_line(' Started Delete Group Usage Pvt ');
669:
670:
671: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
672:
673: RAISE fnd_api.g_exc_unexpected_error;
674:
675: END IF;
669:
670:
671: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
672:
673: RAISE fnd_api.g_exc_unexpected_error;
674:
675: END IF;
676:
677:
674:
675: END IF;
676:
677:
678: IF fnd_api.to_boolean(p_init_msg_list) THEN
679:
680: fnd_msg_pub.initialize;
681:
682: END IF;
703: p_group_id => l_group_id,
704: p_usage => l_usage,
705: x_return_status => x_return_status);
706:
707: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
708:
709: -- dbms_output.put_line('Returned Error status from the Pre Customer User Hook');
710:
711: x_return_status := fnd_api.g_ret_sts_unexp_error;
707: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
708:
709: -- dbms_output.put_line('Returned Error status from the Pre Customer User Hook');
710:
711: x_return_status := fnd_api.g_ret_sts_unexp_error;
712:
713: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
714: fnd_msg_pub.add;
715:
712:
713: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
714: fnd_msg_pub.add;
715:
716: RAISE fnd_api.g_exc_unexpected_error;
717:
718: END IF;
719:
720: END IF;
740: p_group_id => l_group_id,
741: p_usage => l_usage,
742: x_return_status => x_return_status);
743:
744: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
745:
746: -- dbms_output.put_line('Returned Error status from the Pre Vertical User Hook');
747:
748: x_return_status := fnd_api.g_ret_sts_unexp_error;
744: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
745:
746: -- dbms_output.put_line('Returned Error status from the Pre Vertical User Hook');
747:
748: x_return_status := fnd_api.g_ret_sts_unexp_error;
749:
750: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
751: fnd_msg_pub.add;
752:
749:
750: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
751: fnd_msg_pub.add;
752:
753: RAISE fnd_api.g_exc_unexpected_error;
754:
755: END IF;
756:
757: END IF;
777: p_group_id => l_group_id,
778: p_usage => l_usage,
779: x_return_status => x_return_status);
780:
781: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
782:
783: x_return_status := fnd_api.g_ret_sts_unexp_error;
784:
785: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
779: x_return_status => x_return_status);
780:
781: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
782:
783: x_return_status := fnd_api.g_ret_sts_unexp_error;
784:
785: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
786: fnd_msg_pub.add;
787:
784:
785: fnd_message.set_name('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
786: fnd_msg_pub.add;
787:
788: RAISE fnd_api.g_exc_unexpected_error;
789:
790: END IF;
791:
792: END IF;
814: fnd_message.set_token('P_USAGE', l_usage);
815: fnd_message.set_token('P_GROUP_ID', l_group_id);
816: fnd_msg_pub.add;
817:
818: x_return_status := fnd_api.g_ret_sts_unexp_error;
819:
820: RAISE fnd_api.g_exc_unexpected_error;
821:
822: END IF;
816: fnd_msg_pub.add;
817:
818: x_return_status := fnd_api.g_ret_sts_unexp_error;
819:
820: RAISE fnd_api.g_exc_unexpected_error;
821:
822: END IF;
823:
824:
845: fnd_message.set_name('JTF', 'JTF_RS_GRP_USAGE_DEL_ERROR');
846: fnd_message.set_token('P_USAGE', l_usage_name);
847: fnd_msg_pub.add;
848:
849: x_return_status := fnd_api.g_ret_sts_error;
850: RAISE fnd_api.g_exc_error;
851:
852: END IF;
853:
846: fnd_message.set_token('P_USAGE', l_usage_name);
847: fnd_msg_pub.add;
848:
849: x_return_status := fnd_api.g_ret_sts_error;
850: RAISE fnd_api.g_exc_error;
851:
852: END IF;
853:
854: /* Call the lock row procedure to ensure that the object version number
866: WHEN OTHERS THEN
867:
868: -- dbms_output.put_line('Error in Locking the Row');
869:
870: x_return_status := fnd_api.g_ret_sts_unexp_error;
871:
872: fnd_message.set_name('JTF', 'JTF_RS_ROW_LOCK_ERROR');
873: fnd_msg_pub.add;
874:
871:
872: fnd_message.set_name('JTF', 'JTF_RS_ROW_LOCK_ERROR');
873: fnd_msg_pub.add;
874:
875: RAISE fnd_api.g_exc_unexpected_error;
876:
877: END;
878:
879:
893: WHEN NO_DATA_FOUND THEN
894:
895: -- dbms_output.put_line('Error in Table Handler');
896:
897: x_return_status := fnd_api.g_ret_sts_unexp_error;
898:
899: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
900: fnd_msg_pub.add;
901:
898:
899: fnd_message.set_name('JTF', 'JTF_RS_TABLE_HANDLER_ERROR');
900: fnd_msg_pub.add;
901:
902: RAISE fnd_api.g_exc_unexpected_error;
903:
904: END;
905:
906:
926: p_group_id => l_group_id,
927: p_usage => l_usage,
928: x_return_status => x_return_status);
929:
930: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
931:
932: -- dbms_output.put_line('Returned Error status from the Post Customer User Hook');
933:
934: x_return_status := fnd_api.g_ret_sts_unexp_error;
930: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
931:
932: -- dbms_output.put_line('Returned Error status from the Post Customer User Hook');
933:
934: x_return_status := fnd_api.g_ret_sts_unexp_error;
935:
936: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
937: fnd_msg_pub.add;
938:
935:
936: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
937: fnd_msg_pub.add;
938:
939: RAISE fnd_api.g_exc_unexpected_error;
940:
941: END IF;
942:
943: END IF;
963: p_group_id => l_group_id,
964: p_usage => l_usage,
965: x_return_status => x_return_status);
966:
967: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
968:
969: -- dbms_output.put_line('Returned Error status from the Post Vertical User Hook');
970:
971: x_return_status := fnd_api.g_ret_sts_unexp_error;
967: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
968:
969: -- dbms_output.put_line('Returned Error status from the Post Vertical User Hook');
970:
971: x_return_status := fnd_api.g_ret_sts_unexp_error;
972:
973: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
974: fnd_msg_pub.add;
975:
972:
973: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
974: fnd_msg_pub.add;
975:
976: RAISE fnd_api.g_exc_unexpected_error;
977:
978: END IF;
979:
980: END IF;
1000: p_group_id => l_group_id,
1001: p_usage => l_usage,
1002: x_return_status => x_return_status);
1003:
1004: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1005:
1006: x_return_status := fnd_api.g_ret_sts_unexp_error;
1007:
1008: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1002: x_return_status => x_return_status);
1003:
1004: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1005:
1006: x_return_status := fnd_api.g_ret_sts_unexp_error;
1007:
1008: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1009: fnd_msg_pub.add;
1010:
1007:
1008: fnd_message.set_name('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1009: fnd_msg_pub.add;
1010:
1011: RAISE fnd_api.g_exc_unexpected_error;
1012:
1013: END IF;
1014:
1015: END IF;
1055: p_bind_data_id => l_bind_data_id,
1056: x_return_code => x_return_status);
1057:
1058:
1059: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1060:
1061: -- dbms_output.put_line('Returned Error status from the Message Generation API');
1062:
1063: x_return_status := fnd_api.g_ret_sts_unexp_error;
1059: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1060:
1061: -- dbms_output.put_line('Returned Error status from the Message Generation API');
1062:
1063: x_return_status := fnd_api.g_ret_sts_unexp_error;
1064:
1065: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
1066: fnd_msg_pub.add;
1067:
1064:
1065: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
1066: fnd_msg_pub.add;
1067:
1068: RAISE fnd_api.g_exc_unexpected_error;
1069:
1070: END IF;
1071:
1072: END IF;
1074: END IF;
1075: END IF;
1076:
1077:
1078: IF fnd_api.to_boolean(p_commit) THEN
1079:
1080: COMMIT WORK;
1081:
1082: END IF;
1086:
1087: EXCEPTION
1088:
1089:
1090: WHEN fnd_api.g_exc_error THEN
1091:
1092: ROLLBACK TO delete_group_usage_pvt;
1093: x_return_status := fnd_api.g_ret_sts_error;
1094: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1089:
1090: WHEN fnd_api.g_exc_error THEN
1091:
1092: ROLLBACK TO delete_group_usage_pvt;
1093: x_return_status := fnd_api.g_ret_sts_error;
1094: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1095:
1096: WHEN fnd_api.g_exc_unexpected_error THEN
1097:
1092: ROLLBACK TO delete_group_usage_pvt;
1093: x_return_status := fnd_api.g_ret_sts_error;
1094: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1095:
1096: WHEN fnd_api.g_exc_unexpected_error THEN
1097:
1098: -- DBMS_OUTPUT.put_line (' ========================================== ');
1099:
1100: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
1100: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
1101:
1102: ROLLBACK TO delete_group_usage_pvt;
1103:
1104: x_return_status := fnd_api.g_ret_sts_unexp_error;
1105:
1106: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1107:
1108:
1121: fnd_message.set_token('P_SQLERRM',SQLERRM);
1122: fnd_message.set_token('P_API_NAME',l_api_name);
1123: FND_MSG_PUB.add;
1124:
1125: x_return_status := fnd_api.g_ret_sts_unexp_error;
1126:
1127: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1128:
1129: