569: l_interface_run_id := igs_ad_imp_001.g_interface_run_id;
570: l_prog_label := 'igs.plsql.igs_ad_imp_008.prc_pe_relns';
571: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_relns.';
572: l_enable_log := igs_ad_imp_001.g_enable_log;
573: l_request_id := fnd_global.conc_request_id;
574: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
575: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_relns.begin';
576: l_debug_str := 'igs_ad_imp_008.prc_pe_rel';
577: fnd_log.string_with_context( fnd_log.level_procedure,
849: igs_ad_imp_001.logerrormessage(reladdr_rec.interface_reladdr_id,'E014','IGS_AD_RELADDR_INT_ALL');
850: END IF;
851: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
852: IF (l_request_id IS NULL) THEN
853: l_request_id := fnd_global.conc_request_id;
854: END IF;
855: l_label := 'igs.plsql.igs_ad_imp_008.update_addr.exception '||'E014';
856:
857: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
875: igs_ad_imp_001.logerrormessage(reladdr_rec.interface_reladdr_id,'E073','IGS_AD_RELADDR_INT_ALL');
876: END IF;
877: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
878: IF (l_request_id IS NULL) THEN
879: l_request_id := fnd_global.conc_request_id;
880: END IF;
881: l_label := 'igs.plsql.igs_ad_imp_008.update_addr.warning '||'E073';
882:
883: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
923: IF l_return_status IN ('E','U') THEN
924: l_flag_check_status := 'N';
925: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
926: IF (l_request_id IS NULL) THEN
927: l_request_id := fnd_global.conc_request_id;
928: END IF;
929: l_label := 'igs.plsql.igs_ad_imp_008.update_addr.exception1 '||'E244';
930: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
931: fnd_message.set_token('INTERFACE_ID',reladdr_rec.interface_reladdr_id);
976: l_flag_check_status := 'N';
977:
978: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
979: IF (l_request_id IS NULL) THEN
980: l_request_id := fnd_global.conc_request_id;
981: END IF;
982: l_label := 'igs.plsql.igs_ad_imp_008.update_addr.exception2 '||'E244';
983: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
984: fnd_message.set_token('INTERFACE_ID',reladdr_rec.interface_reladdr_id);
1017: WHEN OTHERS THEN
1018: l_msg_data := SQLERRM;
1019: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1020: IF (l_request_id IS NULL) THEN
1021: l_request_id := fnd_global.conc_request_id;
1022: END IF;
1023: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.update_addr_exception'||'E014';
1024: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
1025: fnd_message.set_token('INTERFACE_ID',reladdr_rec.interface_reladdr_id);
1194: l_interface_run_id := igs_ad_imp_001.g_interface_run_id;
1195:
1196: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
1197: IF (l_request_id IS NULL) THEN
1198: l_request_id := fnd_global.conc_request_id;
1199: END IF;
1200:
1201: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.begin';
1202: l_debug_str := 'Igs_Ad_Imp_008.crt_rel_adr.begin';
1393: IF l_return_status IN ('E','U') THEN
1394: l_flag_check_status := 'N';
1395: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1396: IF (l_request_id IS NULL) THEN
1397: l_request_id := fnd_global.conc_request_id;
1398: END IF;
1399: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.exception1 '||'E322';
1400: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
1401: fnd_message.set_token('INTERFACE_ID',reladdr_rec.interface_reladdr_id);
1418: ELSIF l_return_status = 'W' THEN
1419: l_addr_warning := 'Y';
1420: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1421: IF (l_request_id IS NULL) THEN
1422: l_request_id := fnd_global.conc_request_id;
1423: END IF;
1424: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.warning '||'E073';
1425: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
1426: fnd_message.set_token('INTERFACE_ID',reladdr_rec.interface_reladdr_id);
1465: IF l_return_status IN ('E','U') THEN
1466: l_flag_check_status := 'N';
1467: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1468: IF (l_request_id IS NULL) THEN
1469: l_request_id := fnd_global.conc_request_id;
1470: END IF;
1471: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.exception2 '||'E322';
1472: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
1473: fnd_message.set_token('INTERFACE_ID',reladdr_rec.interface_reladdr_id);
1511: l_flag_check_status := 'N';
1512:
1513: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1514: IF (l_request_id IS NULL) THEN
1515: l_request_id := fnd_global.conc_request_id;
1516: END IF;
1517:
1518: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.exception '||'E244';
1519:
1552: EXCEPTION
1553: WHEN OTHERS THEN
1554: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1555: IF (l_request_id IS NULL) THEN
1556: l_request_id := fnd_global.conc_request_id;
1557: END IF;
1558:
1559: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_adr.exception '||'E518';
1560:
1701:
1702: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
1703:
1704: IF (l_request_id IS NULL) THEN
1705: l_request_id := fnd_global.conc_request_id;
1706: END IF;
1707:
1708: l_label := 'igs.plsql.igs_ad_imp_008.prc_rel_con_dtl.begin_prc_rel_con';
1709: l_debug_str := 'Igs_Ad_Imp_008.prc_rel_con_dtl.prc_rel_con';
1928: l_interface_run_id := igs_ad_imp_001.g_interface_run_id;
1929: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
1930:
1931: IF (l_request_id IS NULL) THEN
1932: l_request_id := fnd_global.conc_request_id;
1933: END IF;
1934:
1935: l_label := 'igs.plsql.igs_ad_imp_008.prc_rel_con_dtl.begin';
1936: l_debug_str := 'Igs_Ad_Imp_008.prc_rel_con_dtl';
2150:
2151: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
2152:
2153: IF (l_request_id IS NULL) THEN
2154: l_request_id := fnd_global.conc_request_id;
2155: END IF;
2156:
2157: l_label := 'igs.plsql.igs_ad_imp_008.prc_rel_con_dtl.exception';
2158:
2236:
2237: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
2238:
2239: IF (l_request_id IS NULL) THEN
2240: l_request_id := fnd_global.conc_request_id;
2241: END IF;
2242:
2243: l_label := 'igs.plsql.igs_ad_imp_008.prc_rel_con_dtl.exception '||'E014';
2244:
2275:
2276: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
2277:
2278: IF (l_request_id IS NULL) THEN
2279: l_request_id := fnd_global.conc_request_id;
2280: END IF;
2281:
2282: l_label := 'igs.plsql.igs_ad_imp_008.prc_rel_con_dtl.exception '||'E518';
2283:
2655: l_interface_run_id := igs_ad_imp_001.g_interface_run_id;
2656: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2657:
2658: IF (l_request_id IS NULL) THEN
2659: l_request_id := fnd_global.conc_request_id;
2660: END IF;
2661:
2662: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_acad_his.begin';
2663: l_debug_str := 'Igs_Ad_Imp_008.crt_rel_acad_his';
2835:
2836: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
2837:
2838: IF (l_request_id IS NULL) THEN
2839: l_request_id := fnd_global.conc_request_id;
2840: END IF;
2841:
2842: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_acad_his.exception '||'E014';
2843:
2938:
2939: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
2940:
2941: IF (l_request_id IS NULL) THEN
2942: l_request_id := fnd_global.conc_request_id;
2943: END IF;
2944:
2945: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_acad_his.exception1 '||'E014';
2946:
3052:
3053: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
3054:
3055: IF (l_request_id IS NULL) THEN
3056: l_request_id := fnd_global.conc_request_id;
3057: END IF;
3058:
3059: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_acad_his.exception1 '||'E014';
3060:
3171:
3172: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
3173:
3174: IF (l_request_id IS NULL) THEN
3175: l_request_id := fnd_global.conc_request_id;
3176: END IF;
3177:
3178: l_label := 'igs.plsql.igs_ad_imp_008.crt_rel_acad_his.exception '||'E322';
3179:
3242: l_interface_run_id := igs_ad_imp_001.g_interface_run_id;
3243: lv_var := 'N';
3244: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
3245: IF (l_request_id IS NULL) THEN
3246: l_request_id := fnd_global.conc_request_id;
3247: END IF;
3248:
3249: l_label := 'igs.plsql.igs_ad_imp_008.crt_relns_emp_dtls.begin';
3250: l_debug_str := 'Igs_Ad_Imp_008.Crt_Relns_Emp_Dtls';
3301: END IF;
3302:
3303: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
3304: IF (l_request_id IS NULL) THEN
3305: l_request_id := fnd_global.conc_request_id;
3306: END IF;
3307: l_label := 'igs.plsql.igs_ad_imp_008.crt_relns_emp_dtls.exception';
3308: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
3309: fnd_message.set_token('INTERFACE_ID',p_relemp_rec.interface_relemp_id);
3327: EXCEPTION
3328: WHEN OTHERS THEN
3329: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
3330: IF (l_request_id IS NULL) THEN
3331: l_request_id := fnd_global.conc_request_id;
3332: END IF;
3333:
3334: l_label := 'igs.plsql.igs_ad_imp_008.crt_relns_emp_dtls.exception '||'E518';
3335: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
3397: l_interface_run_id := igs_ad_imp_001.g_interface_run_id;
3398: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
3399:
3400: IF (l_request_id IS NULL) THEN
3401: l_request_id := fnd_global.conc_request_id;
3402: END IF;
3403:
3404: l_label := 'igs.plsql.igs_ad_imp_008.validate_relns_emp_dtls.begin';
3405: l_debug_str := 'Igs_Ad_Imp_008.validate_relns_emp_dtls';
3558:
3559: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
3560:
3561: IF (l_request_id IS NULL) THEN
3562: l_request_id := fnd_global.conc_request_id;
3563: END IF;
3564:
3565: l_label := 'igs.plsql.igs_ad_imp_008.prc_relns_emp_dtls.begin';
3566: l_debug_str := 'Igs_Ad_Imp_008.Prc_Relns_Emp_Dtls';
3745: END IF;
3746:
3747: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
3748: IF (l_request_id IS NULL) THEN
3749: l_request_id := fnd_global.conc_request_id;
3750: END IF;
3751: l_label := 'igs.plsql.igs_ad_imp_008.prc_relns_emp_dtls.exception '||'E014';
3752:
3753: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
3818: );
3819: IF l_return_Status IN ('E','U') THEN
3820: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
3821: IF (l_request_id IS NULL) THEN
3822: l_request_id := fnd_global.conc_request_id;
3823: END IF;
3824: l_label := 'igs.plsql.igs_ad_imp_008.prc_relns_emp_dtls.exception';
3825: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
3826: fnd_message.set_token('INTERFACE_ID',relns_emp_dtls_rec.interface_relemp_id);
3964:
3965: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
3966:
3967: IF (l_request_id IS NULL) THEN
3968: l_request_id := fnd_global.conc_request_id;
3969: END IF;
3970:
3971: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.begin_validate_person_statistics';
3972: l_debug_str := 'Igs_Ad_Imp_008.Validate_Person_Statistics';
4043:
4044: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4045:
4046: IF (l_request_id IS NULL) THEN
4047: l_request_id := fnd_global.conc_request_id;
4048: END IF;
4049:
4050: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception '||'E277';
4051:
4154:
4155: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4156:
4157: IF (l_request_id IS NULL) THEN
4158: l_request_id := fnd_global.conc_request_id;
4159: END IF;
4160:
4161: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception '||'E170';
4162:
4199:
4200: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
4201:
4202: IF (l_request_id IS NULL) THEN
4203: l_request_id := fnd_global.conc_request_id;
4204: END IF;
4205:
4206: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.begin_crt_pe_stat';
4207: l_debug_str := 'Igs_Ad_Imp_008.Crt_Pe_Stat';
4321:
4322: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4323:
4324: IF (l_request_id IS NULL) THEN
4325: l_request_id := fnd_global.conc_request_id;
4326: END IF;
4327:
4328: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception '||'E005';
4329:
4371:
4372: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4373:
4374: IF (l_request_id IS NULL) THEN
4375: l_request_id := fnd_global.conc_request_id;
4376: END IF;
4377:
4378: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception2';
4379:
4406:
4407: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
4408:
4409: IF (l_request_id IS NULL) THEN
4410: l_request_id := fnd_global.conc_request_id;
4411: END IF;
4412:
4413: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.begin';
4414: l_debug_str := 'Igs_Ad_Imp_008.Prc_Pe_Stat_Main';
4744:
4745: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4746:
4747: IF (l_request_id IS NULL) THEN
4748: l_request_id := fnd_global.conc_request_id;
4749: END IF;
4750:
4751: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception '||'E014';
4752:
4789:
4790: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4791:
4792: IF (l_request_id IS NULL) THEN
4793: l_request_id := fnd_global.conc_request_id;
4794: END IF;
4795:
4796: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception '||'E518';
4797:
4927:
4928: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4929:
4930: IF (l_request_id IS NULL) THEN
4931: l_request_id := fnd_global.conc_request_id;
4932: END IF;
4933:
4934: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception1';
4935:
4973:
4974: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
4975:
4976: IF (l_request_id IS NULL) THEN
4977: l_request_id := fnd_global.conc_request_id;
4978: END IF;
4979:
4980: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception2';
4981:
5010:
5011: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5012:
5013: IF (l_request_id IS NULL) THEN
5014: l_request_id := fnd_global.conc_request_id;
5015: END IF;
5016:
5017: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception3';
5018:
5056:
5057: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5058:
5059: IF (l_request_id IS NULL) THEN
5060: l_request_id := fnd_global.conc_request_id;
5061: END IF;
5062:
5063: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_main.exception '||'E518';
5064:
5169: -- Call Log header
5170: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
5171:
5172: IF (l_request_id IS NULL) THEN
5173: l_request_id := fnd_global.conc_request_id;
5174: END IF;
5175:
5176: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.begin_crt_biodemo';
5177: l_debug_str := 'Igs_Ad_Imp_008.prc_pe_stat_biodemo.crt_biodemo';
5218:
5219: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5220:
5221: IF (l_request_id IS NULL) THEN
5222: l_request_id := fnd_global.conc_request_id;
5223: END IF;
5224:
5225: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.exception '||'E161';
5226:
5290:
5291: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
5292:
5293: IF (l_request_id IS NULL) THEN
5294: l_request_id := fnd_global.conc_request_id;
5295: END IF;
5296:
5297: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.begin_validate_record';
5298: l_debug_str := 'Igs_Ad_Imp_008.prc_pe_stat_biodemo.Validate_Record';
5386:
5387: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5388:
5389: IF (l_request_id IS NULL) THEN
5390: l_request_id := fnd_global.conc_request_id;
5391: END IF;
5392:
5393: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.validate_record';
5394:
5425:
5426: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
5427:
5428: IF (l_request_id IS NULL) THEN
5429: l_request_id := fnd_global.conc_request_id;
5430: END IF;
5431:
5432: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.begin';
5433: l_debug_str := 'Igs_Ad_Imp_008.Prc_Pe_Stat_Biodemo';
5625:
5626: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5627:
5628: IF (l_request_id IS NULL) THEN
5629: l_request_id := fnd_global.conc_request_id;
5630: END IF;
5631:
5632: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.exception '||'E090';
5633:
5716:
5717: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5718:
5719: IF (l_request_id IS NULL) THEN
5720: l_request_id := fnd_global.conc_request_id;
5721: END IF;
5722:
5723: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat_biodemo.exception '||'E089';
5724:
5821: WHEN OTHERS THEN
5822: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
5823:
5824: IF (l_request_id IS NULL) THEN
5825: l_request_id := fnd_global.conc_request_id;
5826: END IF;
5827:
5828: l_label := 'igs.plsql.igs_ad_imp_008.prc_pe_stat.exception1';
5829: l_debug_str := SQLERRM || ' ';