[Home] [Help]
35: -- Populate Old Values.
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: IGS_GE_MSG_STACK.ADD;
42: Close cur_old_ref_values;
43: APP_EXCEPTION.RAISE_EXCEPTION;
94: new_references.start_time,
95: new_references.end_time,
96: new_references.venue_cd,
97: v_message_name) = FALSE THEN
98: FND_MESSAGE.SET_NAME('IGS',v_message_name);
99: IGS_GE_MSG_STACK.ADD;
100: APP_EXCEPTION.RAISE_EXCEPTION;
101: END IF;
102: END IF;
105: (p_updating AND
106: (new_references.exam_supervisor_type <> old_references.exam_supervisor_type)) THEN
107: IF IGS_AS_VAL_ESU.assp_val_est_closed(new_references.exam_supervisor_type,
108: v_message_name) = FALSE THEN
109: FND_MESSAGE.SET_NAME('IGS',v_message_name);
110: IGS_GE_MSG_STACK.ADD;
111: IGS_GE_MSG_STACK.ADD;
112: APP_EXCEPTION.RAISE_EXCEPTION;
113: END IF;
120: NULL;
121: ELSIF NOT IGS_AS_EXAM_SESSION_PKG.Get_UK_For_Validation (
122: new_references.ese_id
123: ) THEN
124: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
125: IGS_GE_MSG_STACK.ADD;
126: APP_EXCEPTION.RAISE_EXCEPTION;
127: END IF;
128:
131: ((new_references.exam_supervisor_type IS NULL))) THEN
132: NULL;
133: ELSIF NOT IGS_AS_EXM_SPRVSRTYP_PKG.Get_PK_For_Validation (
134: new_references.exam_supervisor_type )THEN
135: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
136: IGS_GE_MSG_STACK.ADD;
137: APP_EXCEPTION.RAISE_EXCEPTION;
138: END IF;
139:
142: ((new_references.person_id IS NULL))) THEN
143: NULL;
144: ELSIF NOT IGS_AS_EXM_SUPRVISOR_PKG.Get_PK_For_Validation (
145: new_references.person_id ) THEN
146: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
147: IGS_GE_MSG_STACK.ADD;
148: APP_EXCEPTION.RAISE_EXCEPTION;
149: END IF;
150:
196: BEGIN
197: Open cur_rowid;
198: Fetch cur_rowid INTO lv_rowid;
199: IF (cur_rowid%FOUND) THEN
200: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ESVS_ESE_UFK');
201: IGS_GE_MSG_STACK.ADD;
202: Close cur_rowid;
203: APP_EXCEPTION.RAISE_EXCEPTION;
204:
217: BEGIN
218: Open cur_rowid;
219: Fetch cur_rowid INTO lv_rowid;
220: IF (cur_rowid%FOUND) THEN
221: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ESVS_EST_FK');
222: IGS_GE_MSG_STACK.ADD;
223: Close cur_rowid;
224: APP_EXCEPTION.RAISE_EXCEPTION;
225:
238: BEGIN
239: Open cur_rowid;
240: Fetch cur_rowid INTO lv_rowid;
241: IF (cur_rowid%FOUND) THEN
242: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ESVS_ESU_FK');
243: IGS_GE_MSG_STACK.ADD;
244: Close cur_rowid;
245: APP_EXCEPTION.RAISE_EXCEPTION;
246:
303: NEW_REFERENCES.venue_cd ,
304: NEW_REFERENCES.start_time ,
305: NEW_REFERENCES.end_time
306: ) THEN
307: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
308: IGS_GE_MSG_STACK.ADD;
309: APP_EXCEPTION.RAISE_EXCEPTION;
310: END IF;
311:
327: NEW_REFERENCES.dai_sequence_number ,
328: NEW_REFERENCES.venue_cd ,
329: NEW_REFERENCES.start_time ,
330: NEW_REFERENCES.end_time ) THEN
331: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
332: IGS_GE_MSG_STACK.ADD;
333: APP_EXCEPTION.RAISE_EXCEPTION;
334: END IF;
335: Check_Constraints;
381: if X_LAST_UPDATE_LOGIN is NULL then
382: X_LAST_UPDATE_LOGIN := -1;
383: end if;
384: else
385: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
386: IGS_GE_MSG_STACK.ADD;
387: APP_EXCEPTION.RAISE_EXCEPTION;
388: end if;
389: Before_DML(
479: begin
480: open c1;
481: fetch c1 into tlinfo;
482: if (c1%notfound) then
483: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
484: IGS_GE_MSG_STACK.ADD;
485: APP_EXCEPTION.RAISE_EXCEPTION;
486: close c1;
487: return;
497: AND (trunc(X_OVERRIDE_END_TIME) is null)))
498: ) then
499: null;
500: else
501: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
502: IGS_GE_MSG_STACK.ADD;
503: APP_EXCEPTION.RAISE_EXCEPTION;
504: end if;
505: return;
537: if X_LAST_UPDATE_LOGIN is NULL then
538: X_LAST_UPDATE_LOGIN := -1;
539: end if;
540: else
541: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
542: IGS_GE_MSG_STACK.ADD;
543: APP_EXCEPTION.RAISE_EXCEPTION;
544: end if;
545: Before_DML(
681:
682: IF upper(column_name) = 'DT_ALIAS' OR
683: column_name is null Then
684: IF new_references.DT_ALIAS <> UPPER(new_references.DT_ALIAS) Then
685: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
686: IGS_GE_MSG_STACK.ADD;
687: APP_EXCEPTION.RAISE_EXCEPTION;
688: END IF;
689: END IF;
689: END IF;
690: IF upper(column_name) = 'EXAM_CAL_TYPE' OR
691: column_name is null Then
692: IF new_references.EXAM_CAL_TYPE <> UPPER(new_references.EXAM_CAL_TYPE) Then
693: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
694: IGS_GE_MSG_STACK.ADD;
695: APP_EXCEPTION.RAISE_EXCEPTION;
696: END IF;
697: END IF;
697: END IF;
698: IF upper(column_name) = 'EXAM_SUPERVISOR_TYPE' OR
699: column_name is null Then
700: IF new_references.EXAM_SUPERVISOR_TYPE <> UPPER(new_references.EXAM_SUPERVISOR_TYPE) Then
701: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
702: IGS_GE_MSG_STACK.ADD;
703: APP_EXCEPTION.RAISE_EXCEPTION;
704: END IF;
705: END IF;
705: END IF;
706: IF upper(column_name) = 'VENUE_CD' OR
707: column_name is null Then
708: IF new_references.VENUE_CD <> UPPER(new_references.VENUE_CD) Then
709: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
710: IGS_GE_MSG_STACK.ADD;
711: APP_EXCEPTION.RAISE_EXCEPTION;
712: END IF;
713: END IF;
714:
715: IF upper(column_name) = 'DAI_SEQUENCE_NUMBER' OR
716: column_name is null Then
717: IF new_references.DAI_SEQUENCE_NUMBER < 1 OR new_references.DAI_SEQUENCE_NUMBER > 999999 Then
718: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
719: IGS_GE_MSG_STACK.ADD;
720: APP_EXCEPTION.RAISE_EXCEPTION;
721: END IF;
722: END IF;
722: END IF;
723: IF upper(column_name) = 'EXAM_CI_SEQUENCE_NUMBER' OR
724: column_name is null Then
725: IF new_references.EXAM_CI_SEQUENCE_NUMBER < 1 OR new_references.EXAM_CI_SEQUENCE_NUMBER > 999999 Then
726: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
727: IGS_GE_MSG_STACK.ADD;
728: APP_EXCEPTION.RAISE_EXCEPTION;
729: END IF;
730: END IF;