80: p_deleting IN BOOLEAN DEFAULT FALSE
81: ) AS
82: v_message_name VARCHAR2(30);
83: v_return_type VARCHAR2(1);
84: v_admission_cat IGS_AD_APPL.admission_cat%TYPE;
85: v_s_admission_process_type IGS_AD_APPL.s_admission_process_type%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
81: ) AS
82: v_message_name VARCHAR2(30);
83: v_return_type VARCHAR2(1);
84: v_admission_cat IGS_AD_APPL.admission_cat%TYPE;
85: v_s_admission_process_type IGS_AD_APPL.s_admission_process_type%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
82: v_message_name VARCHAR2(30);
83: v_return_type VARCHAR2(1);
84: v_admission_cat IGS_AD_APPL.admission_cat%TYPE;
85: v_s_admission_process_type IGS_AD_APPL.s_admission_process_type%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
83: v_return_type VARCHAR2(1);
84: v_admission_cat IGS_AD_APPL.admission_cat%TYPE;
85: v_s_admission_process_type IGS_AD_APPL.s_admission_process_type%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
91: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
84: v_admission_cat IGS_AD_APPL.admission_cat%TYPE;
85: v_s_admission_process_type IGS_AD_APPL.s_admission_process_type%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
91: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
92: v_adm_fee_status IGS_AD_APPL.adm_fee_status%TYPE;
85: v_s_admission_process_type IGS_AD_APPL.s_admission_process_type%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
91: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
92: v_adm_fee_status IGS_AD_APPL.adm_fee_status%TYPE;
93: v_crv_version_number IGS_PS_VER.version_number%TYPE;
86: v_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
91: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
92: v_adm_fee_status IGS_AD_APPL.adm_fee_status%TYPE;
93: v_crv_version_number IGS_PS_VER.version_number%TYPE;
94: v_pref_limit NUMBER;
87: v_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE;
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
91: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
92: v_adm_fee_status IGS_AD_APPL.adm_fee_status%TYPE;
93: v_crv_version_number IGS_PS_VER.version_number%TYPE;
94: v_pref_limit NUMBER;
95: v_check_course_encumb_ind VARCHAR2(1);
88: v_adm_cal_type IGS_AD_APPL.adm_cal_type%TYPE;
89: v_adm_ci_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE;
90: v_appl_dt IGS_AD_APPL.appl_dt%TYPE;
91: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
92: v_adm_fee_status IGS_AD_APPL.adm_fee_status%TYPE;
93: v_crv_version_number IGS_PS_VER.version_number%TYPE;
94: v_pref_limit NUMBER;
95: v_check_course_encumb_ind VARCHAR2(1);
96: v_late_appl_allowed_ind VARCHAR2(1);
367: p_deleting IN BOOLEAN DEFAULT FALSE
368: ) AS
369: v_message_name VARCHAR2(30);
370:
371: v_person_id IGS_AD_APPL.person_id%TYPE;
372: v_admission_appl_number IGS_AD_APPL.admission_appl_number%TYPE;
373: v_derived_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
374: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
375:
368: ) AS
369: v_message_name VARCHAR2(30);
370:
371: v_person_id IGS_AD_APPL.person_id%TYPE;
372: v_admission_appl_number IGS_AD_APPL.admission_appl_number%TYPE;
373: v_derived_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
374: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
375:
376: -- cursor to get the old admission application status from the
369: v_message_name VARCHAR2(30);
370:
371: v_person_id IGS_AD_APPL.person_id%TYPE;
372: v_admission_appl_number IGS_AD_APPL.admission_appl_number%TYPE;
373: v_derived_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
374: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
375:
376: -- cursor to get the old admission application status from the
377: -- database by rrengara on 9-APR-2002 for bug no 2298840
370:
371: v_person_id IGS_AD_APPL.person_id%TYPE;
372: v_admission_appl_number IGS_AD_APPL.admission_appl_number%TYPE;
373: v_derived_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
374: v_adm_appl_status IGS_AD_APPL.adm_appl_status%TYPE;
375:
376: -- cursor to get the old admission application status from the
377: -- database by rrengara on 9-APR-2002 for bug no 2298840
378:
375:
376: -- cursor to get the old admission application status from the
377: -- database by rrengara on 9-APR-2002 for bug no 2298840
378:
379: CURSOR c_adm_appl_status (cp_person_id igs_ad_appl.person_id%TYPE,
380: cp_admission_appl_number igs_ad_appl.admission_appl_number%TYPE) IS
381: SELECT adm_appl_status
382: FROM igs_ad_appl
383: WHERE person_id = cp_person_id
376: -- cursor to get the old admission application status from the
377: -- database by rrengara on 9-APR-2002 for bug no 2298840
378:
379: CURSOR c_adm_appl_status (cp_person_id igs_ad_appl.person_id%TYPE,
380: cp_admission_appl_number igs_ad_appl.admission_appl_number%TYPE) IS
381: SELECT adm_appl_status
382: FROM igs_ad_appl
383: WHERE person_id = cp_person_id
384: AND admission_appl_number= cp_admission_appl_number;
378:
379: CURSOR c_adm_appl_status (cp_person_id igs_ad_appl.person_id%TYPE,
380: cp_admission_appl_number igs_ad_appl.admission_appl_number%TYPE) IS
381: SELECT adm_appl_status
382: FROM igs_ad_appl
383: WHERE person_id = cp_person_id
384: AND admission_appl_number= cp_admission_appl_number;
385:
386: BEGIN
432: -- Update the admission application status.
433:
434: IF v_derived_adm_appl_status IS NOT NULL AND v_derived_adm_appl_status <> v_adm_appl_status THEN
435: UPDATE
436: IGS_AD_APPL
437: SET
438: adm_appl_status = v_derived_adm_appl_status
439: WHERE person_id = v_person_id AND
440: admission_appl_number = v_admission_appl_number;
473: ((new_references.person_id IS NULL) OR
474: (new_references.admission_appl_number IS NULL))) THEN
475: NULL;
476: ELSE
477: IF NOT IGS_AD_APPL_PKG.Get_PK_For_Validation (
478: new_references.person_id,
479: new_references.admission_appl_number
480: ) THEN
481: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
478: new_references.person_id,
479: new_references.admission_appl_number
480: ) THEN
481: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
482: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPL'));
483: IGS_GE_MSG_STACK.ADD;
484: APP_EXCEPTION.RAISE_EXCEPTION;
485: END IF;
486: END IF;
579:
580:
581: END Get_PK_For_Validation;
582:
583: PROCEDURE GET_FK_IGS_AD_APPL (
584: x_person_id IN NUMBER,
585: x_admission_appl_number IN NUMBER
586: ) AS
587:
605: Return;
606: END IF;
607: Close cur_rowid;
608:
609: END GET_FK_IGS_AD_APPL;
610:
611: PROCEDURE GET_FK_IGS_AD_CD (
612: x_admission_cd IN VARCHAR2
613: ) AS