[Home] [Help]
237: END IF;
238: END IF;
239:
240: IF (set_err_var='Y') THEN
241: raise fnd_api.g_exc_error;
242: END IF;
243:
244: -- End Code for Enh
245:
268:
269: commit;
270:
271: EXCEPTION
272: WHEN fnd_api.g_exc_error
273: THEN
274: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
275: ROLLBACK TO CONC_EMPLOYEE_SP;
276: WHEN fnd_api.g_exc_unexpected_error
272: WHEN fnd_api.g_exc_error
273: THEN
274: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
275: ROLLBACK TO CONC_EMPLOYEE_SP;
276: WHEN fnd_api.g_exc_unexpected_error
277: THEN
278: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
279: ROLLBACK TO CONC_EMPLOYEE_SP;
280: --FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
589:
590: --Standard Start of API SAVEPOINT
591: SAVEPOINT CREATE_EMPLOYEE_SP;
592:
593: l_return_status := fnd_api.g_ret_sts_success;
594:
595: -- Fetch Sales Credit Type if you want to create Salesperson
596: IF (p_create_srp='Y') THEN
597: OPEN c_sales_credit_type_id (l_sales_credit_type);
641: open fetch_phone(fetch_emp_rec.person_id);
642: fetch fetch_phone into l_phone;
643: close fetch_phone;
644:
645: l_return_status := fnd_api.g_ret_sts_success;
646: r_return_status := fnd_api.g_ret_sts_success;
647: s_return_status := fnd_api.g_ret_sts_success;
648:
649: --fetch active emp dates
642: fetch fetch_phone into l_phone;
643: close fetch_phone;
644:
645: l_return_status := fnd_api.g_ret_sts_success;
646: r_return_status := fnd_api.g_ret_sts_success;
647: s_return_status := fnd_api.g_ret_sts_success;
648:
649: --fetch active emp dates
650: l_active_emp_start_date := NULL;
643: close fetch_phone;
644:
645: l_return_status := fnd_api.g_ret_sts_success;
646: r_return_status := fnd_api.g_ret_sts_success;
647: s_return_status := fnd_api.g_ret_sts_success;
648:
649: --fetch active emp dates
650: l_active_emp_start_date := NULL;
651: l_active_emp_end_date := NULL;
691: -- call the public api for create resource
692: /* Fix for bug # 3300436. commented P_END_DATE_ACTIVE */
693: jtf_rs_resource_pub.create_resource
694: ( P_API_VERSION => 1,
695: P_INIT_MSG_LIST => fnd_api.g_true,
696: P_COMMIT => fnd_api.g_false,
697: P_CATEGORY => 'EMPLOYEE',
698: P_SOURCE_ID => fetch_emp_rec.person_id,
699: P_ADDRESS_ID => fetch_emp_rec.address_id,
692: /* Fix for bug # 3300436. commented P_END_DATE_ACTIVE */
693: jtf_rs_resource_pub.create_resource
694: ( P_API_VERSION => 1,
695: P_INIT_MSG_LIST => fnd_api.g_true,
696: P_COMMIT => fnd_api.g_false,
697: P_CATEGORY => 'EMPLOYEE',
698: P_SOURCE_ID => fetch_emp_rec.person_id,
699: P_ADDRESS_ID => fetch_emp_rec.address_id,
700: P_CONTACT_ID => null,
757: P_USER_NAME => l_user_name
758: );
759:
760: -- dbms_output.put_line('name '||fetch_emp_rec.full_name);
761: IF ( l_return_status <> fnd_api.g_ret_sts_success) THEN
762: fnd_message.set_name('JTF', 'JTF_RS_CONC_CREATE_EMP_ERR');
763: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
764: fnd_file.put_line(fnd_file.log, fnd_message.get);
765: FOR i IN 1..l_msg_count
764: fnd_file.put_line(fnd_file.log, fnd_message.get);
765: FOR i IN 1..l_msg_count
766: LOOP
767: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
768: p_encoded => fnd_api.g_false)));
769: END LOOP;
770: fnd_msg_pub.delete_msg;
771: fnd_file.new_line(fnd_file.log,1);
772: raise fnd_api.g_exc_error;
768: p_encoded => fnd_api.g_false)));
769: END LOOP;
770: fnd_msg_pub.delete_msg;
771: fnd_file.new_line(fnd_file.log,1);
772: raise fnd_api.g_exc_error;
773: END IF;
774:
775: -- Code added by repuri (04/09/03) for Enh/Bug # 2828368
776:
819: IF (l_salesperson_number IS NOT NULL AND l_sales_credit_type_id IS NOT NULL) THEN
820: --Create a Salesperson for the Resource Created above
821: JTF_RS_SALESREPS_PUB.CREATE_SALESREP (
822: p_api_version => 1.0,
823: p_init_msg_list => fnd_api.g_true,
824: p_commit => fnd_api.g_false,
825: p_resource_id => l_resource_id,
826: p_sales_credit_type_id => l_sales_credit_type_id,
827: p_salesrep_number => l_salesperson_number,
820: --Create a Salesperson for the Resource Created above
821: JTF_RS_SALESREPS_PUB.CREATE_SALESREP (
822: p_api_version => 1.0,
823: p_init_msg_list => fnd_api.g_true,
824: p_commit => fnd_api.g_false,
825: p_resource_id => l_resource_id,
826: p_sales_credit_type_id => l_sales_credit_type_id,
827: p_salesrep_number => l_salesperson_number,
828: p_name => fetch_emp_rec.full_name,
848: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
849: fnd_file.put_line(fnd_file.log, fnd_message.get);
850: FOR i IN 1..s_msg_count LOOP
851: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
852: p_encoded => fnd_api.g_false)));
853: END LOOP;
854: fnd_msg_pub.delete_msg;
855: fnd_file.new_line(fnd_file.log,1);
856: raise fnd_api.g_exc_error;
852: p_encoded => fnd_api.g_false)));
853: END LOOP;
854: fnd_msg_pub.delete_msg;
855: fnd_file.new_line(fnd_file.log,1);
856: raise fnd_api.g_exc_error;
857: END IF;
858: l_salesrep_extsts := 'Y';
859: END IF;
860: END IF;
877: if not (l_salesrep_extsts = 'N' and l_role_type_code = 'SALES_COMP') then
878:
879: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
880: p_api_version => 1.0,
881: p_init_msg_list => fnd_api.g_true,
882: p_commit => fnd_api.g_false,
883: p_role_resource_type => 'RS_INDIVIDUAL',
884: p_role_resource_id => l_resource_id,
885: p_role_id => i.role_id,
878:
879: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
880: p_api_version => 1.0,
881: p_init_msg_list => fnd_api.g_true,
882: p_commit => fnd_api.g_false,
883: p_role_resource_type => 'RS_INDIVIDUAL',
884: p_role_resource_id => l_resource_id,
885: p_role_id => i.role_id,
886: p_start_date_active => l_asg_start_date,
888: x_msg_count => r_msg_count,
889: x_msg_data => r_msg_data,
890: x_role_relate_id => l_role_relate_id
891: );
892: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
893: l_role_name := NULL;
894: OPEN c_role_name (i.role_id);
895: FETCH c_role_name INTO l_role_name;
896: CLOSE c_role_name;
899: fnd_message.set_token('P_ROLE_NAME',l_role_name);
900: fnd_file.put_line(fnd_file.log, fnd_message.get);
901: FOR i IN 1..r_msg_count LOOP
902: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
903: p_encoded => fnd_api.g_false)));
904: END LOOP;
905: fnd_msg_pub.delete_msg;
906: fnd_file.new_line(fnd_file.log,1);
907: raise fnd_api.g_exc_error;
903: p_encoded => fnd_api.g_false)));
904: END LOOP;
905: fnd_msg_pub.delete_msg;
906: fnd_file.new_line(fnd_file.log,1);
907: raise fnd_api.g_exc_error;
908: END IF;
909: end if; -- End of Check for Sales Comp Roles
910: END LOOP;
911:
919:
920: END IF;
921:
922: EXCEPTION
923: WHEN fnd_api.g_exc_error
924: THEN
925: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
926: ROLLBACK TO create_resource_sp;
927: WHEN fnd_api.g_exc_unexpected_error
923: WHEN fnd_api.g_exc_error
924: THEN
925: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
926: ROLLBACK TO create_resource_sp;
927: WHEN fnd_api.g_exc_unexpected_error
928: THEN
929: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
930: ROLLBACK TO create_resource_sp;
931: WHEN OTHERS
981: close fetch_future_phone;
982:
983:
984:
985: l_return_status := fnd_api.g_ret_sts_success;
986: r_return_status := fnd_api.g_ret_sts_success;
987: s_return_status := fnd_api.g_ret_sts_success;
988:
989: --fetch active emp dates
982:
983:
984:
985: l_return_status := fnd_api.g_ret_sts_success;
986: r_return_status := fnd_api.g_ret_sts_success;
987: s_return_status := fnd_api.g_ret_sts_success;
988:
989: --fetch active emp dates
990: l_active_emp_start_date := NULL;
983:
984:
985: l_return_status := fnd_api.g_ret_sts_success;
986: r_return_status := fnd_api.g_ret_sts_success;
987: s_return_status := fnd_api.g_ret_sts_success;
988:
989: --fetch active emp dates
990: l_active_emp_start_date := NULL;
991: l_active_emp_end_date := NULL;
1023: -- call the public api for create resource
1024: /* Fix for bug # 3300436. commented P_END_DATE_ACTIVE */
1025: jtf_rs_resource_pub.create_resource
1026: ( P_API_VERSION => 1,
1027: P_INIT_MSG_LIST => fnd_api.g_true,
1028: P_COMMIT => fnd_api.g_false,
1029: P_CATEGORY => 'EMPLOYEE',
1030: P_SOURCE_ID => fetch_emp_rec.person_id,
1031: P_ADDRESS_ID => fetch_emp_rec.address_id,
1024: /* Fix for bug # 3300436. commented P_END_DATE_ACTIVE */
1025: jtf_rs_resource_pub.create_resource
1026: ( P_API_VERSION => 1,
1027: P_INIT_MSG_LIST => fnd_api.g_true,
1028: P_COMMIT => fnd_api.g_false,
1029: P_CATEGORY => 'EMPLOYEE',
1030: P_SOURCE_ID => fetch_emp_rec.person_id,
1031: P_ADDRESS_ID => fetch_emp_rec.address_id,
1032: P_CONTACT_ID => null,
1089: P_USER_NAME => l_user_name
1090: );
1091:
1092: -- dbms_output.put_line('name '||fetch_emp_rec.full_name);
1093: IF ( l_return_status <> fnd_api.g_ret_sts_success) THEN
1094:
1095: fnd_message.set_name('JTF', 'JTF_RS_CONC_CREATE_EMP_ERR');
1096: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1097: fnd_file.put_line(fnd_file.log, fnd_message.get);
1097: fnd_file.put_line(fnd_file.log, fnd_message.get);
1098: FOR i IN 1..l_msg_count
1099: LOOP
1100: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1101: p_encoded => fnd_api.g_false)));
1102: END LOOP;
1103: fnd_msg_pub.delete_msg;
1104: fnd_file.new_line(fnd_file.log,1);
1105: raise fnd_api.g_exc_error;
1101: p_encoded => fnd_api.g_false)));
1102: END LOOP;
1103: fnd_msg_pub.delete_msg;
1104: fnd_file.new_line(fnd_file.log,1);
1105: raise fnd_api.g_exc_error;
1106: END IF;
1107:
1108: -- Code added by repuri (04/09/03) for Enh/Bug # 2828368
1109:
1136: IF (l_salesperson_number IS NOT NULL AND l_sales_credit_type_id IS NOT NULL) THEN
1137: --Create a Salesperson for the Resource Created above
1138: JTF_RS_SALESREPS_PUB.CREATE_SALESREP (
1139: p_api_version => 1.0,
1140: p_init_msg_list => fnd_api.g_true,
1141: p_commit => fnd_api.g_false,
1142: p_resource_id => l_resource_id,
1143: p_sales_credit_type_id => l_sales_credit_type_id,
1144: p_salesrep_number => l_salesperson_number,
1137: --Create a Salesperson for the Resource Created above
1138: JTF_RS_SALESREPS_PUB.CREATE_SALESREP (
1139: p_api_version => 1.0,
1140: p_init_msg_list => fnd_api.g_true,
1141: p_commit => fnd_api.g_false,
1142: p_resource_id => l_resource_id,
1143: p_sales_credit_type_id => l_sales_credit_type_id,
1144: p_salesrep_number => l_salesperson_number,
1145: p_name => fetch_emp_rec.full_name,
1166: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1167: fnd_file.put_line(fnd_file.log, fnd_message.get);
1168: FOR i IN 1..s_msg_count LOOP
1169: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1170: p_encoded => fnd_api.g_false)));
1171: END LOOP;
1172: fnd_msg_pub.delete_msg;
1173: fnd_file.new_line(fnd_file.log,1);
1174: raise fnd_api.g_exc_error;
1170: p_encoded => fnd_api.g_false)));
1171: END LOOP;
1172: fnd_msg_pub.delete_msg;
1173: fnd_file.new_line(fnd_file.log,1);
1174: raise fnd_api.g_exc_error;
1175: END IF;
1176: l_salesrep_extsts := 'Y';
1177: END IF;
1178: END IF;
1195: if not (l_salesrep_extsts = 'N' and l_role_type_code = 'SALES_COMP') then
1196:
1197: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
1198: p_api_version => 1.0,
1199: p_init_msg_list => fnd_api.g_true,
1200: p_commit => fnd_api.g_false,
1201: p_role_resource_type => 'RS_INDIVIDUAL',
1202: p_role_resource_id => l_resource_id,
1203: p_role_id => i.role_id,
1196:
1197: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
1198: p_api_version => 1.0,
1199: p_init_msg_list => fnd_api.g_true,
1200: p_commit => fnd_api.g_false,
1201: p_role_resource_type => 'RS_INDIVIDUAL',
1202: p_role_resource_id => l_resource_id,
1203: p_role_id => i.role_id,
1204: p_start_date_active => l_asg_start_date,
1206: x_msg_count => r_msg_count,
1207: x_msg_data => r_msg_data,
1208: x_role_relate_id => l_role_relate_id
1209: );
1210: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
1211: l_role_name := NULL;
1212: OPEN c_role_name (i.role_id);
1213: FETCH c_role_name INTO l_role_name;
1214: CLOSE c_role_name;
1218: fnd_message.set_token('P_ROLE_NAME',l_role_name);
1219: fnd_file.put_line(fnd_file.log, fnd_message.get);
1220: FOR i IN 1..r_msg_count LOOP
1221: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1222: p_encoded => fnd_api.g_false)));
1223: END LOOP;
1224:
1225: fnd_msg_pub.delete_msg;
1226: fnd_file.new_line(fnd_file.log,1);
1223: END LOOP;
1224:
1225: fnd_msg_pub.delete_msg;
1226: fnd_file.new_line(fnd_file.log,1);
1227: raise fnd_api.g_exc_error;
1228: END IF;
1229: end if; -- End of Check for Sales Comp Roles
1230: END LOOP;
1231:
1239:
1240: END IF;
1241:
1242: EXCEPTION
1243: WHEN fnd_api.g_exc_error
1244: THEN
1245: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1246: ROLLBACK TO create_resource_sp;
1247: WHEN fnd_api.g_exc_unexpected_error
1243: WHEN fnd_api.g_exc_error
1244: THEN
1245: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1246: ROLLBACK TO create_resource_sp;
1247: WHEN fnd_api.g_exc_unexpected_error
1248: THEN
1249: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1250: ROLLBACK TO create_resource_sp;
1251: WHEN OTHERS
1263:
1264: FND_MSG_PUB.count_and_get (p_count => l_msg_count, p_data => l_msg_data);
1265:
1266: EXCEPTION
1267: WHEN fnd_api.g_exc_error
1268: THEN
1269: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1270: ROLLBACK TO CREATE_EMPLOYEE_SP;
1271: WHEN fnd_api.g_exc_unexpected_error
1267: WHEN fnd_api.g_exc_error
1268: THEN
1269: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1270: ROLLBACK TO CREATE_EMPLOYEE_SP;
1271: WHEN fnd_api.g_exc_unexpected_error
1272: THEN
1273: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1274: ROLLBACK TO CREATE_EMPLOYEE_SP;
1275: WHEN OTHERS
1378:
1379: --Standard Start of API SAVEPOINT
1380: SAVEPOINT TERMINATE_EMPLOYEE_SP;
1381:
1382: l_return_status := fnd_api.g_ret_sts_success;
1383: l_count := 0;
1384:
1385: FND_PROFILE.GET('JTF_RS_RESOURCE_ACTIVE_DAYS',l_active_days);
1386:
1394: BEGIN
1395:
1396: SAVEPOINT TERMINATE_EMPLOYEE_IN_SP;
1397:
1398: l_return_status := fnd_api.g_ret_sts_success;
1399:
1400: -- Additional Code for the Enh #2660474
1401: IF term_emp_rec.source_id IS NOT NULL THEN
1402:
1454: , x_return_status => l_return_status
1455: , x_msg_count => l_msg_count
1456: , x_msg_data => l_msg_data);
1457:
1458: IF ( l_return_status <> fnd_api.g_ret_sts_success) THEN
1459: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_TER_RES');
1460: fnd_message.set_token('P_RESOURCE_NAME', term_emp_rec.resource_name);
1461: fnd_file.put_line(fnd_file.log, fnd_message.get);
1462: FOR i IN 1..l_msg_count LOOP
1460: fnd_message.set_token('P_RESOURCE_NAME', term_emp_rec.resource_name);
1461: fnd_file.put_line(fnd_file.log, fnd_message.get);
1462: FOR i IN 1..l_msg_count LOOP
1463: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1464: p_encoded => fnd_api.g_false)));
1465: END LOOP;
1466: fnd_msg_pub.delete_msg;
1467: fnd_file.new_line(fnd_file.log,1);
1468: raise fnd_api.g_exc_error;
1464: p_encoded => fnd_api.g_false)));
1465: END LOOP;
1466: fnd_msg_pub.delete_msg;
1467: fnd_file.new_line(fnd_file.log,1);
1468: raise fnd_api.g_exc_error;
1469: END IF;
1470:
1471: -------------------------------------------------------------------------------
1472:
1476: l_count := 1;
1477: end if;
1478:
1479: EXCEPTION
1480: WHEN fnd_api.g_exc_error THEN
1481: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1482: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1483: WHEN fnd_api.g_exc_unexpected_error THEN
1484: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1479: EXCEPTION
1480: WHEN fnd_api.g_exc_error THEN
1481: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1482: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1483: WHEN fnd_api.g_exc_unexpected_error THEN
1484: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1485: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1486: WHEN OTHERS THEN
1487: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1492:
1493: FND_MSG_PUB.count_and_get (p_count => l_msg_count, p_data => l_msg_data);
1494:
1495: EXCEPTION
1496: WHEN fnd_api.g_exc_error
1497: THEN
1498: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1499: ROLLBACK TO TERMINATE_EMPLOYEE_SP;
1500: WHEN OTHERS
2089: END IF;
2090:
2091: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2092: p_api_version => 1.0,
2093: p_init_msg_list => fnd_api.g_true,
2094: p_commit => fnd_api.g_false,
2095: p_role_relate_id => l_job_role_relations_rec.role_relate_id,
2096: p_end_date_active => l_role_relate_end_date_active,--l_asg_end_date,
2097: p_object_version_num => l_job_role_relations_rec.object_version_number,
2090:
2091: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2092: p_api_version => 1.0,
2093: p_init_msg_list => fnd_api.g_true,
2094: p_commit => fnd_api.g_false,
2095: p_role_relate_id => l_job_role_relations_rec.role_relate_id,
2096: p_end_date_active => l_role_relate_end_date_active,--l_asg_end_date,
2097: p_object_version_num => l_job_role_relations_rec.object_version_number,
2098: x_return_status => r_return_status,
2098: x_return_status => r_return_status,
2099: x_msg_count => r_msg_count,
2100: x_msg_data => r_msg_data
2101: );
2102: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
2103: l_role_name := NULL;
2104: OPEN c_role_name (l_job_roles_rec.role_id);
2105: FETCH c_role_name INTO l_role_name;
2106: CLOSE c_role_name;
2109: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2110: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2111: fnd_file.put_line(fnd_file.log, fnd_message.get);
2112: for i in 1..r_msg_count loop
2113: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2114: end loop;
2115: CLOSE c_job_roles;
2116: -- CLOSE c_job_id;
2117: fnd_msg_pub.delete_msg;
2115: CLOSE c_job_roles;
2116: -- CLOSE c_job_id;
2117: fnd_msg_pub.delete_msg;
2118: fnd_file.new_line(fnd_file.log,1);
2119: raise fnd_api.g_exc_error;
2120: ELSE -- r_return_status is success
2121: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2122: debug(p_message=>'Update role Relate is Success ',
2123: p_prefix =>l_debug_prefix,
2179: )
2180: THEN
2181: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2182: p_api_version => 1.0,
2183: p_init_msg_list => fnd_api.g_true,
2184: p_commit => fnd_api.g_false,
2185: p_role_relate_id => l_existing_role_relations.role_relate_id,
2186: p_start_date_active => least(l_asg_start_date,l_existing_role_relations.start_date_active),
2187: p_end_date_active => greatest(l_asg_new_end_date,NVL(l_existing_role_relations.end_date_active,to_date('31/12/4712', 'DD/MM/YYYY'))),
2180: THEN
2181: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2182: p_api_version => 1.0,
2183: p_init_msg_list => fnd_api.g_true,
2184: p_commit => fnd_api.g_false,
2185: p_role_relate_id => l_existing_role_relations.role_relate_id,
2186: p_start_date_active => least(l_asg_start_date,l_existing_role_relations.start_date_active),
2187: p_end_date_active => greatest(l_asg_new_end_date,NVL(l_existing_role_relations.end_date_active,to_date('31/12/4712', 'DD/MM/YYYY'))),
2188: p_object_version_num => l_existing_role_relations.object_version_number,
2189: x_return_status => r_return_status,
2190: x_msg_count => r_msg_count,
2191: x_msg_data => r_msg_data
2192: );
2193: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
2194: l_role_name := NULL;
2195: OPEN c_role_name (l_job_roles_rec.role_id);
2196: FETCH c_role_name INTO l_role_name;
2197: CLOSE c_role_name;
2200: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2201: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2202: fnd_file.put_line(fnd_file.log, fnd_message.get);
2203: for j in 1..r_msg_count loop
2204: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2205: end loop;
2206: fnd_msg_pub.delete_msg;
2207: fnd_file.new_line(fnd_file.log,1);
2208: raise fnd_api.g_exc_error;
2204: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2205: end loop;
2206: fnd_msg_pub.delete_msg;
2207: fnd_file.new_line(fnd_file.log,1);
2208: raise fnd_api.g_exc_error;
2209: END IF;
2210: END IF;
2211: END IF; --c_existing_role_relations
2212: CLOSE c_existing_role_relations;
2243:
2244:
2245: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2246: p_api_version => 1.0,
2247: p_init_msg_list => fnd_api.g_true,
2248: p_commit => fnd_api.g_false,
2249: p_role_relate_id => i.role_relate_id,
2250: p_end_date_active => l_role_relate_end_date_active,--l_asg_start_date-1,
2251: p_object_version_num => i.object_version_number,
2244:
2245: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2246: p_api_version => 1.0,
2247: p_init_msg_list => fnd_api.g_true,
2248: p_commit => fnd_api.g_false,
2249: p_role_relate_id => i.role_relate_id,
2250: p_end_date_active => l_role_relate_end_date_active,--l_asg_start_date-1,
2251: p_object_version_num => i.object_version_number,
2252: x_return_status => r_return_status,
2252: x_return_status => r_return_status,
2253: x_msg_count => r_msg_count,
2254: x_msg_data => r_msg_data
2255: );
2256: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
2257: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2258: debug(p_message=>'Update role Relate is errored out',
2259: p_prefix =>l_debug_prefix,
2260: p_msg_level=>fnd_log.level_statement);
2268: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2269: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2270: fnd_file.put_line(fnd_file.log, fnd_message.get);
2271: for j in 1..r_msg_count loop
2272: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2273: end loop;
2274: fnd_msg_pub.delete_msg;
2275: fnd_file.new_line(fnd_file.log,1);
2276: raise fnd_api.g_exc_error;
2272: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2273: end loop;
2274: fnd_msg_pub.delete_msg;
2275: fnd_file.new_line(fnd_file.log,1);
2276: raise fnd_api.g_exc_error;
2277: ELSE -- r_return_status is success
2278: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2279: debug(p_message=>'Update role Relate is Success ',
2280: p_prefix =>l_debug_prefix,
2333:
2334:
2335: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
2336: p_api_version => 1.0,
2337: p_init_msg_list => fnd_api.g_true,
2338: p_commit => fnd_api.g_false,
2339: p_role_resource_type => 'RS_INDIVIDUAL',
2340: p_role_resource_id => p_resource_id,
2341: p_role_id => l_job_roles_rec.role_id,
2334:
2335: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
2336: p_api_version => 1.0,
2337: p_init_msg_list => fnd_api.g_true,
2338: p_commit => fnd_api.g_false,
2339: p_role_resource_type => 'RS_INDIVIDUAL',
2340: p_role_resource_id => p_resource_id,
2341: p_role_id => l_job_roles_rec.role_id,
2342: p_start_date_active => l_asg_start_date,
2345: x_msg_count => r_msg_count,
2346: x_msg_data => r_msg_data,
2347: x_role_relate_id => l_role_relate_id
2348: );
2349: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
2350: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2351: debug(p_message=>'Creat role Relate is errored out',
2352: p_prefix =>l_debug_prefix,
2353: p_msg_level=>fnd_log.level_statement);
2361: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2362: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2363: fnd_file.put_line(fnd_file.log, fnd_message.get);
2364: for i in 1..r_msg_count loop
2365: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2366: end loop;
2367: fnd_msg_pub.delete_msg;
2368: fnd_file.new_line(fnd_file.log,1);
2369: raise fnd_api.g_exc_error;
2365: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2366: end loop;
2367: fnd_msg_pub.delete_msg;
2368: fnd_file.new_line(fnd_file.log,1);
2369: raise fnd_api.g_exc_error;
2370: ELSE --r_return_status is success
2371: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2372: debug(p_message=>'Create role Relate is Success and Role Relate Id is '||l_role_relate_id,
2373: p_prefix =>l_debug_prefix,
2486: END IF;
2487:
2488: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2489: p_api_version => 1.0,
2490: p_init_msg_list => fnd_api.g_true,
2491: p_commit => fnd_api.g_false,
2492: p_role_relate_id => l_existing_role_relations.role_relate_id,
2493: p_start_date_active => least(l_asg_start_date,l_existing_role_relations.start_date_active),
2494: p_end_date_active => greatest(l_asg_new_end_date,NVL(l_existing_role_relations.end_date_active,to_date('31/12/4712', 'DD/MM/YYYY'))),
2487:
2488: JTF_RS_ROLE_RELATE_PVT.UPDATE_RESOURCE_ROLE_RELATE(
2489: p_api_version => 1.0,
2490: p_init_msg_list => fnd_api.g_true,
2491: p_commit => fnd_api.g_false,
2492: p_role_relate_id => l_existing_role_relations.role_relate_id,
2493: p_start_date_active => least(l_asg_start_date,l_existing_role_relations.start_date_active),
2494: p_end_date_active => greatest(l_asg_new_end_date,NVL(l_existing_role_relations.end_date_active,to_date('31/12/4712', 'DD/MM/YYYY'))),
2495: p_object_version_num => l_existing_role_relations.object_version_number,
2496: x_return_status => r_return_status,
2497: x_msg_count => r_msg_count,
2498: x_msg_data => r_msg_data
2499: );
2500: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
2501: l_role_name := NULL;
2502: OPEN c_role_name (l_job_roles_rec.role_id);
2503: FETCH c_role_name INTO l_role_name;
2504: CLOSE c_role_name;
2507: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2508: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2509: fnd_file.put_line(fnd_file.log, fnd_message.get);
2510: for j in 1..r_msg_count loop
2511: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2512: end loop;
2513: fnd_msg_pub.delete_msg;
2514: fnd_file.new_line(fnd_file.log,1);
2515: raise fnd_api.g_exc_error;
2511: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2512: end loop;
2513: fnd_msg_pub.delete_msg;
2514: fnd_file.new_line(fnd_file.log,1);
2515: raise fnd_api.g_exc_error;
2516: END IF;
2517:
2518: --Bug13682589 End
2519:
2525: p_msg_level=>fnd_log.level_statement);
2526: END IF;
2527: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
2528: p_api_version => 1.0,
2529: p_init_msg_list => fnd_api.g_true,
2530: p_commit => fnd_api.g_false,
2531: p_role_resource_type => 'RS_INDIVIDUAL',
2532: p_role_resource_id => p_resource_id,
2533: p_role_id => l_job_roles_rec.role_id,
2526: END IF;
2527: JTF_RS_ROLE_RELATE_PVT.CREATE_RESOURCE_ROLE_RELATE(
2528: p_api_version => 1.0,
2529: p_init_msg_list => fnd_api.g_true,
2530: p_commit => fnd_api.g_false,
2531: p_role_resource_type => 'RS_INDIVIDUAL',
2532: p_role_resource_id => p_resource_id,
2533: p_role_id => l_job_roles_rec.role_id,
2534: p_start_date_active => l_asg_start_date,
2537: x_msg_count => r_msg_count,
2538: x_msg_data => r_msg_data,
2539: x_role_relate_id => l_role_relate_id
2540: );
2541: IF ( r_return_status <> fnd_api.g_ret_sts_success) THEN
2542: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2543: debug(p_message=>'Create role Relate Errored out.',
2544: p_prefix =>l_debug_prefix,
2545: p_msg_level=>fnd_log.level_statement);
2553: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2554: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2555: fnd_file.put_line(fnd_file.log, fnd_message.get);
2556: for i in 1..r_msg_count loop
2557: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2558: end loop;
2559: fnd_msg_pub.delete_msg;
2560: fnd_file.new_line(fnd_file.log,1);
2561: raise fnd_api.g_exc_error;
2557: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2558: end loop;
2559: fnd_msg_pub.delete_msg;
2560: fnd_file.new_line(fnd_file.log,1);
2561: raise fnd_api.g_exc_error;
2562: ELSE
2563: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2564: debug(p_message=>'Create role Relate is Success and Role Relate Id is '||l_role_relate_id,
2565: p_prefix =>l_debug_prefix,
2626: --Standard Start of API SAVEPOINT
2627:
2628: SAVEPOINT UPDATE_EMPLOYEE_SP;
2629:
2630: l_return_status := fnd_api.g_ret_sts_success;
2631:
2632: FND_PROFILE.GET('JTF_RS_RESOURCE_ACTIVE_DAYS',l_active_days);
2633:
2634: FOR l_c_resource IN c_resource LOOP
2846: l_source_pager_n := null;
2847: l_resource_name_n := null;
2848: l_end_date_active_n := null;
2849:
2850: if nvl(l_source_number, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_number, fnd_api.g_miss_char)
2851: then
2852: l_source_number_o := rr_old_rec.source_number;
2853: l_source_number_n := l_source_number;
2854: l_is_to_be_updated := 'Y';
2854: l_is_to_be_updated := 'Y';
2855:
2856: end if;
2857:
2858: if nvl(l_ppf_rec.full_name, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_name, fnd_api.g_miss_char)
2859: then
2860: l_source_name_o := rr_old_rec.source_name;
2861: l_source_name_n := l_ppf_rec.full_name;
2862: l_is_to_be_updated := 'Y';
2861: l_source_name_n := l_ppf_rec.full_name;
2862: l_is_to_be_updated := 'Y';
2863: end if;
2864:
2865: if nvl(l_ppf_rec.first_name, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_first_name, fnd_api.g_miss_char)
2866: then
2867: l_source_first_name_o := rr_old_rec.source_first_name;
2868: l_source_first_name_n := l_ppf_rec.first_name;
2869: l_is_to_be_updated := 'Y';
2868: l_source_first_name_n := l_ppf_rec.first_name;
2869: l_is_to_be_updated := 'Y';
2870: end if;
2871:
2872: if nvl(l_ppf_rec.middle_names, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_middle_name, fnd_api.g_miss_char)
2873: then
2874: l_source_middle_name_o := rr_old_rec.source_middle_name;
2875: l_source_middle_name_n := l_ppf_rec.middle_names;
2876: l_is_to_be_updated := 'Y';
2875: l_source_middle_name_n := l_ppf_rec.middle_names;
2876: l_is_to_be_updated := 'Y';
2877: end if;
2878:
2879: if nvl(l_ppf_rec.last_name, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_last_name, fnd_api.g_miss_char)
2880: then
2881: l_source_last_name_o := rr_old_rec.source_last_name;
2882: l_source_last_name_n := l_ppf_rec.last_name;
2883: l_is_to_be_updated := 'Y';
2882: l_source_last_name_n := l_ppf_rec.last_name;
2883: l_is_to_be_updated := 'Y';
2884: end if;
2885:
2886: if nvl(l_phone, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_phone, fnd_api.g_miss_char)
2887: then
2888: l_source_phone_o := rr_old_rec.source_phone;
2889: l_source_phone_n := l_phone;
2890: l_is_to_be_updated := 'Y';
2889: l_source_phone_n := l_phone;
2890: l_is_to_be_updated := 'Y';
2891: end if;
2892:
2893: if nvl(l_ppf_rec.email_address, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_email, fnd_api.g_miss_char)
2894: then
2895: l_source_email_o := rr_old_rec.source_email;
2896: l_source_email_n := l_ppf_rec.email_address;
2897: l_is_to_be_updated := 'Y';
2904: l_address_id_n := l_asg_rec.location_id ;
2905: l_is_to_be_updated := 'Y';
2906: end if;
2907:
2908: if nvl(l_ppf_rec.party_id, fnd_api.g_miss_num) <> nvl(rr_old_rec.person_party_id, fnd_api.g_miss_num)
2909: then
2910: l_party_id_o := rr_old_rec.person_party_id;
2911: l_party_id_n := l_ppf_rec.party_id;
2912: l_is_to_be_updated := 'Y';
2911: l_party_id_n := l_ppf_rec.party_id;
2912: l_is_to_be_updated := 'Y';
2913: end if;
2914:
2915: if nvl(l_new_job_id, fnd_api.g_miss_num) <> nvl(rr_old_rec.source_job_id, fnd_api.g_miss_num)
2916: then
2917: l_source_job_id_o := rr_old_rec.source_job_id;
2918: l_source_job_id_n := l_new_job_id;
2919: l_is_to_be_updated := 'Y';
2918: l_source_job_id_n := l_new_job_id;
2919: l_is_to_be_updated := 'Y';
2920: end if;
2921:
2922: if nvl(l_job_name, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_job_title, fnd_api.g_miss_char)
2923: then
2924: l_source_job_title_o := rr_old_rec.source_job_title;
2925: l_source_job_title_n := l_job_name;
2926: l_is_to_be_updated := 'Y';
2925: l_source_job_title_n := l_job_name;
2926: l_is_to_be_updated := 'Y';
2927: end if;
2928:
2929: if nvl(l_loc_rec.address_line_1, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_address1, fnd_api.g_miss_char)
2930: then
2931: l_source_address1_o := rr_old_rec.source_address1;
2932: l_source_address1_n := l_loc_rec.address_line_1;
2933: l_is_to_be_updated := 'Y';
2932: l_source_address1_n := l_loc_rec.address_line_1;
2933: l_is_to_be_updated := 'Y';
2934: end if;
2935:
2936: if nvl(l_loc_rec.address_line_2, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_address2, fnd_api.g_miss_char)
2937: then
2938: l_source_address2_o := rr_old_rec.source_address2;
2939: l_source_address2_n := l_loc_rec.address_line_1;
2940: l_is_to_be_updated := 'Y';
2939: l_source_address2_n := l_loc_rec.address_line_1;
2940: l_is_to_be_updated := 'Y';
2941: end if;
2942:
2943: if nvl(l_loc_rec.address_line_3, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_address3, fnd_api.g_miss_char)
2944: then
2945: l_source_address3_o := rr_old_rec.source_address3;
2946: l_source_address3_n := l_loc_rec.address_line_3;
2947: l_is_to_be_updated := 'Y';
2946: l_source_address3_n := l_loc_rec.address_line_3;
2947: l_is_to_be_updated := 'Y';
2948: end if;
2949:
2950: if nvl(l_loc_rec.town_or_city, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_city, fnd_api.g_miss_char)
2951: then
2952: l_source_city_o := rr_old_rec.source_city;
2953: l_source_city_n := l_loc_rec.town_or_city;
2954: l_is_to_be_updated := 'Y';
2953: l_source_city_n := l_loc_rec.town_or_city;
2954: l_is_to_be_updated := 'Y';
2955: end if;
2956:
2957: if nvl(l_loc_rec.postal_code, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_postal_code, fnd_api.g_miss_char)
2958: then
2959: l_source_postal_code_o := rr_old_rec.source_postal_code;
2960: l_source_postal_code_n := l_loc_rec.postal_code;
2961: l_is_to_be_updated := 'Y';
2960: l_source_postal_code_n := l_loc_rec.postal_code;
2961: l_is_to_be_updated := 'Y';
2962: end if;
2963:
2964: if nvl(l_loc_rec.country, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_country, fnd_api.g_miss_char)
2965: then
2966: l_source_country_o := rr_old_rec.source_country;
2967: l_source_country_n := l_loc_rec.country;
2968: l_is_to_be_updated := 'Y';
2967: l_source_country_n := l_loc_rec.country;
2968: l_is_to_be_updated := 'Y';
2969: end if;
2970:
2971: if nvl(l_asg_rec.supervisor_id, fnd_api.g_miss_num) <> nvl(rr_old_rec.source_mgr_id, fnd_api.g_miss_num)
2972: then
2973: l_source_mgr_id_o := rr_old_rec.source_mgr_id;
2974: l_source_mgr_id_n := l_asg_rec.supervisor_id;
2975: l_is_to_be_updated := 'Y';
2974: l_source_mgr_id_n := l_asg_rec.supervisor_id;
2975: l_is_to_be_updated := 'Y';
2976: end if;
2977:
2978: if nvl(l_mgr_name, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_mgr_name, fnd_api.g_miss_char)
2979: then
2980: l_source_mgr_name_o := rr_old_rec.source_mgr_name;
2981: l_source_mgr_name_n := l_mgr_name;
2982: l_is_to_be_updated := 'Y';
2981: l_source_mgr_name_n := l_mgr_name;
2982: l_is_to_be_updated := 'Y';
2983: end if;
2984:
2985: if nvl(l_ppf_rec.business_group_id, fnd_api.g_miss_num) <> nvl(rr_old_rec.source_business_grp_id, fnd_api.g_miss_num)
2986: then
2987: l_source_business_grp_id_o := rr_old_rec.source_business_grp_id;
2988: l_source_business_grp_id_n := l_ppf_rec.business_group_id;
2989: l_is_to_be_updated := 'Y';
2988: l_source_business_grp_id_n := l_ppf_rec.business_group_id;
2989: l_is_to_be_updated := 'Y';
2990: end if;
2991:
2992: if nvl(l_org_name, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_business_grp_name, fnd_api.g_miss_char)
2993: then
2994: l_source_business_grp_name_o := rr_old_rec.source_business_grp_name;
2995: l_source_business_grp_name_n := l_org_name;
2996: l_is_to_be_updated := 'Y';
2995: l_source_business_grp_name_n := l_org_name;
2996: l_is_to_be_updated := 'Y';
2997: end if;
2998:
2999: if nvl(l_ppf_rec.office_number, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_office, fnd_api.g_miss_char)
3000: then
3001: l_source_office_o := rr_old_rec.source_office;
3002: l_source_office_n := l_ppf_rec.office_number;
3003: l_is_to_be_updated := 'Y';
3002: l_source_office_n := l_ppf_rec.office_number;
3003: l_is_to_be_updated := 'Y';
3004: end if;
3005:
3006: if nvl(l_ppf_rec.internal_location, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_location, fnd_api.g_miss_char)
3007: then
3008: l_source_location_o := rr_old_rec.source_location;
3009: l_source_location_n := l_ppf_rec.internal_location;
3010: l_is_to_be_updated := 'Y';
3009: l_source_location_n := l_ppf_rec.internal_location;
3010: l_is_to_be_updated := 'Y';
3011: end if;
3012:
3013: if nvl(l_ppf_rec.mailstop, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_mailstop, fnd_api.g_miss_char)
3014: then
3015: l_source_mailstop_o := rr_old_rec.source_mailstop;
3016: l_source_mailstop_n := l_ppf_rec.mailstop;
3017: l_is_to_be_updated := 'Y';
3016: l_source_mailstop_n := l_ppf_rec.mailstop;
3017: l_is_to_be_updated := 'Y';
3018: end if;
3019:
3020: if nvl(l_mobile_phone, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_mobile_phone, fnd_api.g_miss_char)
3021: then
3022: l_source_mobile_phone_o := rr_old_rec.source_mobile_phone;
3023: l_source_mobile_phone_n := l_mobile_phone;
3024: l_is_to_be_updated := 'Y';
3023: l_source_mobile_phone_n := l_mobile_phone;
3024: l_is_to_be_updated := 'Y';
3025: end if;
3026:
3027: if nvl(l_pager, fnd_api.g_miss_char) <> nvl(rr_old_rec.source_pager, fnd_api.g_miss_char)
3028: then
3029: l_source_pager_o := rr_old_rec.source_pager;
3030: l_source_pager_n := l_pager;
3031: l_is_to_be_updated := 'Y';
3036: elsif (p_overwrite_name = 'FULL_NAME' AND l_ppf_rec.full_name IS NOT NULL) THEN
3037: l_resource_name_n := l_ppf_rec.full_name;
3038: end if;
3039:
3040: if nvl(l_end_date_active, fnd_api.g_miss_date) <> nvl(rr_old_rec.end_date_active, fnd_api.g_miss_date)
3041: then
3042: l_end_date_active_o := rr_old_rec.end_date_active;
3043: l_end_date_active_n := l_end_date_active;
3044: l_is_to_be_updated := 'Y';
3049: end if;
3050:
3051: if (l_resource_name_n is not null) then
3052: l_resource_name_o := rr_old_rec.resource_name;
3053: if ( nvl(l_resource_name_o, fnd_api.g_miss_char) <> l_resource_name_n) then
3054: if (l_update_extn = 'N') then
3055: l_is_to_be_updated := 'Y';
3056: end if;
3057: else
3304:
3305: END IF;
3306:
3307: EXCEPTION
3308: WHEN fnd_api.g_exc_error
3309: THEN
3310: -- fnd_file.put_line(fnd_file.log, sqlerrm);
3311: ROLLBACK TO update_resource_sp;
3312: WHEN fnd_api.g_exc_unexpected_error
3308: WHEN fnd_api.g_exc_error
3309: THEN
3310: -- fnd_file.put_line(fnd_file.log, sqlerrm);
3311: ROLLBACK TO update_resource_sp;
3312: WHEN fnd_api.g_exc_unexpected_error
3313: THEN
3314: -- fnd_file.put_line(fnd_file.log, sqlerrm);
3315: ROLLBACK TO update_resource_sp;
3316: WHEN OTHERS
3321:
3322: END LOOP;
3323:
3324: EXCEPTION
3325: WHEN fnd_api.g_exc_unexpected_error
3326: THEN
3327:
3328: IF c_resource%ISOPEN THEN
3329: CLOSE c_resource;
3566: close term_res_cur;
3567: commit;
3568:
3569: EXCEPTION
3570: WHEN fnd_api.g_exc_unexpected_error
3571: THEN
3572: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3573: WHEN OTHERS
3574: THEN
3596:
3597:
3598: commit;
3599: EXCEPTION
3600: WHEN fnd_api.g_exc_unexpected_error
3601: THEN
3602: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3603: WHEN OTHERS
3604: THEN
3624: (p_overwrite_name => P_OVERWRITE_NAME);
3625: COMMIT;
3626:
3627: EXCEPTION
3628: WHEN fnd_api.g_exc_unexpected_error
3629: THEN
3630: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3631: WHEN OTHERS
3632: THEN
3672:
3673: --Standard Start of API SAVEPOINT
3674: SAVEPOINT TERMINATE_PARTNER_REL_SP;
3675:
3676: l_return_status := fnd_api.g_ret_sts_success;
3677: l_count := 0;
3678:
3679: FND_PROFILE.GET('JTF_RS_RESOURCE_ACTIVE_DAYS',l_active_days);
3680:
3683: END IF;
3684:
3685: FOR term_part_rel_rec IN term_part_rel_cur (l_active_days) LOOP
3686:
3687: l_return_status := fnd_api.g_ret_sts_success;
3688:
3689: IF (trunc(nvl(term_part_rel_rec.end_date,sysdate)) < trunc(sysdate)) THEN
3690: jtf_rs_resource_utl_pub.end_date_employee
3691: (p_api_version => 1.0
3705: , x_msg_count => l_msg_count
3706: , x_msg_data => l_msg_data);
3707: END IF;
3708:
3709: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
3710: RAISE fnd_api.g_exc_error;
3711: END IF;
3712:
3713: l_count := l_count + 1;
3706: , x_msg_data => l_msg_data);
3707: END IF;
3708:
3709: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
3710: RAISE fnd_api.g_exc_error;
3711: END IF;
3712:
3713: l_count := l_count + 1;
3714: IF (l_count > 1000) THEN
3720:
3721: FND_MSG_PUB.count_and_get (p_count => l_msg_count, p_data => l_msg_data);
3722:
3723: EXCEPTION
3724: WHEN fnd_api.g_exc_error
3725: THEN
3726: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3727: ROLLBACK TO TERMINATE_PARTNER_REL_SP;
3728:
4008: (p_overwrite_name => P_OVERWRITE_NAME);
4009: COMMIT;
4010:
4011: EXCEPTION
4012: WHEN fnd_api.g_exc_unexpected_error
4013: THEN
4014: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4015: WHEN OTHERS
4016: THEN
4144: END LOOP;
4145: COMMIT;
4146:
4147: EXCEPTION
4148: WHEN fnd_api.g_exc_unexpected_error
4149: THEN
4150: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4151: WHEN OTHERS
4152: THEN
4180:
4181: --Standard Start of API SAVEPOINT
4182: SAVEPOINT TERMINATE_SUPPLIER_CONTACT_SP;
4183:
4184: l_return_status := fnd_api.g_ret_sts_success;
4185: l_count := 0;
4186:
4187: FND_PROFILE.GET('JTF_RS_RESOURCE_ACTIVE_DAYS',l_active_days);
4188:
4191: END IF;
4192:
4193: FOR term_supp_cont_rec IN term_supp_cont_cur (l_active_days) LOOP
4194:
4195: l_return_status := fnd_api.g_ret_sts_success;
4196:
4197: jtf_rs_resource_utl_pub.end_date_employee
4198: (p_api_version => 1.0
4199: , p_resource_id => term_supp_cont_rec.resource_id
4202: , x_return_status => l_return_status
4203: , x_msg_count => l_msg_count
4204: , x_msg_data => l_msg_data);
4205:
4206: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
4207: RAISE fnd_api.g_exc_error;
4208: END IF;
4209:
4210: l_count := l_count + 1;
4203: , x_msg_count => l_msg_count
4204: , x_msg_data => l_msg_data);
4205:
4206: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
4207: RAISE fnd_api.g_exc_error;
4208: END IF;
4209:
4210: l_count := l_count + 1;
4211: IF (l_count > 1000) THEN
4217:
4218: FND_MSG_PUB.count_and_get (p_count => l_msg_count, p_data => l_msg_data);
4219:
4220: EXCEPTION
4221: WHEN fnd_api.g_exc_error
4222: THEN
4223: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4224: ROLLBACK TO TERMINATE_SUPPLIER_CONTACT_SP;
4225:
4241: WHERE res.user_id = fu.user_id)
4242: WHERE user_id IS NOT NULL;
4243: COMMIT;
4244: EXCEPTION
4245: WHEN fnd_api.g_exc_unexpected_error
4246: THEN
4247: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4248: WHEN OTHERS
4249: THEN
4404: i number;
4405:
4406: BEGIN
4407: SAVEPOINT UPDATE_USERID_SP;
4408: l_return_status := fnd_api.g_ret_sts_success;
4409: l_count := 1;
4410:
4411: FOR l_c_invalid_userid IN c_invalid_userid
4412: LOOP
4426: FETCH c_party_partner INTO l_user_id, l_user_name;
4427: CLOSE c_party_partner;
4428: END IF;
4429:
4430: l_return_status := fnd_api.g_ret_sts_success;
4431:
4432: jtf_rs_resource_pub.update_resource
4433: (p_api_version => 1.0,
4434: p_init_msg_list => FND_API.G_TRUE,
4430: l_return_status := fnd_api.g_ret_sts_success;
4431:
4432: jtf_rs_resource_pub.update_resource
4433: (p_api_version => 1.0,
4434: p_init_msg_list => FND_API.G_TRUE,
4435: p_resource_id => l_c_invalid_userid.resource_id,
4436: p_resource_number => l_c_invalid_userid.resource_number,
4437: p_user_id => l_user_id,
4438: p_source_name => l_c_invalid_userid.source_name,
4442: x_msg_count => l_msg_count,
4443: x_msg_data => l_msg_data
4444: ) ;
4445:
4446: IF ( l_return_status <> fnd_api.g_ret_sts_success)
4447: THEN
4448: fnd_message.set_name('JTF', 'JTF_RS_CONC_UPDATE_USERID_ERR');
4449: fnd_message.set_token('P_SOURCE_ID', l_c_invalid_userid.source_id);
4450: fnd_file.put_line(fnd_file.log, fnd_message.get);
4450: fnd_file.put_line(fnd_file.log, fnd_message.get);
4451: FOR i IN 1..l_msg_count
4452: LOOP
4453: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4454: p_encoded => fnd_api.g_false)));
4455: END LOOP;
4456: END IF;
4457:
4458: l_count := l_count + 1;
4481: FETCH c_party_partner INTO l_user_id, l_user_name;
4482: CLOSE c_party_partner;
4483: END IF;
4484:
4485: l_return_status := fnd_api.g_ret_sts_success;
4486:
4487: jtf_rs_resource_pub.update_resource
4488: (p_api_version => 1.0,
4489: p_init_msg_list => FND_API.G_TRUE,
4485: l_return_status := fnd_api.g_ret_sts_success;
4486:
4487: jtf_rs_resource_pub.update_resource
4488: (p_api_version => 1.0,
4489: p_init_msg_list => FND_API.G_TRUE,
4490: p_resource_id => l_c_invalid_active_userid.resource_id,
4491: p_resource_number => l_c_invalid_active_userid.resource_number,
4492: p_user_id => l_user_id,
4493: p_source_name => l_c_invalid_active_userid.source_name,
4497: x_msg_count => l_msg_count,
4498: x_msg_data => l_msg_data
4499: ) ;
4500:
4501: IF ( l_return_status <> fnd_api.g_ret_sts_success)
4502: THEN
4503: fnd_message.set_name('JTF', 'JTF_RS_CONC_UPDATE_USERID_ERR');
4504: fnd_message.set_token('P_SOURCE_ID', l_c_invalid_active_userid.source_id);
4505: fnd_file.put_line(fnd_file.log, fnd_message.get);
4505: fnd_file.put_line(fnd_file.log, fnd_message.get);
4506: FOR i IN 1..l_msg_count
4507: LOOP
4508: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4509: p_encoded => fnd_api.g_false)));
4510: END LOOP;
4511: END IF;
4512:
4513: l_count := l_count + 1;
4536: FETCH c_party_partner INTO l_user_id, l_user_name;
4537: CLOSE c_party_partner;
4538: END IF;
4539:
4540: l_return_status := fnd_api.g_ret_sts_success;
4541:
4542: jtf_rs_resource_pub.update_resource
4543: (p_api_version => 1.0,
4544: p_init_msg_list => FND_API.G_TRUE,
4540: l_return_status := fnd_api.g_ret_sts_success;
4541:
4542: jtf_rs_resource_pub.update_resource
4543: (p_api_version => 1.0,
4544: p_init_msg_list => FND_API.G_TRUE,
4545: p_resource_id => l_c_null_userid.resource_id,
4546: p_resource_number => l_c_null_userid.resource_number,
4547: p_user_id => l_user_id,
4548: p_source_name => l_c_null_userid.source_name,
4551: x_return_status => l_return_status,
4552: x_msg_count => l_msg_count,
4553: x_msg_data => l_msg_data
4554: ) ;
4555: IF ( l_return_status <> fnd_api.g_ret_sts_success)
4556: THEN
4557: fnd_message.set_name('JTF', 'JTF_RS_CONC_UPDATE_USERID_ERR');
4558: fnd_message.set_token('P_SOURCE_ID', l_c_null_userid.source_id);
4559: fnd_file.put_line(fnd_file.log, fnd_message.get);
4559: fnd_file.put_line(fnd_file.log, fnd_message.get);
4560: FOR i IN 1..l_msg_count
4561: LOOP
4562: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4563: p_encoded => fnd_api.g_false)));
4564: END LOOP;
4565: END IF;
4566:
4567: l_count := l_count + 1;
4575: FND_MSG_PUB.count_and_get (p_count => l_msg_count, p_data => l_msg_data);
4576: COMMIT;
4577:
4578: EXCEPTION
4579: WHEN fnd_api.g_exc_unexpected_error
4580: THEN
4581: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4582: ROLLBACK TO UPDATE_USERID_SP;
4583: WHEN OTHERS
4607: END IF;
4608:
4609: COMMIT;
4610: EXCEPTION
4611: WHEN fnd_api.g_exc_unexpected_error
4612: THEN
4613: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4614: WHEN OTHERS
4615: THEN