735: AND ret.person_id = rec.person_id
736: AND ret.ca_sequence_number = rec.sequence_number
737: ORDER BY rec.person_id;
738:
739: CURSOR cur_person_number (cp_person_id igs_pe_person.person_id%TYPE) IS
740: SELECT person_number,full_name
741: FROM igs_pe_person_base_v
742: WHERE person_id = cp_person_id;
743:
737: ORDER BY rec.person_id;
738:
739: CURSOR cur_person_number (cp_person_id igs_pe_person.person_id%TYPE) IS
740: SELECT person_number,full_name
741: FROM igs_pe_person_base_v
742: WHERE person_id = cp_person_id;
743:
744: l_cur_person_number cur_person_number%ROWTYPE;
745:
753:
754: l_cur_acad_cal_type cur_acad_cal_type%ROWTYPE;
755: l_num NUMBER(1);
756: l_supervisor_gr VARCHAR2(4000);
757: l_person_id_old igs_pe_person_base_v.person_id%TYPE := NULL;
758: l_person_id_new igs_pe_person_base_v.person_id%TYPE := NULL;
759:
760: BEGIN
761:
754: l_cur_acad_cal_type cur_acad_cal_type%ROWTYPE;
755: l_num NUMBER(1);
756: l_supervisor_gr VARCHAR2(4000);
757: l_person_id_old igs_pe_person_base_v.person_id%TYPE := NULL;
758: l_person_id_new igs_pe_person_base_v.person_id%TYPE := NULL;
759:
760: BEGIN
761:
762: igs_ge_gen_003.set_org_id(NULL);
904: AND ROLE_ORIG_SYSTEM_ID = 0;
905:
906: l_dup_user NUMBER :=0;
907:
908: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
909: SELECT full_name
910: FROM igs_pe_person_base_v
911: WHERE person_id = cp_person_id;
912:
906: l_dup_user NUMBER :=0;
907:
908: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
909: SELECT full_name
910: FROM igs_pe_person_base_v
911: WHERE person_id = cp_person_id;
912:
913: l_c_full_name c_full_name%ROWTYPE;
914:
1057: AND ROLE_ORIG_SYSTEM_ID = 0;
1058:
1059: l_dup_user NUMBER :=0;
1060:
1061: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
1062: SELECT full_name
1063: FROM igs_pe_person_base_v
1064: WHERE person_id = cp_person_id;
1065:
1059: l_dup_user NUMBER :=0;
1060:
1061: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
1062: SELECT full_name
1063: FROM igs_pe_person_base_v
1064: WHERE person_id = cp_person_id;
1065:
1066: l_c_full_name c_full_name%ROWTYPE;
1067:
1208: AND ROLE_ORIG_SYSTEM_ID = 0;
1209:
1210: l_dup_user NUMBER :=0;
1211:
1212: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
1213: SELECT full_name
1214: FROM igs_pe_person_base_v
1215: WHERE person_id = cp_person_id;
1216:
1210: l_dup_user NUMBER :=0;
1211:
1212: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
1213: SELECT full_name
1214: FROM igs_pe_person_base_v
1215: WHERE person_id = cp_person_id;
1216:
1217: l_c_full_name c_full_name%ROWTYPE;
1218:
1362: AND ROLE_ORIG_SYSTEM_ID = 0;
1363:
1364: l_dup_user NUMBER :=0;
1365:
1366: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
1367: SELECT full_name
1368: FROM igs_pe_person_base_v
1369: WHERE person_id = cp_person_id;
1370:
1364: l_dup_user NUMBER :=0;
1365:
1366: CURSOR c_full_name (cp_person_id igs_pe_person_base_v.person_id%TYPE) IS
1367: SELECT full_name
1368: FROM igs_pe_person_base_v
1369: WHERE person_id = cp_person_id;
1370:
1371: -- Get the description of discontinuation reason code
1372: CURSOR c_discon_rsn (cp_discon_rsn_cd IGS_EN_DCNT_REASONCD.DISCONTINUATION_REASON_CD%TYPE) IS
1682: AND usec.lead_instructor_flag = 'Y';
1683:
1684: CURSOR c_person_number (cp_n_person_id IN NUMBER) IS
1685: SELECT person_number
1686: FROM igs_pe_person_base_v
1687: WHERE person_id = cp_n_person_id;
1688:
1689: CURSOR c_user_name (cp_n_person_id IN NUMBER) IS
1690: SELECT user_name
1691: FROM fnd_user
1692: WHERE person_party_id = cp_n_person_id;
1693:
1694: l_t_temp NUMBER;
1695: l_c_person_num igs_pe_person_base_v.person_number%TYPE;
1696: l_n_instuctor_id igs_ps_usec_tch_resp.instructor_id%TYPE;
1697: l_c_user_name fnd_user.user_name%TYPE;
1698: l_c_perm_type VARCHAR2(2000);
1699: