11: -- NOTE :
12: -- End of Comments
13:
14: g_pkg_name CONSTANT VARCHAR2(30):='AMS_EvtRegs_PUB';
15: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
16: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
17: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
18:
19: PROCEDURE Register(
12: -- End of Comments
13:
14: g_pkg_name CONSTANT VARCHAR2(30):='AMS_EvtRegs_PUB';
15: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
16: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
17: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
18:
19: PROCEDURE Register(
20: P_Api_Version_Number IN NUMBER,
13:
14: g_pkg_name CONSTANT VARCHAR2(30):='AMS_EvtRegs_PUB';
15: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
16: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
17: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
18:
19: PROCEDURE Register(
20: P_Api_Version_Number IN NUMBER,
21: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
53:
54: -- Initialize message list if p_init_msg_list is set to TRUE.
55: IF FND_API.to_Boolean( p_init_msg_list )
56: THEN
57: FND_MSG_PUB.initialize;
58: END IF;
59:
60: -- customer pre-processing
61: IF JTF_USR_HKS.ok_to_execute(g_pkg_name, l_api_name, 'PRE', 'C')
159: COMMIT WORK;
160: END IF;
161:
162: x_return_status := FND_API.g_ret_sts_success;
163: FND_MSG_PUB.count_and_get(
164: p_encoded => FND_API.g_false,
165: p_count => x_msg_count,
166: p_data => x_msg_data
167: );
170:
171: WHEN FND_API.g_exc_error THEN
172: ROLLBACK TO Register_pub;
173: x_return_status := FND_API.g_ret_sts_error;
174: FND_MSG_PUB.count_and_get(
175: p_encoded => FND_API.g_false,
176: p_count => x_msg_count,
177: p_data => x_msg_data
178: );
179:
180: WHEN FND_API.g_exc_unexpected_error THEN
181: ROLLBACK TO Register_pub;
182: x_return_status := FND_API.g_ret_sts_unexp_error ;
183: FND_MSG_PUB.count_and_get(
184: p_encoded => FND_API.g_false,
185: p_count => x_msg_count,
186: p_data => x_msg_data
187: );
190: WHEN OTHERS THEN
191: ROLLBACK TO Register_pub;
192: x_return_status := FND_API.g_ret_sts_unexp_error ;
193:
194: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
195: THEN
196: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
197: END IF;
198:
192: x_return_status := FND_API.g_ret_sts_unexp_error ;
193:
194: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
195: THEN
196: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
197: END IF;
198:
199: FND_MSG_PUB.count_and_get(
200: p_encoded => FND_API.g_false,
195: THEN
196: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
197: END IF;
198:
199: FND_MSG_PUB.count_and_get(
200: p_encoded => FND_API.g_false,
201: p_count => x_msg_count,
202: p_data => x_msg_data
203: );
256:
257: -- Initialize message list if p_init_msg_list is set to TRUE.
258: IF FND_API.to_Boolean( p_init_msg_list )
259: THEN
260: FND_MSG_PUB.initialize;
261: END IF;
262:
263:
264: -- Initialize API return status to SUCCESS
361: COMMIT WORK;
362: END IF;
363:
364: x_return_status := FND_API.g_ret_sts_success;
365: FND_MSG_PUB.count_and_get(
366: p_encoded => FND_API.g_false,
367: p_count => x_msg_count,
368: p_data => x_msg_data
369: );
372:
373: WHEN FND_API.g_exc_error THEN
374: ROLLBACK TO update_registration_pub;
375: x_return_status := FND_API.g_ret_sts_error;
376: FND_MSG_PUB.count_and_get(
377: p_encoded => FND_API.g_false,
378: p_count => x_msg_count,
379: p_data => x_msg_data
380: );
381:
382: WHEN FND_API.g_exc_unexpected_error THEN
383: ROLLBACK TO update_registration_pub;
384: x_return_status := FND_API.g_ret_sts_unexp_error ;
385: FND_MSG_PUB.count_and_get(
386: p_encoded => FND_API.g_false,
387: p_count => x_msg_count,
388: p_data => x_msg_data
389: );
392: WHEN OTHERS THEN
393: ROLLBACK TO update_registration_pub;
394: x_return_status := FND_API.g_ret_sts_unexp_error ;
395:
396: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
397: THEN
398: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
399: END IF;
400:
394: x_return_status := FND_API.g_ret_sts_unexp_error ;
395:
396: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
397: THEN
398: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
399: END IF;
400:
401: FND_MSG_PUB.count_and_get(
402: p_encoded => FND_API.g_false,
397: THEN
398: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
399: END IF;
400:
401: FND_MSG_PUB.count_and_get(
402: p_encoded => FND_API.g_false,
403: p_count => x_msg_count,
404: p_data => x_msg_data
405: );
445: END IF;
446: -- Initialize message list if p_init_msg_list is set to TRUE.
447: IF FND_API.to_Boolean( p_init_msg_list )
448: THEN
449: FND_MSG_PUB.initialize;
450: END IF;
451:
452:
453: -- customer pre-processing
572:
573: x_return_status := FND_API.g_ret_sts_success;
574:
575: -- Standard call to get message count and if count is 1, get message info.
576: FND_MSG_PUB.count_and_get(
577: p_encoded => FND_API.g_false,
578: p_count => x_msg_count,
579: p_data => x_msg_data
580: );
583:
584: WHEN FND_API.g_exc_error THEN
585: ROLLBACK TO Cancel_Registration_PUB;
586: x_return_status := FND_API.g_ret_sts_error;
587: FND_MSG_PUB.count_and_get(
588: p_encoded => FND_API.g_false,
589: p_count => x_msg_count,
590: p_data => x_msg_data
591: );
592:
593: WHEN FND_API.g_exc_unexpected_error THEN
594: ROLLBACK TO Cancel_Registration_PUB;
595: x_return_status := FND_API.g_ret_sts_unexp_error ;
596: FND_MSG_PUB.count_and_get(
597: p_encoded => FND_API.g_false,
598: p_count => x_msg_count,
599: p_data => x_msg_data
600: );
603: WHEN OTHERS THEN
604: ROLLBACK TO Cancel_Registration_PUB;
605: x_return_status := FND_API.g_ret_sts_unexp_error ;
606:
607: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
608: THEN
609: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
610: END IF;
611:
605: x_return_status := FND_API.g_ret_sts_unexp_error ;
606:
607: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
608: THEN
609: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
610: END IF;
611:
612: FND_MSG_PUB.count_and_get(
613: p_encoded => FND_API.g_false,
608: THEN
609: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
610: END IF;
611:
612: FND_MSG_PUB.count_and_get(
613: p_encoded => FND_API.g_false,
614: p_count => x_msg_count,
615: p_data => x_msg_data
616: );
649:
650: -- Initialize message list if p_init_msg_list is set to TRUE.
651: IF FND_API.to_Boolean( p_init_msg_list )
652: THEN
653: FND_MSG_PUB.initialize;
654: END IF;
655:
656: -- Initialize API return status to SUCCESS
657: x_return_status := FND_API.G_RET_STS_SUCCESS;
750: COMMIT WORK;
751: END IF;
752:
753: -- Standard call to get message count and if count is 1, get message info.
754: FND_MSG_PUB.count_and_get(
755: p_encoded => FND_API.g_false,
756: p_count => x_msg_count,
757: p_data => x_msg_data
758: );
760: EXCEPTION
761: WHEN FND_API.g_exc_error THEN
762: ROLLBACK TO delete_Registration_PUB;
763: x_return_status := FND_API.g_ret_sts_error;
764: FND_MSG_PUB.count_and_get(
765: p_encoded => FND_API.g_false,
766: p_count => x_msg_count,
767: p_data => x_msg_data
768: );
769:
770: WHEN FND_API.g_exc_unexpected_error THEN
771: ROLLBACK TO delete_Registration_PUB;
772: x_return_status := FND_API.g_ret_sts_unexp_error ;
773: FND_MSG_PUB.count_and_get(
774: p_encoded => FND_API.g_false,
775: p_count => x_msg_count,
776: p_data => x_msg_data
777: );
779: WHEN OTHERS THEN
780: ROLLBACK TO delete_Registration_PUB;
781: x_return_status := FND_API.g_ret_sts_unexp_error ;
782:
783: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
784: THEN
785: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
786: END IF;
787:
781: x_return_status := FND_API.g_ret_sts_unexp_error ;
782:
783: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
784: THEN
785: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
786: END IF;
787:
788: FND_MSG_PUB.count_and_get(
789: p_encoded => FND_API.g_false,
784: THEN
785: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
786: END IF;
787:
788: FND_MSG_PUB.count_and_get(
789: p_encoded => FND_API.g_false,
790: p_count => x_msg_count,
791: p_data => x_msg_data
792: );
840:
841: -- Initialize message list if p_init_msg_list is set to TRUE.
842: IF FND_API.to_Boolean( p_init_msg_list )
843: THEN
844: FND_MSG_PUB.initialize;
845: END IF;
846:
847: -- Initialize API return status to SUCCESS
848: x_return_status := FND_API.G_RET_STS_SUCCESS;
936: COMMIT WORK;
937: END IF;
938:
939: -- Standard call to get message count and if count is 1, get message info.
940: FND_MSG_PUB.count_and_get(
941: p_encoded => FND_API.g_false,
942: p_count => x_msg_count,
943: p_data => x_msg_data
944: );
946: EXCEPTION
947: WHEN FND_API.g_exc_error THEN
948: ROLLBACK TO prioritize_reg_wailist_pub;
949: x_return_status := FND_API.g_ret_sts_error;
950: FND_MSG_PUB.count_and_get(
951: p_encoded => FND_API.g_false,
952: p_count => x_msg_count,
953: p_data => x_msg_data
954: );
955:
956: WHEN FND_API.g_exc_unexpected_error THEN
957: ROLLBACK TO prioritize_reg_wailist_pub;
958: x_return_status := FND_API.g_ret_sts_unexp_error ;
959: FND_MSG_PUB.count_and_get(
960: p_encoded => FND_API.g_false,
961: p_count => x_msg_count,
962: p_data => x_msg_data
963: );
965: WHEN OTHERS THEN
966: ROLLBACK TO prioritize_reg_wailist_pub;
967: x_return_status := FND_API.g_ret_sts_unexp_error ;
968:
969: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
970: THEN
971: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
972: END IF;
973:
967: x_return_status := FND_API.g_ret_sts_unexp_error ;
968:
969: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
970: THEN
971: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
972: END IF;
973:
974: FND_MSG_PUB.count_and_get(
975: p_encoded => FND_API.g_false,
970: THEN
971: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
972: END IF;
973:
974: FND_MSG_PUB.count_and_get(
975: p_encoded => FND_API.g_false,
976: p_count => x_msg_count,
977: p_data => x_msg_data
978: );
1035:
1036: -- Initialize message list if p_init_msg_list is set to TRUE.
1037: IF FND_API.to_Boolean( p_init_msg_list )
1038: THEN
1039: FND_MSG_PUB.initialize;
1040: END IF;
1041:
1042: -- Initialize API return status to SUCCESS
1043: x_return_status := FND_API.G_RET_STS_SUCCESS;
1161: COMMIT WORK;
1162: END IF;
1163:
1164: -- Standard call to get message count and if count is 1, get message info.
1165: FND_MSG_PUB.count_and_get(
1166: p_encoded => FND_API.g_false,
1167: p_count => x_msg_count,
1168: p_data => x_msg_data
1169: );
1171: EXCEPTION
1172: WHEN FND_API.g_exc_error THEN
1173: ROLLBACK TO substitute_enrollee_pub;
1174: x_return_status := FND_API.g_ret_sts_error;
1175: FND_MSG_PUB.count_and_get(
1176: p_encoded => FND_API.g_false,
1177: p_count => x_msg_count,
1178: p_data => x_msg_data
1179: );
1180:
1181: WHEN FND_API.g_exc_unexpected_error THEN
1182: ROLLBACK TO substitute_enrollee_pub;
1183: x_return_status := FND_API.g_ret_sts_unexp_error ;
1184: FND_MSG_PUB.count_and_get(
1185: p_encoded => FND_API.g_false,
1186: p_count => x_msg_count,
1187: p_data => x_msg_data
1188: );
1190: WHEN OTHERS THEN
1191: ROLLBACK TO substitute_enrollee_pub;
1192: x_return_status := FND_API.g_ret_sts_unexp_error ;
1193:
1194: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1195: THEN
1196: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1197: END IF;
1198:
1192: x_return_status := FND_API.g_ret_sts_unexp_error ;
1193:
1194: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1195: THEN
1196: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1197: END IF;
1198:
1199: FND_MSG_PUB.count_and_get(
1200: p_encoded => FND_API.g_false,
1195: THEN
1196: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1197: END IF;
1198:
1199: FND_MSG_PUB.count_and_get(
1200: p_encoded => FND_API.g_false,
1201: p_count => x_msg_count,
1202: p_data => x_msg_data
1203: );
1266:
1267: -- Initialize message list if p_init_msg_list is set to TRUE.
1268: IF FND_API.to_Boolean( p_init_msg_list )
1269: THEN
1270: FND_MSG_PUB.initialize;
1271: END IF;
1272:
1273: -- Initialize API return status to SUCCESS
1274: x_return_status := FND_API.G_RET_STS_SUCCESS;
1412: COMMIT WORK;
1413: END IF;
1414:
1415: -- Standard call to get message count and if count is 1, get message info.
1416: FND_MSG_PUB.count_and_get(
1417: p_encoded => FND_API.g_false,
1418: p_count => x_msg_count,
1419: p_data => x_msg_data
1420: );
1422: EXCEPTION
1423: WHEN FND_API.g_exc_error THEN
1424: ROLLBACK TO transfer_enrollee;
1425: x_return_status := FND_API.g_ret_sts_error;
1426: FND_MSG_PUB.count_and_get(
1427: p_encoded => FND_API.g_false,
1428: p_count => x_msg_count,
1429: p_data => x_msg_data
1430: );
1431:
1432: WHEN FND_API.g_exc_unexpected_error THEN
1433: ROLLBACK TO transfer_enrollee;
1434: x_return_status := FND_API.g_ret_sts_unexp_error ;
1435: FND_MSG_PUB.count_and_get(
1436: p_encoded => FND_API.g_false,
1437: p_count => x_msg_count,
1438: p_data => x_msg_data
1439: );
1441: WHEN OTHERS THEN
1442: ROLLBACK TO transfer_enrollee;
1443: x_return_status := FND_API.g_ret_sts_unexp_error ;
1444:
1445: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1446: THEN
1447: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1448: END IF;
1449:
1443: x_return_status := FND_API.g_ret_sts_unexp_error ;
1444:
1445: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1446: THEN
1447: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1448: END IF;
1449:
1450: FND_MSG_PUB.count_and_get(
1451: p_encoded => FND_API.g_false,
1446: THEN
1447: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1448: END IF;
1449:
1450: FND_MSG_PUB.count_and_get(
1451: p_encoded => FND_API.g_false,
1452: p_count => x_msg_count,
1453: p_data => x_msg_data
1454: );