[Home] [Help]
154: p_sequence_number IN NUMBER ,
155: p_message_name OUT NOCOPY VARCHAR2 )
156: RETURN BOOLEAN IS
157: BEGIN -- admp_del_acai_hist
158: -- Deletes records from IGS_AD_PS_APLINSTHST table
159: DECLARE
160: FUNCTION admp_del_if_not_locked(
161: p_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
162: p_admission_appl_number
157: BEGIN -- admp_del_acai_hist
158: -- Deletes records from IGS_AD_PS_APLINSTHST table
159: DECLARE
160: FUNCTION admp_del_if_not_locked(
161: p_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
162: p_admission_appl_number
163: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
164: p_nominated_course_cd IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
165: p_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE)
159: DECLARE
160: FUNCTION admp_del_if_not_locked(
161: p_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
162: p_admission_appl_number
163: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
164: p_nominated_course_cd IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
165: p_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE)
166: RETURN BOOLEAN IS
167: e_resource_busy_exception EXCEPTION;
160: FUNCTION admp_del_if_not_locked(
161: p_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
162: p_admission_appl_number
163: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
164: p_nominated_course_cd IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
165: p_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE)
166: RETURN BOOLEAN IS
167: e_resource_busy_exception EXCEPTION;
168: PRAGMA EXCEPTION_INIT(e_resource_busy_exception, -54);
161: p_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
162: p_admission_appl_number
163: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
164: p_nominated_course_cd IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
165: p_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE)
166: RETURN BOOLEAN IS
167: e_resource_busy_exception EXCEPTION;
168: PRAGMA EXCEPTION_INIT(e_resource_busy_exception, -54);
169: BEGIN -- admp_del_if_not_locked
166: RETURN BOOLEAN IS
167: e_resource_busy_exception EXCEPTION;
168: PRAGMA EXCEPTION_INIT(e_resource_busy_exception, -54);
169: BEGIN -- admp_del_if_not_locked
170: -- This function will return false if the IGS_AD_PS_APLINSTHST table
171: -- rows are locked. Otherwise, it will delete the appropriate records from the
172: -- table and return true.
173: DECLARE
174: CURSOR c_acaih (
171: -- rows are locked. Otherwise, it will delete the appropriate records from the
172: -- table and return true.
173: DECLARE
174: CURSOR c_acaih (
175: cp_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
176: cp_admission_appl_number
177: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
178: cp_nominated_course_cd
179: IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
173: DECLARE
174: CURSOR c_acaih (
175: cp_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
176: cp_admission_appl_number
177: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
178: cp_nominated_course_cd
179: IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
180: cp_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE) IS
181:
175: cp_person_id IGS_AD_PS_APLINSTHST.person_id%TYPE,
176: cp_admission_appl_number
177: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
178: cp_nominated_course_cd
179: IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
180: cp_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE) IS
181:
182: SELECT rowid, acaih.*
183: FROM IGS_AD_PS_APLINSTHST acaih
176: cp_admission_appl_number
177: IGS_AD_PS_APLINSTHST.admission_appl_number%TYPE,
178: cp_nominated_course_cd
179: IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
180: cp_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE) IS
181:
182: SELECT rowid, acaih.*
183: FROM IGS_AD_PS_APLINSTHST acaih
184: WHERE acaih.person_id = cp_person_id AND
179: IGS_AD_PS_APLINSTHST.nominated_course_cd%TYPE,
180: cp_sequence_number IGS_AD_PS_APLINSTHST.sequence_number%TYPE) IS
181:
182: SELECT rowid, acaih.*
183: FROM IGS_AD_PS_APLINSTHST acaih
184: WHERE acaih.person_id = cp_person_id AND
185: acaih.admission_appl_number = cp_admission_appl_number AND
186: acaih.nominated_course_cd = cp_nominated_course_cd AND
187: acaih.sequence_number = cp_sequence_number
192: p_admission_appl_number,
193: p_nominated_course_cd,
194: p_sequence_number) LOOP
195:
196: IGS_AD_PS_APLINSTHST_PKG.DELETE_ROW (
197: X_ROWID => v_del_acaih_rec.rowid );
198:
199: END LOOP;
200: RETURN TRUE;