[Home] [Help]
79: PROCEDURE derive_level_data
80: (
81: p_lgcy_adstlvl_rec IN lgcy_adstlvl_rec_type,
82: p_person_id OUT NOCOPY igs_pe_person.person_id%type,
83: p_s_adv_stnd_unit_level OUT NOCOPY igs_av_stnd_unit_lvl.s_adv_stnd_type%type,
84: p_cal_type OUT NOCOPY igs_ca_inst.cal_type%type,
85: p_sequence_number OUT NOCOPY igs_ca_inst.sequence_number%type,
86: p_auth_pers_id OUT NOCOPY igs_pe_person.person_id%type,
87: p_unit_details_id OUT NOCOPY igs_ad_term_unitdtls.unit_details_id%type,
244: l_api_version CONSTANT NUMBER := 1.0;
245:
246: -- variables declared to fetch data from derive_level_data
247: l_person_id igs_pe_person.person_id%type;
248: l_s_adv_stnd_unit_level igs_av_stnd_unit_lvl.s_adv_stnd_type%type;
249: l_cal_type igs_ca_inst.cal_type%type;
250: l_sequence_number igs_ca_inst.sequence_number%type;
251: l_auth_pers_id igs_pe_person.person_id%type;
252: l_unit_details_id igs_ad_term_unitdtls.unit_details_id%type;
880: PROCEDURE derive_level_data
881: (
882: p_lgcy_adstlvl_rec IN lgcy_adstlvl_rec_type,
883: p_person_id OUT NOCOPY igs_pe_person.person_id%type,
884: p_s_adv_stnd_unit_level OUT NOCOPY igs_av_stnd_unit_lvl.s_adv_stnd_type%type,
885: p_cal_type OUT NOCOPY igs_ca_inst.cal_type%type,
886: p_sequence_number OUT NOCOPY igs_ca_inst.sequence_number%type,
887: p_auth_pers_id OUT NOCOPY igs_pe_person.person_id%type,
888: p_unit_details_id OUT NOCOPY igs_ad_term_unitdtls.unit_details_id%type,
1362: x_return_status := TRUE;
1363: /*
1364: primary key validation
1365: */
1366: SELECT IGS_AV_STND_UNIT_LVL_S.NEXTVAL INTO p_av_stnd_unit_lvl_id FROM dual;
1367: IF IGS_AV_STND_UNIT_LVL_PKG.GET_PK_FOR_VALIDATION (p_av_stnd_unit_lvl_id) THEN
1368: FND_MESSAGE.SET_NAME('IGS','IGS_AV_ADV_STND_ALREADY_EXISTS');
1369: FND_MSG_PUB.ADD;
1370: p_av_stnd_unit_lvl_id := NULL;