[Home] [Help]
39: l_debug_prefix VARCHAR2(40) := 'pop_parent_record';
40: BEGIN
41: hz_utility_v2pub.DEBUG(p_message=>'pop_parent_record+',
42: p_prefix=>l_debug_prefix,
43: p_msg_level=>fnd_log.level_procedure);
44:
45: BEGIN
46: l_child_rec_exists_no := 0;
47: SELECT child_id INTO l_child_rec_exists_no
57: IF l_child_rec_exists_no <> 0 THEN
58: -- data already exists, no need to write
59: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
60: p_prefix=>l_debug_prefix,
61: p_msg_level=>fnd_log.level_procedure);
62: END IF;
63: EXCEPTION
64: WHEN NO_DATA_FOUND THEN
65: INSERT INTO HZ_BUS_OBJ_TRACKING
71: END;
72:
73: hz_utility_v2pub.DEBUG(p_message=>'pop_parent_record-',
74: p_prefix=>l_debug_prefix,
75: p_msg_level=>fnd_log.level_procedure);
76: EXCEPTION
77: WHEN NO_DATA_FOUND THEN
78: NULL;
79: END pop_parent_record;
117: l_cen VARCHAR2(30) := 'HZ_WORK_CLASS';
118: BEGIN
119: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_work_class+',
120: p_prefix=>l_debug_prefix,
121: p_msg_level=>fnd_log.level_procedure);
122:
123: -- validate p_operation
124: IF p_operation IN ('I','U') THEN
125: NULL;
125: NULL;
126: ELSE
127: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_work_class',
128: p_prefix=>l_debug_prefix,
129: p_msg_level=>fnd_log.level_procedure);
130: RAISE FND_API.G_EXC_ERROR;
131: END IF;
132:
133: FOR c_child_rec IN c_child LOOP
150: IF l_child_rec_exists_no <> 0 THEN
151: -- data already exists, no need to write
152: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
153: p_prefix=>l_debug_prefix,
154: p_msg_level=>fnd_log.level_procedure);
155: END IF;
156: EXCEPTION
157: WHEN NO_DATA_FOUND THEN
158: INSERT INTO HZ_BUS_OBJ_TRACKING
183: END LOOP;
184:
185: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_work_class-',
186: p_prefix=>l_debug_prefix,
187: p_msg_level=>fnd_log.level_procedure);
188: EXCEPTION
189: WHEN OTHERS THEN
190: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
191: p_prefix=>l_debug_prefix,
188: EXCEPTION
189: WHEN OTHERS THEN
190: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
191: p_prefix=>l_debug_prefix,
192: p_msg_level=>fnd_log.level_procedure);
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END pop_hz_work_class;
195:
196: -----------------------------------------------------------------
234: l_cen VARCHAR2(30) := 'HZ_ROLE_RESPONSIBILITY';
235: BEGIN
236: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_role_responsibility+',
237: p_prefix=>l_debug_prefix,
238: p_msg_level=>fnd_log.level_procedure);
239:
240: -- validate p_operation
241: IF p_operation IN ('I','U') THEN
242: NULL;
242: NULL;
243: ELSE
244: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_role_responsibility',
245: p_prefix=>l_debug_prefix,
246: p_msg_level=>fnd_log.level_procedure);
247: RAISE FND_API.G_EXC_ERROR;
248: END IF;
249:
250: FOR c_child_rec IN C_child LOOP
269: IF l_child_rec_exists_no <> 0 THEN
270: -- data already exists, no need to write
271: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
272: p_prefix=>l_debug_prefix,
273: p_msg_level=>fnd_log.level_procedure);
274: END IF;
275: EXCEPTION
276: WHEN NO_DATA_FOUND THEN
277: INSERT INTO HZ_BUS_OBJ_TRACKING
293: END LOOP;
294:
295: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_role_responsibility-',
296: p_prefix=>l_debug_prefix,
297: p_msg_level=>fnd_log.level_procedure);
298: EXCEPTION
299: WHEN OTHERS THEN
300: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
301: p_prefix=>l_debug_prefix,
298: EXCEPTION
299: WHEN OTHERS THEN
300: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
301: p_prefix=>l_debug_prefix,
302: p_msg_level=>fnd_log.level_procedure);
303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
304: END pop_hz_role_responsibility;
305:
306: -----------------------------------------------------------------
351: l_cen VARCHAR2(30) := 'HZ_RELATIONSHIPS';
352: BEGIN
353: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_relationships+',
354: p_prefix=>l_debug_prefix,
355: p_msg_level=>fnd_log.level_procedure);
356:
357: -- validate p_operation
358: IF p_operation IN ('I','U') THEN
359: NULL;
359: NULL;
360: ELSE
361: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_relationships',
362: p_prefix=>l_debug_prefix,
363: p_msg_level=>fnd_log.level_procedure);
364: RAISE FND_API.G_EXC_ERROR;
365: END IF;
366:
367: FOR c_child_rec IN c_child LOOP
385: IF l_child_rec_exists_no <> 0 THEN
386: -- data already exists, no need to write
387: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
388: p_prefix=>l_debug_prefix,
389: p_msg_level=>fnd_log.level_procedure);
390: END IF;
391: EXCEPTION
392: WHEN NO_DATA_FOUND THEN
393: -- for subject
437: END LOOP;
438:
439: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_relationships-',
440: p_prefix=>l_debug_prefix,
441: p_msg_level=>fnd_log.level_procedure);
442: EXCEPTION
443: WHEN OTHERS THEN
444: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
445: p_prefix=>l_debug_prefix,
442: EXCEPTION
443: WHEN OTHERS THEN
444: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
445: p_prefix=>l_debug_prefix,
446: p_msg_level=>fnd_log.level_procedure);
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END pop_hz_relationships;
449:
450: -----------------------------------------------------------------
482: l_cen VARCHAR2(30) := 'HZ_PERSON_PROFILES';
483: BEGIN
484: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_person_profiles+',
485: p_prefix=>l_debug_prefix,
486: p_msg_level=>fnd_log.level_procedure);
487:
488: -- validate p_operation
489: IF p_operation IN ('I','U') THEN
490: NULL;
490: NULL;
491: ELSE
492: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_person_profiles',
493: p_prefix=>l_debug_prefix,
494: p_msg_level=>fnd_log.level_procedure);
495: RAISE FND_API.G_EXC_ERROR;
496: END IF;
497:
498: FOR c_child_rec IN c_child LOOP
514: IF l_child_rec_exists_no <> 0 THEN
515: -- data already exists, no need to write
516: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
517: p_prefix=>l_debug_prefix,
518: p_msg_level=>fnd_log.level_procedure);
519: END IF;
520: EXCEPTION
521: WHEN NO_DATA_FOUND THEN
522: INSERT INTO HZ_BUS_OBJ_TRACKING
538: END LOOP;
539:
540: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_person_profiles-',
541: p_prefix=>l_debug_prefix,
542: p_msg_level=>fnd_log.level_procedure);
543: EXCEPTION
544: WHEN OTHERS THEN
545: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
546: p_prefix=>l_debug_prefix,
543: EXCEPTION
544: WHEN OTHERS THEN
545: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
546: p_prefix=>l_debug_prefix,
547: p_msg_level=>fnd_log.level_procedure);
548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
549: END pop_hz_person_profiles;
550:
551: -----------------------------------------------------------------
583: l_cen VARCHAR2(30) := 'HZ_PERSON_LANGUAGE';
584: BEGIN
585: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_person_language+',
586: p_prefix=>l_debug_prefix,
587: p_msg_level=>fnd_log.level_procedure);
588:
589: -- validate p_operation
590: IF p_operation IN ('I','U') THEN
591: NULL;
591: NULL;
592: ELSE
593: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_person_language',
594: p_prefix=>l_debug_prefix,
595: p_msg_level=>fnd_log.level_procedure);
596: RAISE FND_API.G_EXC_ERROR;
597: END IF;
598:
599: FOR c_child_rec IN c_child LOOP
615: IF l_child_rec_exists_no <> 0 THEN
616: -- data already exists, no need to write
617: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
618: p_prefix=>l_debug_prefix,
619: p_msg_level=>fnd_log.level_procedure);
620: END IF;
621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
623: INSERT INTO HZ_BUS_OBJ_TRACKING
639: END LOOP;
640:
641: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_person_language-',
642: p_prefix=>l_debug_prefix,
643: p_msg_level=>fnd_log.level_procedure);
644: EXCEPTION
645: WHEN OTHERS THEN
646: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
647: p_prefix=>l_debug_prefix,
644: EXCEPTION
645: WHEN OTHERS THEN
646: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
647: p_prefix=>l_debug_prefix,
648: p_msg_level=>fnd_log.level_procedure);
649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
650: END pop_hz_person_language;
651:
652: -----------------------------------------------------------------
684: l_cen VARCHAR2(30) := 'HZ_PERSON_INTEREST';
685: BEGIN
686: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_person_interest+',
687: p_prefix=>l_debug_prefix,
688: p_msg_level=>fnd_log.level_procedure);
689:
690: -- validate p_operation
691: IF p_operation IN ('I','U') THEN
692: NULL;
692: NULL;
693: ELSE
694: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_person_interest',
695: p_prefix=>l_debug_prefix,
696: p_msg_level=>fnd_log.level_procedure);
697: RAISE FND_API.G_EXC_ERROR;
698: END IF;
699:
700: FOR c_child_rec IN c_child LOOP
716: IF l_child_rec_exists_no <> 0 THEN
717: -- data already exists, no need to write
718: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
719: p_prefix=>l_debug_prefix,
720: p_msg_level=>fnd_log.level_procedure);
721: END IF;
722: EXCEPTION
723: WHEN NO_DATA_FOUND THEN
724: INSERT INTO HZ_BUS_OBJ_TRACKING
740: END LOOP;
741:
742: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_person_interest-',
743: p_prefix=>l_debug_prefix,
744: p_msg_level=>fnd_log.level_procedure);
745: EXCEPTION
746: WHEN OTHERS THEN
747: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
748: p_prefix=>l_debug_prefix,
745: EXCEPTION
746: WHEN OTHERS THEN
747: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
748: p_prefix=>l_debug_prefix,
749: p_msg_level=>fnd_log.level_procedure);
750: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
751: END pop_hz_person_interest;
752:
753: -----------------------------------------------------------------
799: l_cen VARCHAR2(30) := 'HZ_PARTY_SITE_USES';
800: BEGIN
801: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_party_site_uses+',
802: p_prefix=>l_debug_prefix,
803: p_msg_level=>fnd_log.level_procedure);
804:
805: -- validate p_operation
806: IF p_operation IN ('I','U') THEN
807: NULL;
807: NULL;
808: ELSE
809: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_party_site_uses',
810: p_prefix=>l_debug_prefix,
811: p_msg_level=>fnd_log.level_procedure);
812: RAISE FND_API.G_EXC_ERROR;
813: END IF;
814:
815: FOR c_child_rec IN c_child LOOP
843: IF l_child_rec_exists_no <> 0 THEN
844: -- data already exists, no need to write
845: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
846: p_prefix=>l_debug_prefix,
847: p_msg_level=>fnd_log.level_procedure);
848: END IF;
849: EXCEPTION
850: WHEN NO_DATA_FOUND THEN
851: INSERT INTO HZ_BUS_OBJ_TRACKING
858: END LOOP;
859:
860: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_party_site_uses-',
861: p_prefix=>l_debug_prefix,
862: p_msg_level=>fnd_log.level_procedure);
863: EXCEPTION
864: WHEN OTHERS THEN
865: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
866: p_prefix=>l_debug_prefix,
863: EXCEPTION
864: WHEN OTHERS THEN
865: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
866: p_prefix=>l_debug_prefix,
867: p_msg_level=>fnd_log.level_procedure);
868: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
869: END pop_hz_party_site_uses;
870:
871: -----------------------------------------------------------------
924: l_cen VARCHAR2(30) := 'HZ_PARTY_SITES';
925: BEGIN
926: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_party_sites+',
927: p_prefix=>l_debug_prefix,
928: p_msg_level=>fnd_log.level_procedure);
929:
930: -- validate p_operation
931: IF p_operation IN ('I','U') THEN
932: NULL;
932: NULL;
933: ELSE
934: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_party_sites',
935: p_prefix=>l_debug_prefix,
936: p_msg_level=>fnd_log.level_procedure);
937: RAISE FND_API.G_EXC_ERROR;
938: END IF;
939:
940: FOR c_child_rec IN c_child LOOP
969: IF l_child_rec_exists_no <> 0 THEN
970: -- data already exists, no need to write
971: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
972: p_prefix=>l_debug_prefix,
973: p_msg_level=>fnd_log.level_procedure);
974: END IF;
975: EXCEPTION
976: WHEN NO_DATA_FOUND THEN
977: -- populate the child bo code also
985: END LOOP;
986:
987: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_party_sites-',
988: p_prefix=>l_debug_prefix,
989: p_msg_level=>fnd_log.level_procedure);
990: EXCEPTION
991: WHEN OTHERS THEN
992: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
993: p_prefix=>l_debug_prefix,
990: EXCEPTION
991: WHEN OTHERS THEN
992: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
993: p_prefix=>l_debug_prefix,
994: p_msg_level=>fnd_log.level_procedure);
995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
996: END pop_hz_party_sites;
997:
998: -----------------------------------------------------------------
1035: l_cen VARCHAR2(30) := 'HZ_PARTY_PREFERENCES';
1036: BEGIN
1037: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_party_preferences+',
1038: p_prefix=>l_debug_prefix,
1039: p_msg_level=>fnd_log.level_procedure);
1040:
1041: -- validate p_operation
1042: IF p_operation IN ('I','U') THEN
1043: NULL;
1043: NULL;
1044: ELSE
1045: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_party_preferences',
1046: p_prefix=>l_debug_prefix,
1047: p_msg_level=>fnd_log.level_procedure);
1048: RAISE FND_API.G_EXC_ERROR;
1049: END IF;
1050:
1051: FOR c_child_rec IN c_child LOOP
1069: IF l_child_rec_exists_no <> 0 THEN
1070: -- data already exists, no need to write
1071: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1072: p_prefix=>l_debug_prefix,
1073: p_msg_level=>fnd_log.level_procedure);
1074: END IF;
1075: EXCEPTION
1076: WHEN NO_DATA_FOUND THEN
1077: INSERT INTO HZ_BUS_OBJ_TRACKING
1093: END LOOP;
1094:
1095: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_party_preferences-',
1096: p_prefix=>l_debug_prefix,
1097: p_msg_level=>fnd_log.level_procedure);
1098: EXCEPTION
1099: WHEN OTHERS THEN
1100: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1101: p_prefix=>l_debug_prefix,
1098: EXCEPTION
1099: WHEN OTHERS THEN
1100: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1101: p_prefix=>l_debug_prefix,
1102: p_msg_level=>fnd_log.level_procedure);
1103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1104: END pop_hz_party_preferences;
1105:
1106: -----------------------------------------------------------------
1143: l_cen VARCHAR2(30) := 'HZ_ORG_CONTACT_ROLES';
1144: BEGIN
1145: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_org_contact_roles+',
1146: p_prefix=>l_debug_prefix,
1147: p_msg_level=>fnd_log.level_procedure);
1148:
1149: -- validate p_operation
1150: IF p_operation IN ('I','U') THEN
1151: NULL;
1151: NULL;
1152: ELSE
1153: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_org_contact_roles',
1154: p_prefix=>l_debug_prefix,
1155: p_msg_level=>fnd_log.level_procedure);
1156: RAISE FND_API.G_EXC_ERROR;
1157: END IF;
1158:
1159: FOR c_child_rec IN c_child LOOP
1176: IF l_child_rec_exists_no <> 0 THEN
1177: -- data already exists, no need to write
1178: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1179: p_prefix=>l_debug_prefix,
1180: p_msg_level=>fnd_log.level_procedure);
1181: END IF;
1182: EXCEPTION
1183: WHEN NO_DATA_FOUND THEN
1184: INSERT INTO HZ_BUS_OBJ_TRACKING
1200: END LOOP;
1201:
1202: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_org_contact_roles-',
1203: p_prefix=>l_debug_prefix,
1204: p_msg_level=>fnd_log.level_procedure);
1205: EXCEPTION
1206: WHEN OTHERS THEN
1207: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1208: p_prefix=>l_debug_prefix,
1205: EXCEPTION
1206: WHEN OTHERS THEN
1207: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1208: p_prefix=>l_debug_prefix,
1209: p_msg_level=>fnd_log.level_procedure);
1210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1211: END pop_hz_org_contact_roles;
1212:
1213: -----------------------------------------------------------------
1251: l_cen VARCHAR2(30) := 'HZ_ORG_CONTACTS';
1252: BEGIN
1253: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_org_contacts+',
1254: p_prefix=>l_debug_prefix,
1255: p_msg_level=>fnd_log.level_procedure);
1256:
1257: -- validate p_operation
1258: IF p_operation IN ('I','U') THEN
1259: NULL;
1259: NULL;
1260: ELSE
1261: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_org_contacts',
1262: p_prefix=>l_debug_prefix,
1263: p_msg_level=>fnd_log.level_procedure);
1264: RAISE FND_API.G_EXC_ERROR;
1265: END IF;
1266:
1267: FOR c_child_rec IN c_child LOOP
1292: END IF;
1293: -- data already exists, no need to write
1294: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1295: p_prefix=>l_debug_prefix,
1296: p_msg_level=>fnd_log.level_procedure);
1297: END IF;
1298: EXCEPTION
1299: WHEN NO_DATA_FOUND THEN
1300: -- populate the child bo code also
1326: END LOOP;
1327:
1328: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_org_contacts-',
1329: p_prefix=>l_debug_prefix,
1330: p_msg_level=>fnd_log.level_procedure);
1331: EXCEPTION
1332: WHEN OTHERS THEN
1333: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1334: p_prefix=>l_debug_prefix,
1331: EXCEPTION
1332: WHEN OTHERS THEN
1333: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1334: p_prefix=>l_debug_prefix,
1335: p_msg_level=>fnd_log.level_procedure);
1336: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1337: END pop_hz_org_contacts;
1338:
1339: -----------------------------------------------------------------
1369: l_cen VARCHAR2(30) := 'HZ_ORGANIZATION_PROFILES';
1370: BEGIN
1371: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_organization_profiles+',
1372: p_prefix=>l_debug_prefix,
1373: p_msg_level=>fnd_log.level_procedure);
1374:
1375: -- validate p_operation
1376: IF p_operation IN ('I','U') THEN
1377: NULL;
1377: NULL;
1378: ELSE
1379: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_organization_profiles',
1380: p_prefix=>l_debug_prefix,
1381: p_msg_level=>fnd_log.level_procedure);
1382: RAISE FND_API.G_EXC_ERROR;
1383: END IF;
1384:
1385: FOR c_child_rec IN c_child LOOP
1401: IF l_child_rec_exists_no <> 0 THEN
1402: -- data already exists, no need to write
1403: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1404: p_prefix=>l_debug_prefix,
1405: p_msg_level=>fnd_log.level_procedure);
1406: END IF;
1407: EXCEPTION
1408: WHEN NO_DATA_FOUND THEN
1409: INSERT INTO HZ_BUS_OBJ_TRACKING
1425: END LOOP;
1426:
1427: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_organization_profiles-',
1428: p_prefix=>l_debug_prefix,
1429: p_msg_level=>fnd_log.level_procedure);
1430: EXCEPTION
1431: WHEN OTHERS THEN
1432: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1433: p_prefix=>l_debug_prefix,
1430: EXCEPTION
1431: WHEN OTHERS THEN
1432: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1433: p_prefix=>l_debug_prefix,
1434: p_msg_level=>fnd_log.level_procedure);
1435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1436: END pop_hz_organization_profiles;
1437:
1438: -----------------------------------------------------------------
1476: l_cen VARCHAR2(30) := 'HZ_LOCATIONS';
1477: BEGIN
1478: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_locations+',
1479: p_prefix=>l_debug_prefix,
1480: p_msg_level=>fnd_log.level_procedure);
1481:
1482: -- validate p_operation
1483: IF p_operation IN ('I','U') THEN
1484: NULL;
1484: NULL;
1485: ELSE
1486: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_locations',
1487: p_prefix=>l_debug_prefix,
1488: p_msg_level=>fnd_log.level_procedure);
1489: RAISE FND_API.G_EXC_ERROR;
1490: END IF;
1491:
1492: FOR c_child_rec IN c_child LOOP
1506: IF l_child_rec_exists_no <> 0 THEN
1507: -- data already exists, no need to write
1508: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1509: p_prefix=>l_debug_prefix,
1510: p_msg_level=>fnd_log.level_procedure);
1511: END IF;
1512: EXCEPTION
1513: WHEN NO_DATA_FOUND THEN
1514: OPEN c_ps(l_child_id);
1528: END LOOP;
1529:
1530: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_locations-',
1531: p_prefix=>l_debug_prefix,
1532: p_msg_level=>fnd_log.level_procedure);
1533: EXCEPTION
1534: WHEN OTHERS THEN
1535: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1536: p_prefix=>l_debug_prefix,
1533: EXCEPTION
1534: WHEN OTHERS THEN
1535: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1536: p_prefix=>l_debug_prefix,
1537: p_msg_level=>fnd_log.level_procedure);
1538: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1539: END pop_hz_locations;
1540:
1541: -----------------------------------------------------------------
1577: l_cen VARCHAR2(30) := 'HZ_FINANCIAL_REPORTS';
1578: BEGIN
1579: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_financial_reports+',
1580: p_prefix=>l_debug_prefix,
1581: p_msg_level=>fnd_log.level_procedure);
1582:
1583: -- validate p_operation
1584: IF p_operation IN ('I','U') THEN
1585: NULL;
1585: NULL;
1586: ELSE
1587: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_financial_reports',
1588: p_prefix=>l_debug_prefix,
1589: p_msg_level=>fnd_log.level_procedure);
1590: RAISE FND_API.G_EXC_ERROR;
1591: END IF;
1592:
1593: FOR c_child_rec IN c_child LOOP
1617: END IF;
1618: -- data already exists, no need to write
1619: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1620: p_prefix=>l_debug_prefix,
1621: p_msg_level=>fnd_log.level_procedure);
1622: END IF;
1623: EXCEPTION
1624: WHEN NO_DATA_FOUND THEN
1625: -- populate the child bo code also
1642: END LOOP;
1643:
1644: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_financial_reports-',
1645: p_prefix=>l_debug_prefix,
1646: p_msg_level=>fnd_log.level_procedure);
1647: EXCEPTION
1648: WHEN OTHERS THEN
1649: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1650: p_prefix=>l_debug_prefix,
1647: EXCEPTION
1648: WHEN OTHERS THEN
1649: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1650: p_prefix=>l_debug_prefix,
1651: p_msg_level=>fnd_log.level_procedure);
1652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1653: END pop_hz_financial_reports;
1654:
1655: -----------------------------------------------------------------
1691: l_cen VARCHAR2(30) := 'HZ_FINANCIAL_PROFILE';
1692: BEGIN
1693: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_financial_profile+',
1694: p_prefix=>l_debug_prefix,
1695: p_msg_level=>fnd_log.level_procedure);
1696:
1697: -- validate p_operation
1698: IF p_operation IN ('I','U') THEN
1699: NULL;
1699: NULL;
1700: ELSE
1701: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_financial_profile',
1702: p_prefix=>l_debug_prefix,
1703: p_msg_level=>fnd_log.level_procedure);
1704: RAISE FND_API.G_EXC_ERROR;
1705: END IF;
1706:
1707: FOR c_child_rec IN c_child LOOP
1724: IF l_child_rec_exists_no <> 0 THEN
1725: -- data already exists, no need to write
1726: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1727: p_prefix=>l_debug_prefix,
1728: p_msg_level=>fnd_log.level_procedure);
1729: END IF;
1730: EXCEPTION
1731: WHEN NO_DATA_FOUND THEN
1732: INSERT INTO HZ_BUS_OBJ_TRACKING
1748: END LOOP;
1749:
1750: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_financial_profile-',
1751: p_prefix=>l_debug_prefix,
1752: p_msg_level=>fnd_log.level_procedure);
1753: EXCEPTION
1754: WHEN OTHERS THEN
1755: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1756: p_prefix=>l_debug_prefix,
1753: EXCEPTION
1754: WHEN OTHERS THEN
1755: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1756: p_prefix=>l_debug_prefix,
1757: p_msg_level=>fnd_log.level_procedure);
1758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1759: END pop_hz_financial_profile;
1760:
1761: -----------------------------------------------------------------
1796: l_cen VARCHAR2(30) := 'HZ_FINANCIAL_NUMBERS';
1797: BEGIN
1798: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_financial_numbers+',
1799: p_prefix=>l_debug_prefix,
1800: p_msg_level=>fnd_log.level_procedure);
1801:
1802: -- validate p_operation
1803: IF p_operation IN ('I','U') THEN
1804: NULL;
1804: NULL;
1805: ELSE
1806: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_financial_numbers',
1807: p_prefix=>l_debug_prefix,
1808: p_msg_level=>fnd_log.level_procedure);
1809: RAISE FND_API.G_EXC_ERROR;
1810: END IF;
1811:
1812: FOR c_child_rec IN c_child LOOP
1829: IF l_child_rec_exists_no <> 0 THEN
1830: -- data already exists, no need to write
1831: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1832: p_prefix=>l_debug_prefix,
1833: p_msg_level=>fnd_log.level_procedure);
1834: END IF;
1835: EXCEPTION
1836: WHEN NO_DATA_FOUND THEN
1837: INSERT INTO HZ_BUS_OBJ_TRACKING
1862: END LOOP;
1863:
1864: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_financial_numbers-',
1865: p_prefix=>l_debug_prefix,
1866: p_msg_level=>fnd_log.level_procedure);
1867: EXCEPTION
1868: WHEN OTHERS THEN
1869: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1870: p_prefix=>l_debug_prefix,
1867: EXCEPTION
1868: WHEN OTHERS THEN
1869: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1870: p_prefix=>l_debug_prefix,
1871: p_msg_level=>fnd_log.level_procedure);
1872: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1873: END pop_hz_financial_numbers;
1874:
1875: -----------------------------------------------------------------
1909: l_cen VARCHAR2(30) := 'HZ_EMPLOYMENT_HISTORY';
1910: BEGIN
1911: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_employment_history+',
1912: p_prefix=>l_debug_prefix,
1913: p_msg_level=>fnd_log.level_procedure);
1914:
1915: -- validate p_operation
1916: IF p_operation IN ('I','U') THEN
1917: NULL;
1917: NULL;
1918: ELSE
1919: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_employment_history',
1920: p_prefix=>l_debug_prefix,
1921: p_msg_level=>fnd_log.level_procedure);
1922: RAISE FND_API.G_EXC_ERROR;
1923: END IF;
1924:
1925: FOR c_child_rec IN c_child LOOP
1948: END IF;
1949: -- data already exists, no need to write
1950: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
1951: p_prefix=>l_debug_prefix,
1952: p_msg_level=>fnd_log.level_procedure);
1953: END IF;
1954: EXCEPTION
1955: WHEN NO_DATA_FOUND THEN
1956: -- populate the child bo code also
1973: END LOOP;
1974:
1975: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_employment_history-',
1976: p_prefix=>l_debug_prefix,
1977: p_msg_level=>fnd_log.level_procedure);
1978: EXCEPTION
1979: WHEN OTHERS THEN
1980: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1981: p_prefix=>l_debug_prefix,
1978: EXCEPTION
1979: WHEN OTHERS THEN
1980: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
1981: p_prefix=>l_debug_prefix,
1982: p_msg_level=>fnd_log.level_procedure);
1983: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1984: END pop_hz_employment_history;
1985:
1986: -----------------------------------------------------------------
2018: l_cen VARCHAR2(30) := 'HZ_EDUCATION';
2019: BEGIN
2020: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_education+',
2021: p_prefix=>l_debug_prefix,
2022: p_msg_level=>fnd_log.level_procedure);
2023:
2024: -- validate p_operation
2025: IF p_operation IN ('I','U') THEN
2026: NULL;
2026: NULL;
2027: ELSE
2028: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_education',
2029: p_prefix=>l_debug_prefix,
2030: p_msg_level=>fnd_log.level_procedure);
2031: RAISE FND_API.G_EXC_ERROR;
2032: END IF;
2033:
2034: FOR c_child_rec IN c_child LOOP
2050: IF l_child_rec_exists_no <> 0 THEN
2051: -- data already exists, no need to write
2052: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2053: p_prefix=>l_debug_prefix,
2054: p_msg_level=>fnd_log.level_procedure);
2055: END IF;
2056: EXCEPTION
2057: WHEN NO_DATA_FOUND THEN
2058: INSERT INTO HZ_BUS_OBJ_TRACKING
2074: END LOOP;
2075:
2076: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_education-',
2077: p_prefix=>l_debug_prefix,
2078: p_msg_level=>fnd_log.level_procedure);
2079: EXCEPTION
2080: WHEN OTHERS THEN
2081: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2082: p_prefix=>l_debug_prefix,
2079: EXCEPTION
2080: WHEN OTHERS THEN
2081: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2082: p_prefix=>l_debug_prefix,
2083: p_msg_level=>fnd_log.level_procedure);
2084: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2085: END pop_hz_education;
2086:
2087: -----------------------------------------------------------------
2121: l_cen VARCHAR2(30) := 'HZ_CUST_SITE_USES_ALL';
2122: BEGIN
2123: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_site_uses_all+',
2124: p_prefix=>l_debug_prefix,
2125: p_msg_level=>fnd_log.level_procedure);
2126:
2127: -- validate p_operation
2128: IF p_operation IN ('I','U') THEN
2129: NULL;
2129: NULL;
2130: ELSE
2131: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_cust_site_uses_all',
2132: p_prefix=>l_debug_prefix,
2133: p_msg_level=>fnd_log.level_procedure);
2134: RAISE FND_API.G_EXC_ERROR;
2135: END IF;
2136:
2137: FOR c_child_rec IN c_child LOOP
2154: IF l_child_rec_exists_no <> 0 THEN
2155: -- data already exists, no need to write
2156: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2157: p_prefix=>l_debug_prefix,
2158: p_msg_level=>fnd_log.level_procedure);
2159: END IF;
2160: EXCEPTION
2161: WHEN NO_DATA_FOUND THEN
2162: -- populate the child bo code also
2170: END LOOP;
2171:
2172: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_site_uses_all-',
2173: p_prefix=>l_debug_prefix,
2174: p_msg_level=>fnd_log.level_procedure);
2175: EXCEPTION
2176: WHEN OTHERS THEN
2177: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2178: p_prefix=>l_debug_prefix,
2175: EXCEPTION
2176: WHEN OTHERS THEN
2177: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2178: p_prefix=>l_debug_prefix,
2179: p_msg_level=>fnd_log.level_procedure);
2180: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2181: END pop_hz_cust_site_uses_all;
2182:
2183: -----------------------------------------------------------------
2222: l_cen VARCHAR2(30) := 'HZ_CUST_PROFILE_AMTS';
2223: BEGIN
2224: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_profile_amts+',
2225: p_prefix=>l_debug_prefix,
2226: p_msg_level=>fnd_log.level_procedure);
2227:
2228: -- validate p_operation
2229: IF p_operation IN ('I','U') THEN
2230: NULL;
2230: NULL;
2231: ELSE
2232: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_cust_profile_amts',
2233: p_prefix=>l_debug_prefix,
2234: p_msg_level=>fnd_log.level_procedure);
2235: RAISE FND_API.G_EXC_ERROR;
2236: END IF;
2237:
2238: FOR c_child_rec IN c_child LOOP
2257: IF l_child_rec_exists_no <> 0 THEN
2258: -- data already exists, no need to write
2259: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2260: p_prefix=>l_debug_prefix,
2261: p_msg_level=>fnd_log.level_procedure);
2262: END IF;
2263: EXCEPTION
2264: WHEN NO_DATA_FOUND THEN
2265: INSERT INTO HZ_BUS_OBJ_TRACKING
2281: END LOOP;
2282:
2283: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_profile_amts-',
2284: p_prefix=>l_debug_prefix,
2285: p_msg_level=>fnd_log.level_procedure);
2286: EXCEPTION
2287: WHEN OTHERS THEN
2288: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2289: p_prefix=>l_debug_prefix,
2286: EXCEPTION
2287: WHEN OTHERS THEN
2288: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2289: p_prefix=>l_debug_prefix,
2290: p_msg_level=>fnd_log.level_procedure);
2291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2292: END pop_hz_cust_profile_amts;
2293:
2294: -----------------------------------------------------------------
2333: l_cen VARCHAR2(30) := 'HZ_CUST_ACCT_SITES_ALL';
2334: BEGIN
2335: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_acct_sites_all+',
2336: p_prefix=>l_debug_prefix,
2337: p_msg_level=>fnd_log.level_procedure);
2338:
2339: -- validate p_operation
2340: IF p_operation IN ('I','U') THEN
2341: NULL;
2341: NULL;
2342: ELSE
2343: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_cust_acct_sites_all',
2344: p_prefix=>l_debug_prefix,
2345: p_msg_level=>fnd_log.level_procedure);
2346: RAISE FND_API.G_EXC_ERROR;
2347: END IF;
2348:
2349: FOR c_child_rec IN c_child LOOP
2374: END IF;
2375: -- data already exists, no need to write
2376: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2377: p_prefix=>l_debug_prefix,
2378: p_msg_level=>fnd_log.level_procedure);
2379: END IF;
2380: EXCEPTION
2381: WHEN NO_DATA_FOUND THEN
2382: -- populate the child bo code also
2390: END LOOP;
2391:
2392: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_acct_sites_all-',
2393: p_prefix=>l_debug_prefix,
2394: p_msg_level=>fnd_log.level_procedure);
2395: EXCEPTION
2396: WHEN OTHERS THEN
2397: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2398: p_prefix=>l_debug_prefix,
2395: EXCEPTION
2396: WHEN OTHERS THEN
2397: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2398: p_prefix=>l_debug_prefix,
2399: p_msg_level=>fnd_log.level_procedure);
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: END pop_hz_cust_acct_sites_all;
2402:
2403: -----------------------------------------------------------------
2453: l_cen VARCHAR2(30) := 'HZ_CUST_ACCT_RELATE_ALL';
2454: BEGIN
2455: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_acct_relate_all+',
2456: p_prefix=>l_debug_prefix,
2457: p_msg_level=>fnd_log.level_procedure);
2458:
2459: -- validate p_operation
2460: IF p_operation IN ('I','U') THEN
2461: NULL;
2461: NULL;
2462: ELSE
2463: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_cust_acct_relate_all',
2464: p_prefix=>l_debug_prefix,
2465: p_msg_level=>fnd_log.level_procedure);
2466: RAISE FND_API.G_EXC_ERROR;
2467: END IF;
2468:
2469: FOR c_child_rec IN c_child LOOP
2490: IF l_child_rec_exists_no <> 0 THEN
2491: -- data already exists, no need to write
2492: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2493: p_prefix=>l_debug_prefix,
2494: p_msg_level=>fnd_log.level_procedure);
2495: END IF;
2496: EXCEPTION
2497: WHEN NO_DATA_FOUND THEN
2498: INSERT INTO HZ_BUS_OBJ_TRACKING
2545: END LOOP;
2546:
2547: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_acct_relate_all-',
2548: p_prefix=>l_debug_prefix,
2549: p_msg_level=>fnd_log.level_procedure);
2550: EXCEPTION
2551: WHEN OTHERS THEN
2552: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2553: p_prefix=>l_debug_prefix,
2550: EXCEPTION
2551: WHEN OTHERS THEN
2552: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2553: p_prefix=>l_debug_prefix,
2554: p_msg_level=>fnd_log.level_procedure);
2555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2556: END pop_hz_cust_acct_relate_all;
2557:
2558: -----------------------------------------------------------------
2601: l_cen VARCHAR2(30) := 'HZ_CUST_ACCOUNT_ROLES';
2602: BEGIN
2603: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_account_roles+',
2604: p_prefix=>l_debug_prefix,
2605: p_msg_level=>fnd_log.level_procedure);
2606:
2607: -- validate p_operation
2608: IF p_operation IN ('I','U') THEN
2609: NULL;
2609: NULL;
2610: ELSE
2611: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_cust_account_roles',
2612: p_prefix=>l_debug_prefix,
2613: p_msg_level=>fnd_log.level_procedure);
2614: RAISE FND_API.G_EXC_ERROR;
2615: END IF;
2616:
2617: FOR c_child_rec IN c_child LOOP
2641: END IF;
2642: -- data already exists, no need to write
2643: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2644: p_prefix=>l_debug_prefix,
2645: p_msg_level=>fnd_log.level_procedure);
2646: END IF;
2647: EXCEPTION
2648: WHEN NO_DATA_FOUND THEN
2649: -- populate the child bo code also
2657: END LOOP;
2658:
2659: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_account_roles-',
2660: p_prefix=>l_debug_prefix,
2661: p_msg_level=>fnd_log.level_procedure);
2662: EXCEPTION
2663: WHEN OTHERS THEN
2664: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2665: p_prefix=>l_debug_prefix,
2662: EXCEPTION
2663: WHEN OTHERS THEN
2664: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2665: p_prefix=>l_debug_prefix,
2666: p_msg_level=>fnd_log.level_procedure);
2667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2668: END pop_hz_cust_account_roles;
2669:
2670: -----------------------------------------------------------------
2707: l_cen VARCHAR2(30) := 'HZ_CUST_ACCOUNTS';
2708: BEGIN
2709: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_accounts+',
2710: p_prefix=>l_debug_prefix,
2711: p_msg_level=>fnd_log.level_procedure);
2712:
2713: -- validate p_operation
2714: IF p_operation IN ('I','U') THEN
2715: NULL;
2715: NULL;
2716: ELSE
2717: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_cust_accounts',
2718: p_prefix=>l_debug_prefix,
2719: p_msg_level=>fnd_log.level_procedure);
2720: RAISE FND_API.G_EXC_ERROR;
2721: END IF;
2722:
2723: FOR c_child_rec IN c_child LOOP
2747: END IF;
2748: -- data already exists, no need to write
2749: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2750: p_prefix=>l_debug_prefix,
2751: p_msg_level=>fnd_log.level_procedure);
2752: END IF;
2753: EXCEPTION
2754: WHEN NO_DATA_FOUND THEN
2755: -- populate the child bo code also
2763: END LOOP;
2764:
2765: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_cust_accounts-',
2766: p_prefix=>l_debug_prefix,
2767: p_msg_level=>fnd_log.level_procedure);
2768: EXCEPTION
2769: WHEN OTHERS THEN
2770: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2771: p_prefix=>l_debug_prefix,
2768: EXCEPTION
2769: WHEN OTHERS THEN
2770: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2771: p_prefix=>l_debug_prefix,
2772: p_msg_level=>fnd_log.level_procedure);
2773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2774: END pop_hz_cust_accounts;
2775:
2776: -----------------------------------------------------------------
2815: l_cen VARCHAR2(30) := 'HZ_CUSTOMER_PROFILES';
2816: BEGIN
2817: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_customer_profiles+',
2818: p_prefix=>l_debug_prefix,
2819: p_msg_level=>fnd_log.level_procedure);
2820:
2821: -- validate p_operation
2822: IF p_operation IN ('I','U') THEN
2823: NULL;
2823: NULL;
2824: ELSE
2825: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_customer_profiles',
2826: p_prefix=>l_debug_prefix,
2827: p_msg_level=>fnd_log.level_procedure);
2828: RAISE FND_API.G_EXC_ERROR;
2829: END IF;
2830:
2831: FOR c_child_rec IN c_child LOOP
2859: END IF;
2860: -- data already exists, no need to write
2861: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2862: p_prefix=>l_debug_prefix,
2863: p_msg_level=>fnd_log.level_procedure);
2864: END IF;
2865: EXCEPTION
2866: WHEN NO_DATA_FOUND THEN
2867: -- populate the child bo code also
2876: END LOOP;
2877:
2878: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_customer_profiles-',
2879: p_prefix=>l_debug_prefix,
2880: p_msg_level=>fnd_log.level_procedure);
2881: EXCEPTION
2882: WHEN OTHERS THEN
2883: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2884: p_prefix=>l_debug_prefix,
2881: EXCEPTION
2882: WHEN OTHERS THEN
2883: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2884: p_prefix=>l_debug_prefix,
2885: p_msg_level=>fnd_log.level_procedure);
2886: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2887: END pop_hz_customer_profiles;
2888:
2889: -----------------------------------------------------------------
2921: l_cen VARCHAR2(30) := 'HZ_CREDIT_RATINGS';
2922: BEGIN
2923: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_credit_ratings+',
2924: p_prefix=>l_debug_prefix,
2925: p_msg_level=>fnd_log.level_procedure);
2926:
2927: -- validate p_operation
2928: IF p_operation IN ('I','U') THEN
2929: NULL;
2929: NULL;
2930: ELSE
2931: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_credit_ratings',
2932: p_prefix=>l_debug_prefix,
2933: p_msg_level=>fnd_log.level_procedure);
2934: RAISE FND_API.G_EXC_ERROR;
2935: END IF;
2936:
2937: FOR c_child_rec IN c_child LOOP
2953: IF l_child_rec_exists_no <> 0 THEN
2954: -- data already exists, no need to write
2955: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
2956: p_prefix=>l_debug_prefix,
2957: p_msg_level=>fnd_log.level_procedure);
2958: END IF;
2959: EXCEPTION
2960: WHEN NO_DATA_FOUND THEN
2961: INSERT INTO HZ_BUS_OBJ_TRACKING
2976: END LOOP;
2977:
2978: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_credit_ratings-',
2979: p_prefix=>l_debug_prefix,
2980: p_msg_level=>fnd_log.level_procedure);
2981: EXCEPTION
2982: WHEN OTHERS THEN
2983: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2984: p_prefix=>l_debug_prefix,
2981: EXCEPTION
2982: WHEN OTHERS THEN
2983: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
2984: p_prefix=>l_debug_prefix,
2985: p_msg_level=>fnd_log.level_procedure);
2986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2987: END pop_hz_credit_ratings;
2988:
2989: -----------------------------------------------------------------
3059: l_cen VARCHAR2(30) := 'HZ_CONTACT_PREFERENCES';
3060: BEGIN
3061: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_contact_preferences+',
3062: p_prefix=>l_debug_prefix,
3063: p_msg_level=>fnd_log.level_procedure);
3064:
3065: -- validate p_operation
3066: IF p_operation IN ('I','U') THEN
3067: NULL;
3067: NULL;
3068: ELSE
3069: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_contact_preferences',
3070: p_prefix=>l_debug_prefix,
3071: p_msg_level=>fnd_log.level_procedure);
3072: RAISE FND_API.G_EXC_ERROR;
3073: END IF;
3074:
3075: FOR c_child_rec IN c_child LOOP
3136: IF l_child_rec_exists_no <> 0 THEN
3137: -- data already exists, no need to write
3138: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3139: p_prefix=>l_debug_prefix,
3140: p_msg_level=>fnd_log.level_procedure);
3141: END IF;
3142: EXCEPTION
3143: WHEN NO_DATA_FOUND THEN
3144: INSERT INTO HZ_BUS_OBJ_TRACKING
3151: END LOOP;
3152:
3153: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_contact_preferences-',
3154: p_prefix=>l_debug_prefix,
3155: p_msg_level=>fnd_log.level_procedure);
3156: EXCEPTION
3157: WHEN OTHERS THEN
3158: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3159: p_prefix=>l_debug_prefix,
3156: EXCEPTION
3157: WHEN OTHERS THEN
3158: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3159: p_prefix=>l_debug_prefix,
3160: p_msg_level=>fnd_log.level_procedure);
3161: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3162: END pop_hz_contact_preferences;
3163:
3164: -----------------------------------------------------------------
3235: l_cen VARCHAR2(30) := 'HZ_CONTACT_POINTS';
3236: BEGIN
3237: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_contact_points+',
3238: p_prefix=>l_debug_prefix,
3239: p_msg_level=>fnd_log.level_procedure);
3240:
3241: -- validate p_operation
3242: IF p_operation IN ('I','U') THEN
3243: NULL;
3243: NULL;
3244: ELSE
3245: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_contact_points',
3246: p_prefix=>l_debug_prefix,
3247: p_msg_level=>fnd_log.level_procedure);
3248: RAISE FND_API.G_EXC_ERROR;
3249: END IF;
3250:
3251: FOR c_child_rec IN c_child LOOP
3312: IF l_child_rec_exists_no <> 0 THEN
3313: -- data already exists, no need to write
3314: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3315: p_prefix=>l_debug_prefix,
3316: p_msg_level=>fnd_log.level_procedure);
3317: END IF;
3318: EXCEPTION
3319: WHEN NO_DATA_FOUND THEN
3320: -- populate the child bo code also
3328: END LOOP;
3329:
3330: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_contact_points-',
3331: p_prefix=>l_debug_prefix,
3332: p_msg_level=>fnd_log.level_procedure);
3333: EXCEPTION
3334: WHEN OTHERS THEN
3335: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3336: p_prefix=>l_debug_prefix,
3333: EXCEPTION
3334: WHEN OTHERS THEN
3335: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3336: p_prefix=>l_debug_prefix,
3337: p_msg_level=>fnd_log.level_procedure);
3338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3339: END pop_hz_contact_points;
3340:
3341: -----------------------------------------------------------------
3374: l_cen VARCHAR2(30) := 'HZ_CODE_ASSIGNMENTS';
3375: BEGIN
3376: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_code_assignments+',
3377: p_prefix=>l_debug_prefix,
3378: p_msg_level=>fnd_log.level_procedure);
3379:
3380: -- validate p_operation
3381: IF p_operation IN ('I','U') THEN
3382: NULL;
3382: NULL;
3383: ELSE
3384: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_code_assignments',
3385: p_prefix=>l_debug_prefix,
3386: p_msg_level=>fnd_log.level_procedure);
3387: RAISE FND_API.G_EXC_ERROR;
3388: END IF;
3389:
3390: FOR c_child_rec IN c_child LOOP
3407: IF l_child_rec_exists_no <> 0 THEN
3408: -- data already exists, no need to write
3409: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3410: p_prefix=>l_debug_prefix,
3411: p_msg_level=>fnd_log.level_procedure);
3412: END IF;
3413: EXCEPTION
3414: WHEN NO_DATA_FOUND THEN
3415: INSERT INTO HZ_BUS_OBJ_TRACKING
3430: END LOOP;
3431:
3432: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_code_assignments-',
3433: p_prefix=>l_debug_prefix,
3434: p_msg_level=>fnd_log.level_procedure);
3435: EXCEPTION
3436: WHEN OTHERS THEN
3437: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3438: p_prefix=>l_debug_prefix,
3435: EXCEPTION
3436: WHEN OTHERS THEN
3437: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3438: p_prefix=>l_debug_prefix,
3439: p_msg_level=>fnd_log.level_procedure);
3440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3441: END pop_hz_code_assignments;
3442:
3443: -----------------------------------------------------------------
3475: l_cen VARCHAR2(30) := 'HZ_CITIZENSHIP';
3476: BEGIN
3477: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_citizenship+',
3478: p_prefix=>l_debug_prefix,
3479: p_msg_level=>fnd_log.level_procedure);
3480:
3481: -- validate p_operation
3482: IF p_operation IN ('I','U') THEN
3483: NULL;
3483: NULL;
3484: ELSE
3485: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_citizenship',
3486: p_prefix=>l_debug_prefix,
3487: p_msg_level=>fnd_log.level_procedure);
3488: RAISE FND_API.G_EXC_ERROR;
3489: END IF;
3490:
3491: FOR c_child_rec IN c_child LOOP
3507: IF l_child_rec_exists_no <> 0 THEN
3508: -- data already exists, no need to write
3509: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3510: p_prefix=>l_debug_prefix,
3511: p_msg_level=>fnd_log.level_procedure);
3512: END IF;
3513: EXCEPTION
3514: WHEN NO_DATA_FOUND THEN
3515: INSERT INTO HZ_BUS_OBJ_TRACKING
3530: END LOOP;
3531:
3532: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_citizenship-',
3533: p_prefix=>l_debug_prefix,
3534: p_msg_level=>fnd_log.level_procedure);
3535: EXCEPTION
3536: WHEN OTHERS THEN
3537: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3538: p_prefix=>l_debug_prefix,
3535: EXCEPTION
3536: WHEN OTHERS THEN
3537: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3538: p_prefix=>l_debug_prefix,
3539: p_msg_level=>fnd_log.level_procedure);
3540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3541: END pop_hz_citizenship;
3542:
3543: -----------------------------------------------------------------
3578: l_cen VARCHAR2(30) := 'HZ_CERTIFICATIONS';
3579: BEGIN
3580: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_certifications+',
3581: p_prefix=>l_debug_prefix,
3582: p_msg_level=>fnd_log.level_procedure);
3583:
3584: -- validate p_operation
3585: IF p_operation IN ('I','U') THEN
3586: NULL;
3586: NULL;
3587: ELSE
3588: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_certifications',
3589: p_prefix=>l_debug_prefix,
3590: p_msg_level=>fnd_log.level_procedure);
3591: RAISE FND_API.G_EXC_ERROR;
3592: END IF;
3593:
3594: FOR c_child_rec IN c_child LOOP
3610: IF l_child_rec_exists_no <> 0 THEN
3611: -- data already exists, no need to write
3612: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3613: p_prefix=>l_debug_prefix,
3614: p_msg_level=>fnd_log.level_procedure);
3615: END IF;
3616: EXCEPTION
3617: WHEN NO_DATA_FOUND THEN
3618: INSERT INTO HZ_BUS_OBJ_TRACKING
3633: END LOOP;
3634:
3635: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_certifications-',
3636: p_prefix=>l_debug_prefix,
3637: p_msg_level=>fnd_log.level_procedure);
3638: EXCEPTION
3639: WHEN OTHERS THEN
3640: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3641: p_prefix=>l_debug_prefix,
3638: EXCEPTION
3639: WHEN OTHERS THEN
3640: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3641: p_prefix=>l_debug_prefix,
3642: p_msg_level=>fnd_log.level_procedure);
3643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3644: END pop_hz_certifications;
3645: -----------------------------------------------------------------
3646: -- Procedure name: pop_HZ_PARTY_USG_ASSIGNMENTS()
3682: l_cen VARCHAR2(30) := 'HZ_PARTY_USG_ASSIGNMENTS';
3683: BEGIN
3684: hz_utility_v2pub.DEBUG(p_message=>'pop_HZ_PARTY_USG_ASSIGNMENTS+',
3685: p_prefix=>l_debug_prefix,
3686: p_msg_level=>fnd_log.level_procedure);
3687:
3688: -- validate p_operation
3689: IF p_operation IN ('I','U') THEN
3690: NULL;
3690: NULL;
3691: ELSE
3692: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_HZ_PARTY_USG_ASSIGNMENTS',
3693: p_prefix=>l_debug_prefix,
3694: p_msg_level=>fnd_log.level_procedure);
3695: RAISE FND_API.G_EXC_ERROR;
3696: END IF;
3697:
3698: FOR c_child_rec IN c_child LOOP
3714: IF l_child_rec_exists_no <> 0 THEN
3715: -- data already exists, no need to write
3716: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3717: p_prefix=>l_debug_prefix,
3718: p_msg_level=>fnd_log.level_procedure);
3719: END IF;
3720: EXCEPTION
3721: WHEN NO_DATA_FOUND THEN
3722: INSERT INTO HZ_BUS_OBJ_TRACKING
3737: END LOOP;
3738:
3739: hz_utility_v2pub.DEBUG(p_message=>'pop_HZ_PARTY_USG_ASSIGNMENTS-',
3740: p_prefix=>l_debug_prefix,
3741: p_msg_level=>fnd_log.level_procedure);
3742: EXCEPTION
3743: WHEN OTHERS THEN
3744: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3745: p_prefix=>l_debug_prefix,
3742: EXCEPTION
3743: WHEN OTHERS THEN
3744: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3745: p_prefix=>l_debug_prefix,
3746: p_msg_level=>fnd_log.level_procedure);
3747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3748: END pop_HZ_PARTY_USG_ASSIGNMENTS;
3749:
3750: -----------------------------------------------------------------
3806: l_child_rec_exists_no NUMBER;
3807: BEGIN
3808: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_extensibility+',
3809: p_prefix=>l_debug_prefix,
3810: p_msg_level=>fnd_log.level_procedure);
3811:
3812: -- validate p_operation
3813: IF p_operation IN ('I','U') THEN
3814: NULL;
3814: NULL;
3815: ELSE
3816: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_hz_extensibility',
3817: p_prefix=>l_debug_prefix,
3818: p_msg_level=>fnd_log.level_procedure);
3819: RAISE FND_API.G_EXC_ERROR;
3820: END IF;
3821:
3822: IF(p_object_type = 'ORG') THEN
3856: IF l_child_rec_exists_no <> 0 THEN
3857: -- data already exists, no need to write
3858: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3859: p_prefix=>l_debug_prefix,
3860: p_msg_level=>fnd_log.level_procedure);
3861: END IF;
3862: EXCEPTION
3863: WHEN NO_DATA_FOUND THEN
3864: INSERT INTO HZ_BUS_OBJ_TRACKING
3880: END IF;
3881:
3882: hz_utility_v2pub.DEBUG(p_message=>'pop_hz_extensibility-',
3883: p_prefix=>l_debug_prefix,
3884: p_msg_level=>fnd_log.level_procedure);
3885: EXCEPTION
3886: WHEN OTHERS THEN
3887: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3888: p_prefix=>l_debug_prefix,
3885: EXCEPTION
3886: WHEN OTHERS THEN
3887: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
3888: p_prefix=>l_debug_prefix,
3889: p_msg_level=>fnd_log.level_procedure);
3890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3891: END pop_hz_extensibility;
3892:
3893: -----------------------------------------------------------------
3940: l_cen VARCHAR2(30) := 'RA_CUST_RECEIPT_METHODS';
3941: BEGIN
3942: hz_utility_v2pub.DEBUG(p_message=>'pop_ra_cust_receipt_methods+',
3943: p_prefix=>l_debug_prefix,
3944: p_msg_level=>fnd_log.level_procedure);
3945:
3946: -- validate p_operation
3947: IF p_operation IN ('I','U') THEN
3948: NULL;
3948: NULL;
3949: ELSE
3950: hz_utility_v2pub.DEBUG(p_message=> 'incorrect operation flag sent to pop_ra_cust_receipt_methods',
3951: p_prefix=>l_debug_prefix,
3952: p_msg_level=>fnd_log.level_procedure);
3953: RAISE FND_API.G_EXC_ERROR;
3954: END IF;
3955:
3956: FOR c_child_rec IN c_child LOOP
3976: IF l_child_rec_exists_no <> 0 THEN
3977: -- data already exists, no need to write
3978: hz_utility_v2pub.DEBUG(p_message=> 'CHILD record already exists in BOT',
3979: p_prefix=>l_debug_prefix,
3980: p_msg_level=>fnd_log.level_procedure);
3981: END IF;
3982: EXCEPTION
3983: WHEN NO_DATA_FOUND THEN
3984: INSERT INTO HZ_BUS_OBJ_TRACKING
3999: END LOOP;
4000:
4001: hz_utility_v2pub.DEBUG(p_message=>'pop_ra_cust_receipt_methods-',
4002: p_prefix=>l_debug_prefix,
4003: p_msg_level=>fnd_log.level_procedure);
4004: EXCEPTION
4005: WHEN OTHERS THEN
4006: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
4007: p_prefix=>l_debug_prefix,
4004: EXCEPTION
4005: WHEN OTHERS THEN
4006: hz_utility_v2pub.DEBUG(p_message=> SQLERRM,
4007: p_prefix=>l_debug_prefix,
4008: p_msg_level=>fnd_log.level_procedure);
4009: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4010: END pop_ra_cust_receipt_methods;
4011:
4012: FUNCTION is_valid_ps(