[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: App_Exception.Raise_Exception;
41: Return;
42: END IF;
43: Close cur_old_ref_values;
80: -- Validate the award is not closed
81: IF igs_gr_val_awc.crsp_val_aw_closed(
82: new_references.award_cd,
83: v_message_name) = FALSE THEN
84: Fnd_Message.Set_Name('IGS', v_message_name);
85: App_Exception.Raise_Exception;
86: END IF;
87: -- validate the system award type
88: IF IGS_GR_VAL_AWC.GRDP_VAL_AWARD_TYPE(
88: IF IGS_GR_VAL_AWC.GRDP_VAL_AWARD_TYPE(
89: new_references.award_cd,
90: 'SPECIAL',
91: v_message_name) = FALSE THEN
92: Fnd_Message.Set_Name('IGS', v_message_name);
93: App_Exception.Raise_Exception;
94: END IF;
95: END IF;
96:
106: ELSE
107: IF NOT IGS_PS_AWD_PKG.Get_PK_For_Validation (
108: new_references.award_cd
109: ) THEN
110: FND_MESSAGE.SET_NAME ('FND', 'FORM_RECORD_DELETED');
111: APP_EXCEPTION.RAISE_EXCEPTION;
112: END IF;
113:
114: END IF;
122: IF NOT IGS_EN_STDNT_PS_ATT_PKG.Get_PK_For_Validation (
123: new_references.person_id,
124: new_references.course_cd
125: ) THEN
126: FND_MESSAGE.SET_NAME ('FND', 'FORM_RECORD_DELETED');
127: APP_EXCEPTION.RAISE_EXCEPTION;
128: END IF;
129:
130: END IF;
184: END IF ;
185:
186: IF upper(Column_name) = 'CEREMONY_ANNOUNCED_IND' OR COLUMN_NAME IS NULL THEN
187: IF new_references.CEREMONY_ANNOUNCED_IND not in ('Y','N') then
188: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
189: App_Exception.Raise_Exception ;
190: END IF;
191:
192: END IF ;
192: END IF ;
193:
194: IF upper(Column_name) = 'AWARD_CD' OR COLUMN_NAME IS NULL THEN
195: IF new_references.AWARD_CD<> upper(new_references.AWARD_CD) then
196: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
197: App_Exception.Raise_Exception ;
198: END IF;
199: END IF ;
200:
199: END IF ;
200:
201: IF upper(Column_name) = 'COURSE_CD' OR COLUMN_NAME IS NULL THEN
202: IF new_references.COURSE_CD<> upper(new_references.COURSE_CD) then
203: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
204: App_Exception.Raise_Exception ;
205: END IF;
206:
207: END IF ;
227: Open cur_rowid;
228: Fetch cur_rowid INTO lv_rowid;
229: IF (cur_rowid%FOUND) THEN
230: Close cur_rowid;
231: Fnd_Message.Set_Name ('IGS', 'IGS_GR_SPA_SCA_FK');
232: App_Exception.Raise_Exception;
233: Return;
234: END IF;
235: Close cur_rowid;
279: NEW_REFERENCES.course_cd,
280: NEW_REFERENCES.award_cd,
281: NEW_REFERENCES.award_dt
282: ) THEN
283: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
284: App_Exception.Raise_Exception;
285: END IF;
286:
287: check_constraints;
298: NEW_REFERENCES.course_cd,
299: NEW_REFERENCES.award_cd,
300: NEW_REFERENCES.award_dt
301: ) THEN
302: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
303: App_Exception.Raise_Exception;
304: END IF;
305:
306: check_constraints;
344: if X_LAST_UPDATE_LOGIN is NULL then
345: X_LAST_UPDATE_LOGIN := -1;
346: end if;
347: else
348: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
349: app_exception.raise_exception;
350: end if;
351:
352: Before_DML (
411:
412: EXCEPTION
413: WHEN OTHERS THEN
414: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
415: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
416: fnd_message.set_token ('ERR_CD', SQLCODE);
417: igs_ge_msg_stack.add;
418: igs_sc_gen_001.unset_ctx('R');
419: app_exception.raise_exception;
412: EXCEPTION
413: WHEN OTHERS THEN
414: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
415: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
416: fnd_message.set_token ('ERR_CD', SQLCODE);
417: igs_ge_msg_stack.add;
418: igs_sc_gen_001.unset_ctx('R');
419: app_exception.raise_exception;
420: ELSE
444: open c1;
445: fetch c1 into tlinfo;
446: if (c1%notfound) then
447: close c1;
448: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
449: app_exception.raise_exception;
450: return;
451: end if;
452: close c1;
457: AND (X_COMMENTS is null)))
458: ) then
459: null;
460: else
461: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
462: app_exception.raise_exception;
463: end if;
464: return;
465: end LOCK_ROW;
491: if X_LAST_UPDATE_LOGIN is NULL then
492: X_LAST_UPDATE_LOGIN := -1;
493: end if;
494: else
495: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
496: app_exception.raise_exception;
497: end if;
498:
499: Before_DML (
523: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
524: where ROWID = X_ROWID
525: ;
526: if (sql%notfound) then
527: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
528: igs_ge_msg_stack.add;
529: igs_sc_gen_001.unset_ctx('R');
530: app_exception.raise_exception;
531: end if;
536:
537: EXCEPTION
538: WHEN OTHERS THEN
539: IF (SQLCODE = (-28115)) THEN
540: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
541: fnd_message.set_token ('ERR_CD', SQLCODE);
542: igs_ge_msg_stack.add;
543: igs_sc_gen_001.unset_ctx('R');
544: app_exception.raise_exception;
537: EXCEPTION
538: WHEN OTHERS THEN
539: IF (SQLCODE = (-28115)) THEN
540: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
541: fnd_message.set_token ('ERR_CD', SQLCODE);
542: igs_ge_msg_stack.add;
543: igs_sc_gen_001.unset_ctx('R');
544: app_exception.raise_exception;
545: ELSE
609: END IF;
610: delete from IGS_GR_SPECIAL_AWARD_ALL
611: where ROWID = X_ROWID;
612: if (sql%notfound) then
613: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
614: igs_ge_msg_stack.add;
615: igs_sc_gen_001.unset_ctx('R');
616: app_exception.raise_exception;
617: end if;