164: IF (p_get_new_emp ='Y') THEN
165: IF (p_create_srp = 'Y') THEN
166: IF (p_sales_credit_type IS NULL) THEN
167: fnd_message.set_name ('JTF','JTF_RS_CP_PM_SLS_CRDT_TYP_NULL');
168: fnd_file.put_line(fnd_file.log, fnd_message.get);
169: fnd_file.new_line(fnd_file.log,1);
170: set_err_var := 'Y';
171: END IF;
172: IF (l_prof_srp_num = 'MANUALLY_ENTERED' OR l_prof_srp_num IS NULL) THEN
165: IF (p_create_srp = 'Y') THEN
166: IF (p_sales_credit_type IS NULL) THEN
167: fnd_message.set_name ('JTF','JTF_RS_CP_PM_SLS_CRDT_TYP_NULL');
168: fnd_file.put_line(fnd_file.log, fnd_message.get);
169: fnd_file.new_line(fnd_file.log,1);
170: set_err_var := 'Y';
171: END IF;
172: IF (l_prof_srp_num = 'MANUALLY_ENTERED' OR l_prof_srp_num IS NULL) THEN
173: fnd_message.set_name('JTF', 'JTF_RS_PROF_SRP_NUM_CONC_ERR');
171: END IF;
172: IF (l_prof_srp_num = 'MANUALLY_ENTERED' OR l_prof_srp_num IS NULL) THEN
173: fnd_message.set_name('JTF', 'JTF_RS_PROF_SRP_NUM_CONC_ERR');
174: fnd_message.set_token('P_PROFILE_VALUE', l_prof_srp_num);
175: fnd_file.put_line(fnd_file.log, fnd_message.get);
176: fnd_file.new_line(fnd_file.log,1);
177: set_err_var := 'Y';
178: END IF;
179: END IF;
172: IF (l_prof_srp_num = 'MANUALLY_ENTERED' OR l_prof_srp_num IS NULL) THEN
173: fnd_message.set_name('JTF', 'JTF_RS_PROF_SRP_NUM_CONC_ERR');
174: fnd_message.set_token('P_PROFILE_VALUE', l_prof_srp_num);
175: fnd_file.put_line(fnd_file.log, fnd_message.get);
176: fnd_file.new_line(fnd_file.log,1);
177: set_err_var := 'Y';
178: END IF;
179: END IF;
180: END IF;
212:
213: EXCEPTION
214: WHEN fnd_api.g_exc_error
215: THEN
216: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
217: ROLLBACK TO CONC_EMPLOYEE_SP;
218: WHEN fnd_api.g_exc_unexpected_error
219: THEN
220: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
216: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
217: ROLLBACK TO CONC_EMPLOYEE_SP;
218: WHEN fnd_api.g_exc_unexpected_error
219: THEN
220: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
221: ROLLBACK TO CONC_EMPLOYEE_SP;
222: --FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
223: WHEN OTHERS
224: THEN
221: ROLLBACK TO CONC_EMPLOYEE_SP;
222: --FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
223: WHEN OTHERS
224: THEN
225: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
226: --ROLLBACK TO CONC_EMPLOYEE_SP;
227: --FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
228:
229: END synchronize_employee;
702: -- dbms_output.put_line('name '||fetch_emp_rec.full_name);
703: IF ( l_return_status <> fnd_api.g_ret_sts_success) THEN
704: fnd_message.set_name('JTF', 'JTF_RS_CONC_CREATE_EMP_ERR');
705: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
706: fnd_file.put_line(fnd_file.log, fnd_message.get);
707: FOR i IN 1..l_msg_count
708: LOOP
709: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
710: p_encoded => fnd_api.g_false)));
705: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
706: fnd_file.put_line(fnd_file.log, fnd_message.get);
707: FOR i IN 1..l_msg_count
708: LOOP
709: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
710: p_encoded => fnd_api.g_false)));
711: END LOOP;
712: fnd_msg_pub.delete_msg;
713: fnd_file.new_line(fnd_file.log,1);
709: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
710: p_encoded => fnd_api.g_false)));
711: END LOOP;
712: fnd_msg_pub.delete_msg;
713: fnd_file.new_line(fnd_file.log,1);
714: raise fnd_api.g_exc_error;
715: END IF;
716:
717: -- Code added by repuri (04/09/03) for Enh/Bug # 2828368
787: );
788: IF(s_return_status <> 'S') THEN
789: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_SRP_ERR');
790: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
791: fnd_file.put_line(fnd_file.log, fnd_message.get);
792: FOR i IN 1..s_msg_count LOOP
793: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
794: p_encoded => fnd_api.g_false)));
795: END LOOP;
789: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_SRP_ERR');
790: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
791: fnd_file.put_line(fnd_file.log, fnd_message.get);
792: FOR i IN 1..s_msg_count LOOP
793: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
794: p_encoded => fnd_api.g_false)));
795: END LOOP;
796: fnd_msg_pub.delete_msg;
797: fnd_file.new_line(fnd_file.log,1);
793: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
794: p_encoded => fnd_api.g_false)));
795: END LOOP;
796: fnd_msg_pub.delete_msg;
797: fnd_file.new_line(fnd_file.log,1);
798: raise fnd_api.g_exc_error;
799: END IF;
800: l_salesrep_extsts := 'Y';
801: END IF;
838: CLOSE c_role_name;
839: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_RES_ROLE');
840: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
841: fnd_message.set_token('P_ROLE_NAME',l_role_name);
842: fnd_file.put_line(fnd_file.log, fnd_message.get);
843: FOR i IN 1..r_msg_count LOOP
844: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
845: p_encoded => fnd_api.g_false)));
846: END LOOP;
840: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
841: fnd_message.set_token('P_ROLE_NAME',l_role_name);
842: fnd_file.put_line(fnd_file.log, fnd_message.get);
843: FOR i IN 1..r_msg_count LOOP
844: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
845: p_encoded => fnd_api.g_false)));
846: END LOOP;
847: fnd_msg_pub.delete_msg;
848: fnd_file.new_line(fnd_file.log,1);
844: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
845: p_encoded => fnd_api.g_false)));
846: END LOOP;
847: fnd_msg_pub.delete_msg;
848: fnd_file.new_line(fnd_file.log,1);
849: raise fnd_api.g_exc_error;
850: END IF;
851: end if; -- End of Check for Sales Comp Roles
852: END LOOP;
863:
864: EXCEPTION
865: WHEN fnd_api.g_exc_error
866: THEN
867: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
868: ROLLBACK TO create_resource_sp;
869: WHEN fnd_api.g_exc_unexpected_error
870: THEN
871: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
867: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
868: ROLLBACK TO create_resource_sp;
869: WHEN fnd_api.g_exc_unexpected_error
870: THEN
871: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
872: ROLLBACK TO create_resource_sp;
873: WHEN OTHERS
874: THEN
875: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
871: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
872: ROLLBACK TO create_resource_sp;
873: WHEN OTHERS
874: THEN
875: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
876: ROLLBACK TO create_resource_sp;
877:
878: END;
879:
1035: IF ( l_return_status <> fnd_api.g_ret_sts_success) THEN
1036:
1037: fnd_message.set_name('JTF', 'JTF_RS_CONC_CREATE_EMP_ERR');
1038: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1039: fnd_file.put_line(fnd_file.log, fnd_message.get);
1040: FOR i IN 1..l_msg_count
1041: LOOP
1042: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1043: p_encoded => fnd_api.g_false)));
1038: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1039: fnd_file.put_line(fnd_file.log, fnd_message.get);
1040: FOR i IN 1..l_msg_count
1041: LOOP
1042: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1043: p_encoded => fnd_api.g_false)));
1044: END LOOP;
1045: fnd_msg_pub.delete_msg;
1046: fnd_file.new_line(fnd_file.log,1);
1042: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1043: p_encoded => fnd_api.g_false)));
1044: END LOOP;
1045: fnd_msg_pub.delete_msg;
1046: fnd_file.new_line(fnd_file.log,1);
1047: raise fnd_api.g_exc_error;
1048: END IF;
1049:
1050: -- Code added by repuri (04/09/03) for Enh/Bug # 2828368
1105: );
1106: IF(s_return_status <> 'S') THEN
1107: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_SRP_ERR');
1108: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1109: fnd_file.put_line(fnd_file.log, fnd_message.get);
1110: FOR i IN 1..s_msg_count LOOP
1111: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1112: p_encoded => fnd_api.g_false)));
1113: END LOOP;
1107: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_SRP_ERR');
1108: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1109: fnd_file.put_line(fnd_file.log, fnd_message.get);
1110: FOR i IN 1..s_msg_count LOOP
1111: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1112: p_encoded => fnd_api.g_false)));
1113: END LOOP;
1114: fnd_msg_pub.delete_msg;
1115: fnd_file.new_line(fnd_file.log,1);
1111: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1112: p_encoded => fnd_api.g_false)));
1113: END LOOP;
1114: fnd_msg_pub.delete_msg;
1115: fnd_file.new_line(fnd_file.log,1);
1116: raise fnd_api.g_exc_error;
1117: END IF;
1118: l_salesrep_extsts := 'Y';
1119: END IF;
1157:
1158: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_RES_ROLE');
1159: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1160: fnd_message.set_token('P_ROLE_NAME',l_role_name);
1161: fnd_file.put_line(fnd_file.log, fnd_message.get);
1162: FOR i IN 1..r_msg_count LOOP
1163: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1164: p_encoded => fnd_api.g_false)));
1165: END LOOP;
1159: fnd_message.set_token('P_EMPLOYEE_NAME', fetch_emp_rec.full_name);
1160: fnd_message.set_token('P_ROLE_NAME',l_role_name);
1161: fnd_file.put_line(fnd_file.log, fnd_message.get);
1162: FOR i IN 1..r_msg_count LOOP
1163: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1164: p_encoded => fnd_api.g_false)));
1165: END LOOP;
1166:
1167: fnd_msg_pub.delete_msg;
1164: p_encoded => fnd_api.g_false)));
1165: END LOOP;
1166:
1167: fnd_msg_pub.delete_msg;
1168: fnd_file.new_line(fnd_file.log,1);
1169: raise fnd_api.g_exc_error;
1170: END IF;
1171: end if; -- End of Check for Sales Comp Roles
1172: END LOOP;
1183:
1184: EXCEPTION
1185: WHEN fnd_api.g_exc_error
1186: THEN
1187: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1188: ROLLBACK TO create_resource_sp;
1189: WHEN fnd_api.g_exc_unexpected_error
1190: THEN
1191: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1187: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1188: ROLLBACK TO create_resource_sp;
1189: WHEN fnd_api.g_exc_unexpected_error
1190: THEN
1191: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1192: ROLLBACK TO create_resource_sp;
1193: WHEN OTHERS
1194: THEN
1195: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1191: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1192: ROLLBACK TO create_resource_sp;
1193: WHEN OTHERS
1194: THEN
1195: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1196: ROLLBACK TO create_resource_sp;
1197:
1198: END;
1199:
1207:
1208: EXCEPTION
1209: WHEN fnd_api.g_exc_error
1210: THEN
1211: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1212: ROLLBACK TO CREATE_EMPLOYEE_SP;
1213: WHEN fnd_api.g_exc_unexpected_error
1214: THEN
1215: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1211: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1212: ROLLBACK TO CREATE_EMPLOYEE_SP;
1213: WHEN fnd_api.g_exc_unexpected_error
1214: THEN
1215: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1216: ROLLBACK TO CREATE_EMPLOYEE_SP;
1217: WHEN OTHERS
1218: THEN
1219: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1215: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1216: ROLLBACK TO CREATE_EMPLOYEE_SP;
1217: WHEN OTHERS
1218: THEN
1219: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1220: ROLLBACK TO CREATE_EMPLOYEE_SP;
1221: fnd_file.put_line(fnd_file.log, sqlerrm);
1222:
1223: END create_employee;
1217: WHEN OTHERS
1218: THEN
1219: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1220: ROLLBACK TO CREATE_EMPLOYEE_SP;
1221: fnd_file.put_line(fnd_file.log, sqlerrm);
1222:
1223: END create_employee;
1224:
1225:
1399:
1400: IF ( l_return_status <> fnd_api.g_ret_sts_success) THEN
1401: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_TER_RES');
1402: fnd_message.set_token('P_RESOURCE_NAME', term_emp_rec.resource_name);
1403: fnd_file.put_line(fnd_file.log, fnd_message.get);
1404: FOR i IN 1..l_msg_count LOOP
1405: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1406: p_encoded => fnd_api.g_false)));
1407: END LOOP;
1401: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_TER_RES');
1402: fnd_message.set_token('P_RESOURCE_NAME', term_emp_rec.resource_name);
1403: fnd_file.put_line(fnd_file.log, fnd_message.get);
1404: FOR i IN 1..l_msg_count LOOP
1405: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1406: p_encoded => fnd_api.g_false)));
1407: END LOOP;
1408: fnd_msg_pub.delete_msg;
1409: fnd_file.new_line(fnd_file.log,1);
1405: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
1406: p_encoded => fnd_api.g_false)));
1407: END LOOP;
1408: fnd_msg_pub.delete_msg;
1409: fnd_file.new_line(fnd_file.log,1);
1410: raise fnd_api.g_exc_error;
1411: END IF;
1412:
1413: -------------------------------------------------------------------------------
1419: end if;
1420:
1421: EXCEPTION
1422: WHEN fnd_api.g_exc_error THEN
1423: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1424: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1425: WHEN fnd_api.g_exc_unexpected_error THEN
1426: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1427: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1422: WHEN fnd_api.g_exc_error THEN
1423: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1424: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1425: WHEN fnd_api.g_exc_unexpected_error THEN
1426: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1427: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1428: WHEN OTHERS THEN
1429: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1430: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1425: WHEN fnd_api.g_exc_unexpected_error THEN
1426: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1427: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1428: WHEN OTHERS THEN
1429: fnd_file.put_line(fnd_file.log, SQLCODE||':'||SQLERRM);
1430: ROLLBACK TO TERMINATE_EMPLOYEE_IN_SP;
1431: END;
1432:
1433: end loop; -- end of term_emp_cur
1436:
1437: EXCEPTION
1438: WHEN fnd_api.g_exc_error
1439: THEN
1440: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1441: ROLLBACK TO TERMINATE_EMPLOYEE_SP;
1442: WHEN OTHERS
1443: THEN
1444: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1440: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1441: ROLLBACK TO TERMINATE_EMPLOYEE_SP;
1442: WHEN OTHERS
1443: THEN
1444: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1445: ROLLBACK TO TERMINATE_EMPLOYEE_SP;
1446: -- fnd_file.put_line(fnd_file.log, sqlerrm);
1447:
1448: END terminate_employee;
1442: WHEN OTHERS
1443: THEN
1444: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
1445: ROLLBACK TO TERMINATE_EMPLOYEE_SP;
1446: -- fnd_file.put_line(fnd_file.log, sqlerrm);
1447:
1448: END terminate_employee;
1449:
1450:
1905: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_UPD_ROL_ERR');
1906: fnd_message.set_token('P_EMPLOYEE_NAME', l_ppf_rec.full_name);
1907: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
1908: fnd_message.set_token('P_ROLE_NAME', l_role_name);
1909: fnd_file.put_line(fnd_file.log, fnd_message.get);
1910: for i in 1..r_msg_count loop
1911: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
1912: end loop;
1913: CLOSE c_job_roles;
1907: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
1908: fnd_message.set_token('P_ROLE_NAME', l_role_name);
1909: fnd_file.put_line(fnd_file.log, fnd_message.get);
1910: for i in 1..r_msg_count loop
1911: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
1912: end loop;
1913: CLOSE c_job_roles;
1914: -- CLOSE c_job_id;
1915: fnd_msg_pub.delete_msg;
1912: end loop;
1913: CLOSE c_job_roles;
1914: -- CLOSE c_job_id;
1915: fnd_msg_pub.delete_msg;
1916: fnd_file.new_line(fnd_file.log,1);
1917: raise fnd_api.g_exc_error;
1918: END IF;
1919: END IF;
1920: CLOSE c_job_role_relations;
1965: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_UPD_ROL_ERR');
1966: fnd_message.set_token('P_EMPLOYEE_NAME', l_ppf_rec.full_name);
1967: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
1968: fnd_message.set_token('P_ROLE_NAME', l_role_name);
1969: fnd_file.put_line(fnd_file.log, fnd_message.get);
1970: for j in 1..r_msg_count loop
1971: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
1972: end loop;
1973: fnd_msg_pub.delete_msg;
1967: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
1968: fnd_message.set_token('P_ROLE_NAME', l_role_name);
1969: fnd_file.put_line(fnd_file.log, fnd_message.get);
1970: for j in 1..r_msg_count loop
1971: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
1972: end loop;
1973: fnd_msg_pub.delete_msg;
1974: fnd_file.new_line(fnd_file.log,1);
1975: raise fnd_api.g_exc_error;
1970: for j in 1..r_msg_count loop
1971: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
1972: end loop;
1973: fnd_msg_pub.delete_msg;
1974: fnd_file.new_line(fnd_file.log,1);
1975: raise fnd_api.g_exc_error;
1976: END IF;
1977: END LOOP;
1978: l_res_roles_enddated := 'Y';
2022: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_ROL_ERR');
2023: fnd_message.set_token('P_EMPLOYEE_NAME', l_ppf_rec.full_name);
2024: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2025: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2026: fnd_file.put_line(fnd_file.log, fnd_message.get);
2027: for i in 1..r_msg_count loop
2028: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2029: end loop;
2030: fnd_msg_pub.delete_msg;
2024: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2025: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2026: fnd_file.put_line(fnd_file.log, fnd_message.get);
2027: for i in 1..r_msg_count loop
2028: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2029: end loop;
2030: fnd_msg_pub.delete_msg;
2031: fnd_file.new_line(fnd_file.log,1);
2032: raise fnd_api.g_exc_error;
2027: for i in 1..r_msg_count loop
2028: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2029: end loop;
2030: fnd_msg_pub.delete_msg;
2031: fnd_file.new_line(fnd_file.log,1);
2032: raise fnd_api.g_exc_error;
2033: END IF;
2034: end if; -- Check for Sales Comp Roles and salesrep exists
2035: END IF;
2078: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_UPD_ROL_ERR');
2079: fnd_message.set_token('P_EMPLOYEE_NAME', l_ppf_rec.full_name);
2080: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2081: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2082: fnd_file.put_line(fnd_file.log, fnd_message.get);
2083: for j in 1..r_msg_count loop
2084: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2085: end loop;
2086: fnd_msg_pub.delete_msg;
2080: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2081: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2082: fnd_file.put_line(fnd_file.log, fnd_message.get);
2083: for j in 1..r_msg_count loop
2084: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2085: end loop;
2086: fnd_msg_pub.delete_msg;
2087: fnd_file.new_line(fnd_file.log,1);
2088: raise fnd_api.g_exc_error;
2083: for j in 1..r_msg_count loop
2084: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(j,p_encoded => fnd_api.g_false)));
2085: end loop;
2086: fnd_msg_pub.delete_msg;
2087: fnd_file.new_line(fnd_file.log,1);
2088: raise fnd_api.g_exc_error;
2089: END IF;
2090: END LOOP;
2091: l_res_roles_enddated := 'Y';
2135: fnd_message.set_name('JTF', 'JTF_RS_CP_SYN_EMP_CRT_ROL_ERR');
2136: fnd_message.set_token('P_EMPLOYEE_NAME', l_ppf_rec.full_name);
2137: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2138: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2139: fnd_file.put_line(fnd_file.log, fnd_message.get);
2140: for i in 1..r_msg_count loop
2141: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2142: end loop;
2143: fnd_msg_pub.delete_msg;
2137: fnd_message.set_token('P_JOB_TITLE', p_new_job_title);
2138: fnd_message.set_token('P_ROLE_NAME', l_role_name);
2139: fnd_file.put_line(fnd_file.log, fnd_message.get);
2140: for i in 1..r_msg_count loop
2141: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2142: end loop;
2143: fnd_msg_pub.delete_msg;
2144: fnd_file.new_line(fnd_file.log,1);
2145: raise fnd_api.g_exc_error;
2140: for i in 1..r_msg_count loop
2141: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,p_encoded => fnd_api.g_false)));
2142: end loop;
2143: fnd_msg_pub.delete_msg;
2144: fnd_file.new_line(fnd_file.log,1);
2145: raise fnd_api.g_exc_error;
2146: END IF;
2147: end if; -- Check for Sales Comp Roles and salesrep exists
2148: END IF; /* no active resource role */
2612: --ER # 2669284 . If any change has ben encountered, then audit that resource record and also
2613: --update the jtf_rs_resource_extns.
2614: if (l_is_to_be_updated = 'Y') then
2615:
2616: ---fnd_file.put_line(fnd_file.log,'resource id:' || l_c_resource.resource_id);
2617: select jtf_rs_resource_extn_aud_s.nextval
2618: into l_resource_extn_aud_id
2619: from dual;
2620:
2855:
2856: EXCEPTION
2857: WHEN fnd_api.g_exc_error
2858: THEN
2859: -- fnd_file.put_line(fnd_file.log, sqlerrm);
2860: ROLLBACK TO update_resource_sp;
2861: WHEN fnd_api.g_exc_unexpected_error
2862: THEN
2863: -- fnd_file.put_line(fnd_file.log, sqlerrm);
2859: -- fnd_file.put_line(fnd_file.log, sqlerrm);
2860: ROLLBACK TO update_resource_sp;
2861: WHEN fnd_api.g_exc_unexpected_error
2862: THEN
2863: -- fnd_file.put_line(fnd_file.log, sqlerrm);
2864: ROLLBACK TO update_resource_sp;
2865: WHEN OTHERS
2866: THEN
2867: fnd_file.put_line(fnd_file.log, sqlerrm);
2863: -- fnd_file.put_line(fnd_file.log, sqlerrm);
2864: ROLLBACK TO update_resource_sp;
2865: WHEN OTHERS
2866: THEN
2867: fnd_file.put_line(fnd_file.log, sqlerrm);
2868: ROLLBACK TO update_resource_sp;
2869: END;
2870:
2871: END LOOP;
2889: IF c_ppf%ISOPEN THEN
2890: CLOSE c_ppf;
2891: END IF;
2892:
2893: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
2894: ROLLBACK TO UPDATE_EMPLOYEE_SP;
2895: WHEN OTHERS
2896: THEN
2897:
2910: IF c_ppf%ISOPEN THEN
2911: CLOSE c_ppf;
2912: END IF;
2913:
2914: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
2915: ROLLBACK TO UPDATE_EMPLOYEE_SP;
2916:
2917: END update_employee;
2918:
3106: WHEN OTHERS
3107: THEN
3108: fnd_message.set_name('JTF', 'JTF_RS_UPD_TERM_RES_ERR');
3109: fnd_message.set_token('P_PERSON_ID',term_res_rec.source_id );
3110: fnd_file.put_line(fnd_file.log, fnd_message.get);
3111:
3112: end;
3113: fetch term_res_cur into term_res_rec;
3114: end loop;
3117:
3118: EXCEPTION
3119: WHEN fnd_api.g_exc_unexpected_error
3120: THEN
3121: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3122: WHEN OTHERS
3123: THEN
3124: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3125: fnd_file.put_line(fnd_file.log, sqlerrm);
3120: THEN
3121: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3122: WHEN OTHERS
3123: THEN
3124: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3125: fnd_file.put_line(fnd_file.log, sqlerrm);
3126: END update_terminated_employee;
3127:
3128:
3121: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3122: WHEN OTHERS
3123: THEN
3124: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3125: fnd_file.put_line(fnd_file.log, sqlerrm);
3126: END update_terminated_employee;
3127:
3128:
3129:
3147: commit;
3148: EXCEPTION
3149: WHEN fnd_api.g_exc_unexpected_error
3150: THEN
3151: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3152: WHEN OTHERS
3153: THEN
3154: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3155: fnd_file.put_line(fnd_file.log, sqlerrm);
3150: THEN
3151: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3152: WHEN OTHERS
3153: THEN
3154: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3155: fnd_file.put_line(fnd_file.log, sqlerrm);
3156:
3157: END update_emp_phone;
3158:
3151: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3152: WHEN OTHERS
3153: THEN
3154: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3155: fnd_file.put_line(fnd_file.log, sqlerrm);
3156:
3157: END update_emp_phone;
3158:
3159: PROCEDURE synchronize_party
3175:
3176: EXCEPTION
3177: WHEN fnd_api.g_exc_unexpected_error
3178: THEN
3179: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3180: WHEN OTHERS
3181: THEN
3182: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3183:
3178: THEN
3179: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3180: WHEN OTHERS
3181: THEN
3182: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3183:
3184: END synchronize_party;
3185:
3186: PROCEDURE terminate_partner_rel IS
3271:
3272: EXCEPTION
3273: WHEN fnd_api.g_exc_error
3274: THEN
3275: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3276: ROLLBACK TO TERMINATE_PARTNER_REL_SP;
3277:
3278: WHEN OTHERS
3279: THEN
3276: ROLLBACK TO TERMINATE_PARTNER_REL_SP;
3277:
3278: WHEN OTHERS
3279: THEN
3280: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3281: ROLLBACK TO TERMINATE_PARTNER_REL_SP;
3282: fnd_file.put_line(fnd_file.log, sqlerrm);
3283:
3284: END terminate_partner_rel;
3278: WHEN OTHERS
3279: THEN
3280: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3281: ROLLBACK TO TERMINATE_PARTNER_REL_SP;
3282: fnd_file.put_line(fnd_file.log, sqlerrm);
3283:
3284: END terminate_partner_rel;
3285:
3286:
3431: THEN
3432: null;
3433: WHEN OTHERS
3434: THEN
3435: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3436: fnd_file.put_line(fnd_file.log, sqlerrm);
3437: END;
3438:
3439:
3432: null;
3433: WHEN OTHERS
3434: THEN
3435: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3436: fnd_file.put_line(fnd_file.log, sqlerrm);
3437: END;
3438:
3439:
3440:
3462: THEN
3463: null;
3464: WHEN OTHERS
3465: THEN
3466: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3467: fnd_file.put_line(fnd_file.log, sqlerrm);
3468:
3469: END;
3470:
3463: null;
3464: WHEN OTHERS
3465: THEN
3466: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3467: fnd_file.put_line(fnd_file.log, sqlerrm);
3468:
3469: END;
3470:
3471: for r_res in c_res
3537:
3538: EXCEPTION
3539: WHEN OTHERS
3540: THEN
3541: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3542: fnd_file.put_line(fnd_file.log, sqlerrm);
3543:
3544: END update_party;
3545:
3538: EXCEPTION
3539: WHEN OTHERS
3540: THEN
3541: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3542: fnd_file.put_line(fnd_file.log, sqlerrm);
3543:
3544: END update_party;
3545:
3546:
3563:
3564: EXCEPTION
3565: WHEN fnd_api.g_exc_unexpected_error
3566: THEN
3567: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3568: WHEN OTHERS
3569: THEN
3570: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3571: END synchronize_supp_contact;
3566: THEN
3567: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3568: WHEN OTHERS
3569: THEN
3570: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3571: END synchronize_supp_contact;
3572:
3573:
3574: PROCEDURE update_supp_contact
3697:
3698: EXCEPTION
3699: WHEN fnd_api.g_exc_unexpected_error
3700: THEN
3701: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3702: WHEN OTHERS
3703: THEN
3704: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3705: end update_supp_contact;
3700: THEN
3701: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3702: WHEN OTHERS
3703: THEN
3704: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3705: end update_supp_contact;
3706:
3707:
3708: PROCEDURE terminate_supplier_contact IS
3770:
3771: EXCEPTION
3772: WHEN fnd_api.g_exc_error
3773: THEN
3774: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3775: ROLLBACK TO TERMINATE_SUPPLIER_CONTACT_SP;
3776:
3777: WHEN OTHERS
3778: THEN
3775: ROLLBACK TO TERMINATE_SUPPLIER_CONTACT_SP;
3776:
3777: WHEN OTHERS
3778: THEN
3779: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3780: ROLLBACK TO TERMINATE_SUPPLIER_CONTACT_SP;
3781: fnd_file.put_line(fnd_file.log, sqlerrm);
3782:
3783: END terminate_supplier_contact;
3777: WHEN OTHERS
3778: THEN
3779: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3780: ROLLBACK TO TERMINATE_SUPPLIER_CONTACT_SP;
3781: fnd_file.put_line(fnd_file.log, sqlerrm);
3782:
3783: END terminate_supplier_contact;
3784:
3785:
3794: COMMIT;
3795: EXCEPTION
3796: WHEN fnd_api.g_exc_unexpected_error
3797: THEN
3798: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3799: WHEN OTHERS
3800: THEN
3801: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3802: fnd_file.put_line(fnd_file.log, sqlerrm);
3797: THEN
3798: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3799: WHEN OTHERS
3800: THEN
3801: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3802: fnd_file.put_line(fnd_file.log, sqlerrm);
3803: END update_username;
3804:
3805:
3798: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3799: WHEN OTHERS
3800: THEN
3801: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
3802: fnd_file.put_line(fnd_file.log, sqlerrm);
3803: END update_username;
3804:
3805:
3806: PROCEDURE update_userid
3997: IF ( l_return_status <> fnd_api.g_ret_sts_success)
3998: THEN
3999: fnd_message.set_name('JTF', 'JTF_RS_CONC_UPDATE_USERID_ERR');
4000: fnd_message.set_token('P_SOURCE_ID', l_c_invalid_userid.source_id);
4001: fnd_file.put_line(fnd_file.log, fnd_message.get);
4002: FOR i IN 1..l_msg_count
4003: LOOP
4004: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4005: p_encoded => fnd_api.g_false)));
4000: fnd_message.set_token('P_SOURCE_ID', l_c_invalid_userid.source_id);
4001: fnd_file.put_line(fnd_file.log, fnd_message.get);
4002: FOR i IN 1..l_msg_count
4003: LOOP
4004: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4005: p_encoded => fnd_api.g_false)));
4006: END LOOP;
4007: END IF;
4008:
4052: IF ( l_return_status <> fnd_api.g_ret_sts_success)
4053: THEN
4054: fnd_message.set_name('JTF', 'JTF_RS_CONC_UPDATE_USERID_ERR');
4055: fnd_message.set_token('P_SOURCE_ID', l_c_invalid_active_userid.source_id);
4056: fnd_file.put_line(fnd_file.log, fnd_message.get);
4057: FOR i IN 1..l_msg_count
4058: LOOP
4059: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4060: p_encoded => fnd_api.g_false)));
4055: fnd_message.set_token('P_SOURCE_ID', l_c_invalid_active_userid.source_id);
4056: fnd_file.put_line(fnd_file.log, fnd_message.get);
4057: FOR i IN 1..l_msg_count
4058: LOOP
4059: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4060: p_encoded => fnd_api.g_false)));
4061: END LOOP;
4062: END IF;
4063:
4106: IF ( l_return_status <> fnd_api.g_ret_sts_success)
4107: THEN
4108: fnd_message.set_name('JTF', 'JTF_RS_CONC_UPDATE_USERID_ERR');
4109: fnd_message.set_token('P_SOURCE_ID', l_c_null_userid.source_id);
4110: fnd_file.put_line(fnd_file.log, fnd_message.get);
4111: FOR i IN 1..l_msg_count
4112: LOOP
4113: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4114: p_encoded => fnd_api.g_false)));
4109: fnd_message.set_token('P_SOURCE_ID', l_c_null_userid.source_id);
4110: fnd_file.put_line(fnd_file.log, fnd_message.get);
4111: FOR i IN 1..l_msg_count
4112: LOOP
4113: fnd_file.put_line(fnd_file.log, (fnd_msg_pub.get(i,
4114: p_encoded => fnd_api.g_false)));
4115: END LOOP;
4116: END IF;
4117:
4128:
4129: EXCEPTION
4130: WHEN fnd_api.g_exc_unexpected_error
4131: THEN
4132: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4133: ROLLBACK TO UPDATE_USERID_SP;
4134: WHEN OTHERS
4135: THEN
4136: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4132: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4133: ROLLBACK TO UPDATE_USERID_SP;
4134: WHEN OTHERS
4135: THEN
4136: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4137: ROLLBACK TO UPDATE_USERID_SP;
4138: fnd_file.put_line(fnd_file.log, sqlerrm);
4139: END update_userid;
4140:
4134: WHEN OTHERS
4135: THEN
4136: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4137: ROLLBACK TO UPDATE_USERID_SP;
4138: fnd_file.put_line(fnd_file.log, sqlerrm);
4139: END update_userid;
4140:
4141:
4142: PROCEDURE synchronize_user_name
4160: COMMIT;
4161: EXCEPTION
4162: WHEN fnd_api.g_exc_unexpected_error
4163: THEN
4164: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4165: WHEN OTHERS
4166: THEN
4167: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4168: END synchronize_user_name;
4163: THEN
4164: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4165: WHEN OTHERS
4166: THEN
4167: fnd_file.put_line(fnd_file.log, sqlcode||':'||sqlerrm);
4168: END synchronize_user_name;
4169:
4170: END jtf_rs_conc_res_pub;