[Home] [Help]
36: Open cur_old_ref_values;
37: Fetch cur_old_ref_values INTO old_references;
38: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
39: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
40: Igs_Ge_Msg_Stack.Add;
41: Close cur_old_ref_values;
42: App_Exception.Raise_Exception;
43:
44: Return;
87: new_references.course_cd,
88: new_references.version_number,
89: v_message_name) = FALSE THEN
90: Fnd_Message.Set_Name('IGS', v_message_name);
91: Igs_Ge_Msg_Stack.Add;
92: App_Exception.Raise_Exception;
93: END IF;
94: END IF;
95:
135: IF upper(column_name) = 'COURSE_CD' OR
136: column_name is null Then
137: IF new_references.COURSE_CD <> UPPER(new_references.COURSE_CD) Then
138: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
139: Igs_Ge_Msg_Stack.Add;
140: App_Exception.Raise_Exception;
141: END IF;
142: END IF;
143: OPEN c_local_inst_ind (new_references.exemption_institution_cd);
162: IF (rec_cur_program_exempt_totals.adv_stnd_limit <> -1) THEN
163: IF new_references.total_exmptn_granted < 0 OR
164: new_references.total_exmptn_granted > rec_cur_program_exempt_totals.adv_stnd_limit Then
165: Fnd_Message.Set_Name ('IGS', l_message_name);
166: Igs_Ge_Msg_Stack.Add;
167: App_Exception.Raise_Exception;
168: END IF;
169: END IF;
170: END IF;
173: column_name is null Then
174: IF new_references.TOTAL_EXMPTN_PERC_GRNTD < 0 OR
175: new_references.TOTAL_EXMPTN_PERC_GRNTD > 100 Then
176: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
177: Igs_Ge_Msg_Stack.Add;
178: App_Exception.Raise_Exception;
179: END IF;
180: END IF;
181:
184: IF (rec_cur_program_exempt_totals.adv_stnd_limit <> -1) THEN
185: IF new_references.TOTAL_EXMPTN_APPROVED < 0 OR
186: new_references.TOTAL_EXMPTN_APPROVED > rec_cur_program_exempt_totals.adv_stnd_limit Then
187: Fnd_Message.Set_Name ('IGS', l_message_name);
188: Igs_Ge_Msg_Stack.Add;
189: App_Exception.Raise_Exception;
190: END IF;
191: END IF;
192: END IF;
207: new_references.course_cd,
208: new_references.version_number) THEN
209:
210: FND_Message.Set_Name('FND','FORM_RECORD_DELETED');
211: Igs_Ge_Msg_Stack.Add;
212: App_Exception.Raise_Exception ;
213:
214: END IF;
215: ---
223: IF NOT IGS_PE_PERSON_PKG.Get_PK_For_Validation (
224: new_references.person_id) THEN
225:
226: FND_Message.Set_Name('FND','FORM_RECORD_DELETED');
227: Igs_Ge_Msg_Stack.Add;
228: App_Exception.Raise_Exception ;
229: END IF;
230: ---
231: END IF;
303: Open cur_rowid;
304: Fetch cur_rowid INTO lv_rowid;
305: IF (cur_rowid%FOUND) THEN
306: Fnd_Message.Set_Name ('IGS', 'IGS_AV_AS_CRV_FK');
307: Igs_Ge_Msg_Stack.Add;
308: Close cur_rowid;
309: App_Exception.Raise_Exception;
310: Return;
311: END IF;
327: Open cur_rowid;
328: Fetch cur_rowid INTO lv_rowid;
329: IF (cur_rowid%FOUND) THEN
330: Fnd_Message.Set_Name ('IGS', 'IGS_AV_AS_PE_FK');
331: Igs_Ge_Msg_Stack.Add;
332: Close cur_rowid;
333: App_Exception.Raise_Exception;
334: Return;
335: END IF;
380: --
381: IF Get_PK_For_Validation (new_references.person_id,
382: new_references.course_cd, new_references.version_number,new_references.exemption_institution_cd) THEN
383: FND_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC') ;
384: Igs_Ge_Msg_Stack.Add;
385: App_Exception.Raise_Exception ;
386: END IF;
387: --
388: CHECK_CONSTRAINTS;
399: ELSIF (P_Action = 'VALIDATE_INSERT') THEN
400: IF Get_PK_For_Validation (new_references.person_id,
401: new_references.course_cd, new_references.version_number,new_references.exemption_institution_cd) THEN
402: FND_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC') ;
403: Igs_Ge_Msg_Stack.Add;
404: App_Exception.Raise_Exception ;
405: END IF;
406: CHECK_CONSTRAINTS;
407: ELSIF (P_Action = 'VALIDATE_UPDATE') THEN
446: X_LAST_UPDATE_LOGIN := -1;
447: end if;
448: else
449: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
450: Igs_Ge_Msg_Stack.Add;
451: app_exception.raise_exception;
452: end if;
453: Before_DML(
454: p_action=>'INSERT',
516: WHEN OTHERS THEN
517: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
518: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
519: fnd_message.set_token ('ERR_CD', SQLCODE);
520: igs_ge_msg_stack.add;
521: igs_sc_gen_001.unset_ctx('R');
522: app_exception.raise_exception;
523: ELSE
524: igs_sc_gen_001.unset_ctx('R');
550: open c1;
551: fetch c1 into tlinfo;
552: if (c1%notfound) then
553: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
554: Igs_Ge_Msg_Stack.Add;
555: close c1;
556: app_exception.raise_exception;
557: return;
558: end if;
565: ) then
566: null;
567: else
568: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
569: Igs_Ge_Msg_Stack.Add;
570: app_exception.raise_exception;
571: end if;
572: return;
573: end LOCK_ROW;
601: X_LAST_UPDATE_LOGIN := -1;
602: end if;
603: else
604: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
605: Igs_Ge_Msg_Stack.Add;
606: app_exception.raise_exception;
607: end if;
608: Before_DML(
609: p_action=>'UPDATE',
633: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
634: where ROWID = X_ROWID ;
635: if (sql%notfound) then
636: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
637: igs_ge_msg_stack.add;
638: igs_sc_gen_001.unset_ctx('R');
639: app_exception.raise_exception;
640: end if;
641: IF (x_mode = 'S') THEN
647: WHEN OTHERS THEN
648: IF (SQLCODE = (-28115)) THEN
649: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
650: fnd_message.set_token ('ERR_CD', SQLCODE);
651: igs_ge_msg_stack.add;
652: igs_sc_gen_001.unset_ctx('R');
653: app_exception.raise_exception;
654: ELSE
655: igs_sc_gen_001.unset_ctx('R');
721: delete from IGS_AV_ADV_STANDING_ALL
722: where ROWID = X_ROWID ;
723: if (sql%notfound) then
724: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
725: igs_ge_msg_stack.add;
726: igs_sc_gen_001.unset_ctx('R');
727: app_exception.raise_exception;
728: end if;
729: IF (x_mode = 'S') THEN