[Home] [Help]
134: l_bdate DATE;
135: BEGIN
136:
137: IF
138: (igs_pe_pers_imp_001.validate_lookup_type_code('PE_ACAD_HONORS',acadhonor_rec.acad_honor_type,8405))
139: THEN
140: IF acadhonor_rec.honor_date IS NOT NULL THEN
141: -- Get the value of the Birth Date of the person
142: OPEN birth_dt_cur(acadhonor_rec.person_id);
657: -- The Load Calendar and Residency Class should be validated only in the Insert mode. Since the duplicate check is done
658: -- on these columns in the Update mode the validation for these is not required.
659: IF p_mode = 'I' THEN
660: IF
661: (igs_pe_pers_imp_001.validate_lookup_type_code('PE_RES_CLASS',res_dtls_rec.residency_class_cd,8405))
662: THEN
663: p_error_code := NULL;
664: ELSE
665: p_error_code := 'E179'; -- Res code Validation Failed
677: CLOSE load_cal_cur;
678: END IF;
679:
680: IF
681: (igs_pe_pers_imp_001.validate_lookup_type_code('PE_RES_STATUS',res_dtls_rec.residency_status_cd,8405))
682: THEN
683: p_error_code := NULL;
684: ELSE
685: p_error_code := 'E180'; -- Res status Validation Failed
1348:
1349: -- Special Allowance Validation
1350: IF ( p_disability_rec.special_allow_cd IS NOT NULL) THEN
1351: IF NOT
1352: (igs_pe_pers_imp_001.validate_lookup_type_code('PE_SN_ALLOW',p_disability_rec.special_allow_cd,8405))
1353: THEN
1354: l_error_code := 'E140' ;
1355: RAISE NO_DATA_FOUND;
1356: ELSE
1360:
1361: -- Support Level Validation
1362: IF ( p_disability_rec.support_level_cd IS NOT NULL) THEN
1363: IF NOT
1364: (igs_pe_pers_imp_001.validate_lookup_type_code('PE_SN_ADD_SUP_LVL',p_disability_rec.support_level_cd,8405))
1365: THEN
1366: l_error_code := 'E141' ;
1367: RAISE NO_DATA_FOUND;
1368: ELSE
1502: -- Special Service code
1503: --
1504:
1505: IF NOT
1506: (igs_pe_pers_imp_001.validate_lookup_type_code('PE_SN_SERVICE',p_sn_service_rec.special_service_cd,8405))
1507: THEN
1508: l_error_code := 'E149';
1509: RAISE NO_DATA_FOUND;
1510: ELSE