[Home] [Help]
35: Open cur_old_ref_values;
36: Fetch cur_old_ref_values INTO old_references;
37: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
38: Close cur_old_ref_values;
39: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
40: IGS_GE_MSG_STACK.ADD;
41: App_Exception.Raise_Exception;
42: Return;
43: END IF;
77: IF IGS_EN_VAL_SCSR.enrp_val_scsr_scas(
78: new_references.person_id,
79: new_references.course_cd,
80: v_message_name) = FALSE THEN
81: Fnd_Message.Set_Name('IGS', v_message_name);
82: IGS_GE_MSG_STACK.ADD;
83: App_Exception.Raise_Exception;
84: END IF;
85: END IF;
87: IF IGS_EN_VAL_SCSR.enrp_val_scsr_scas(
88: old_references.person_id,
89: old_references.course_cd,
90: v_message_name) = FALSE THEN
91: Fnd_Message.Set_Name('IGS', v_message_name);
92: IGS_GE_MSG_STACK.ADD;
93: App_Exception.Raise_Exception;
94: END IF;
95: END IF;
97: IF p_inserting THEN
98: IF IGS_EN_VAL_SCSR.enrp_val_scsr_cmp_dt(
99: new_references.completed_dt,
100: v_message_name) = FALSE THEN
101: Fnd_Message.Set_Name('IGS', v_message_name);
102: IGS_GE_MSG_STACK.ADD;
103: App_Exception.Raise_Exception;
104: END IF;
105: END IF;
109: IF IGS_EN_VAL_SCSR.enrp_val_scsr_exp_dt(
110: new_references.completed_dt,
111: new_references.expiry_dt,
112: v_message_name) = FALSE THEN
113: Fnd_Message.Set_Name('IGS', v_message_name);
114: IGS_GE_MSG_STACK.ADD;
115: App_Exception.Raise_Exception;
116: END IF;
117: END IF;
120: IF p_inserting THEN
121: IF IGS_EN_VAL_SCSR.enrp_val_srq_closed(
122: new_references.special_requirement_cd,
123: v_message_name) = FALSE THEN
124: Fnd_Message.Set_Name('IGS', v_message_name);
125: IGS_GE_MSG_STACK.ADD;
126: App_Exception.Raise_Exception;
127: END IF;
128: END IF;
146: new_references.special_requirement_cd,
147: new_references.completed_dt,
148: new_references.expiry_dt,
149: v_message_name) = FALSE THEN
150: Fnd_Message.Set_Name('IGS', v_message_name);
151: IGS_GE_MSG_STACK.ADD;
152: App_Exception.Raise_Exception;
153: END IF;
154: END IF;
174:
175: IF upper(column_name) = 'COURSE_CD' OR
176: column_name is null Then
177: IF new_references.course_cd <> UPPER(new_references.course_cd) Then
178: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
179: IGS_GE_MSG_STACK.ADD;
180: App_Exception.Raise_Exception;
181: END IF;
182: END IF;
183:
184: IF upper(column_name) = 'SPECIAL_REQUIREMENT_CD' OR
185: column_name is null Then
186: IF new_references.special_requirement_cd <> UPPER(new_references.special_requirement_cd) Then
187: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
188: IGS_GE_MSG_STACK.ADD;
189: App_Exception.Raise_Exception;
190: END IF;
191: END IF;
192:
193: IF upper(column_name) = 'REFERENCE' OR
194: column_name is null Then
195: IF new_references.reference <> UPPER(new_references.reference) Then
196: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
197: IGS_GE_MSG_STACK.ADD;
198: App_Exception.Raise_Exception;
199: END IF;
200: END IF;
212: IF NOT IGS_EN_STDNT_PS_ATT_PKG.Get_PK_For_Validation (
213: new_references.person_id,
214: new_references.course_cd
215: ) THEN
216: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
217: IGS_GE_MSG_STACK.ADD;
218: App_Exception.Raise_Exception;
219: END IF;
220: END IF;
225: ELSE
226: IF NOT IGS_GE_SPL_REQ_PKG.Get_PK_For_Validation (
227: new_references.special_requirement_cd
228: ) THEN
229: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
230: IGS_GE_MSG_STACK.ADD;
231: App_Exception.Raise_Exception;
232: END IF;
233: END IF;
282: Open cur_rowid;
283: Fetch cur_rowid INTO lv_rowid;
284: IF (cur_rowid%FOUND) THEN
285: Close cur_rowid;
286: Fnd_Message.Set_Name ('IGS', 'IGS_PS_SCSR_SCA_FK');
287: IGS_GE_MSG_STACK.ADD;
288: App_Exception.Raise_Exception;
289: Return;
290: END IF;
308: Open cur_rowid;
309: Fetch cur_rowid INTO lv_rowid;
310: IF (cur_rowid%FOUND) THEN
311: Close cur_rowid;
312: Fnd_Message.Set_Name ('IGS', 'IGS_PS_SCSR_SRQ_FK');
313: IGS_GE_MSG_STACK.ADD;
314: App_Exception.Raise_Exception;
315: Return;
316: END IF;
361: new_references.course_cd,
362: new_references.special_requirement_cd,
363: new_references.completed_dt
364: ) THEN
365: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
366: IGS_GE_MSG_STACK.ADD;
367: App_Exception.Raise_Exception;
368: END IF;
369: Check_Constraints;
382: new_references.course_cd,
383: new_references.special_requirement_cd,
384: new_references.completed_dt
385: ) THEN
386: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
387: IGS_GE_MSG_STACK.ADD;
388: App_Exception.Raise_Exception;
389: END IF;
390: Check_Constraints;
447: if X_LAST_UPDATE_LOGIN is NULL then
448: X_LAST_UPDATE_LOGIN := -1;
449: end if;
450: else
451: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
452: IGS_GE_MSG_STACK.ADD;
453: app_exception.raise_exception;
454: end if;
455:
521:
522: EXCEPTION
523: WHEN OTHERS THEN
524: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
525: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
526: fnd_message.set_token ('ERR_CD', SQLCODE);
527: igs_ge_msg_stack.add;
528: igs_sc_gen_001.unset_ctx('R');
529: app_exception.raise_exception;
522: EXCEPTION
523: WHEN OTHERS THEN
524: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
525: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
526: fnd_message.set_token ('ERR_CD', SQLCODE);
527: igs_ge_msg_stack.add;
528: igs_sc_gen_001.unset_ctx('R');
529: app_exception.raise_exception;
530: ELSE
557: open c1;
558: fetch c1 into tlinfo;
559: if (c1%notfound) then
560: close c1;
561: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
562: IGS_GE_MSG_STACK.ADD;
563: app_exception.raise_exception;
564: return;
565: end if;
576: AND (X_COMMENTS is null)))
577: ) then
578: null;
579: else
580: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
581: IGS_GE_MSG_STACK.ADD;
582: app_exception.raise_exception;
583: end if;
584: return;
612: if X_LAST_UPDATE_LOGIN is NULL then
613: X_LAST_UPDATE_LOGIN := -1;
614: end if;
615: else
616: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
617: IGS_GE_MSG_STACK.ADD;
618: app_exception.raise_exception;
619: end if;
620:
647: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
648: where ROWID = X_ROWID
649: ;
650: if (sql%notfound) then
651: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
652: igs_ge_msg_stack.add;
653: igs_sc_gen_001.unset_ctx('R');
654: app_exception.raise_exception;
655: end if;
664:
665: EXCEPTION
666: WHEN OTHERS THEN
667: IF (SQLCODE = (-28115)) THEN
668: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
669: fnd_message.set_token ('ERR_CD', SQLCODE);
670: igs_ge_msg_stack.add;
671: igs_sc_gen_001.unset_ctx('R');
672: app_exception.raise_exception;
665: EXCEPTION
666: WHEN OTHERS THEN
667: IF (SQLCODE = (-28115)) THEN
668: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
669: fnd_message.set_token ('ERR_CD', SQLCODE);
670: igs_ge_msg_stack.add;
671: igs_sc_gen_001.unset_ctx('R');
672: app_exception.raise_exception;
673: ELSE
739: END IF;
740: delete from IGS_PS_STDNT_SPL_REQ
741: where ROWID = X_ROWID;
742: if (sql%notfound) then
743: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
744: igs_ge_msg_stack.add;
745: igs_sc_gen_001.unset_ctx('R');
746: app_exception.raise_exception;
747: end if;