[Home] [Help]
37: -- Populate Old Values.
38: Open cur_old_ref_values;
39: Fetch cur_old_ref_values INTO old_references;
40: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
41: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
42: IGS_GE_MSG_STACK.ADD;
43: Close cur_old_ref_values;
44: APP_EXCEPTION.RAISE_EXCEPTION;
45:
99: -- Cannot create against closed IGS_GR_VENUE
100: IF igs_gr_val_gc.assp_val_ve_closed (
101: new_references.venue_cd,
102: v_message_name) = FALSE THEN
103: FND_MESSAGE.SET_NAME('IGS',v_message_name);
104: IGS_GE_MSG_STACK.ADD;
105: APP_EXCEPTION.RAISE_EXCEPTION;
106: END IF;
107: --
109: IF IGS_AS_VAL_EVSA.assp_val_ci_status (
110: new_references.exam_cal_type,
111: new_references.exam_ci_sequence_number,
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;
127: ((new_references.ese_id IS NULL))) THEN
128: NULL;
129: ELSIF NOT IGS_AS_EXAM_SESSION_PKG.Get_UK_For_Validation (
130: new_references.ese_id ) THEN
131: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
132: IGS_GE_MSG_STACK.ADD;
133: APP_EXCEPTION.RAISE_EXCEPTION;
134: END IF;
135:
154: new_references.dt_alias,
155: new_references.dai_sequence_number,
156: new_references.start_time,
157: new_references.end_time )THEN
158: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
159: IGS_GE_MSG_STACK.ADD;
160: APP_EXCEPTION.RAISE_EXCEPTION;
161: END IF;
162:
165: ((new_references.venue_cd IS NULL))) THEN
166: NULL;
167: ELSIF NOT IGS_GR_VENUE_PKG.Get_PK_For_Validation (
168: new_references.venue_cd ) THEN
169: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
170: IGS_GE_MSG_STACK.ADD;
171: APP_EXCEPTION.RAISE_EXCEPTION;
172: END IF;
173:
226:
227: Open cur_rowid;
228: Fetch cur_rowid INTO lv_rowid;
229: IF (cur_rowid%FOUND) THEN
230: Fnd_Message.Set_Name ('IGS', 'IGS_AS_EVSA_ESE_UFK');
231: IGS_GE_MSG_STACK.ADD;
232: Close cur_rowid;
233: APP_EXCEPTION.RAISE_EXCEPTION;
234:
263:
264: Open cur_rowid;
265: Fetch cur_rowid INTO lv_rowid;
266: IF (cur_rowid%FOUND) THEN
267: Fnd_Message.Set_Name ('IGS', 'IGS_AS_EVSA_ESE_UFK');
268: IGS_GE_MSG_STACK.ADD;
269: Close cur_rowid;
270: APP_EXCEPTION.RAISE_EXCEPTION;
271:
290:
291: Open cur_rowid;
292: Fetch cur_rowid INTO lv_rowid;
293: IF (cur_rowid%FOUND) THEN
294: Fnd_Message.Set_Name ('IGS', 'IGS_AS_EVSA_VE_FK');
295: IGS_GE_MSG_STACK.ADD;
296: Close cur_rowid;
297: APP_EXCEPTION.RAISE_EXCEPTION;
298:
353: NEW_REFERENCES.dt_alias ,
354: NEW_REFERENCES.dai_sequence_number ,
355: NEW_REFERENCES.start_time ,
356: NEW_REFERENCES.end_time ) THEN
357: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
358: IGS_GE_MSG_STACK.ADD;
359: APP_EXCEPTION.RAISE_EXCEPTION;
360: END IF;
361:
376: NEW_REFERENCES.dt_alias ,
377: NEW_REFERENCES.dai_sequence_number ,
378: NEW_REFERENCES.start_time ,
379: NEW_REFERENCES.end_time) THEN
380: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
381: IGS_GE_MSG_STACK.ADD;
382: APP_EXCEPTION.RAISE_EXCEPTION;
383: END IF;
384:
448: else
449: X_PROGRAM_UPDATE_DATE := SYSDATE;
450: end if;
451: else
452: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
453: IGS_GE_MSG_STACK.ADD;
454: APP_EXCEPTION.RAISE_EXCEPTION;
455: end if;
456: Before_DML(
547: begin
548: open c1;
549: fetch c1 into tlinfo;
550: if (c1%notfound) then
551: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
552: IGS_GE_MSG_STACK.ADD;
553: APP_EXCEPTION.RAISE_EXCEPTION;
554: close c1;
555: return;
562: AND (X_COMMENTS is null)))
563: ) then
564: null;
565: else
566: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
567: IGS_GE_MSG_STACK.ADD;
568: APP_EXCEPTION.RAISE_EXCEPTION;
569: end if;
570: return;
604: if X_LAST_UPDATE_LOGIN is NULL then
605: X_LAST_UPDATE_LOGIN := -1;
606: end if;
607: else
608: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
609: IGS_GE_MSG_STACK.ADD;
610: APP_EXCEPTION.RAISE_EXCEPTION;
611: end if;
612: Before_DML(
761:
762: IF upper(column_name) = 'VENUE_CD' OR
763: column_name is null Then
764: IF new_references.VENUE_CD <> UPPER(new_references.VENUE_CD) Then
765: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
766: IGS_GE_MSG_STACK.ADD;
767: APP_EXCEPTION.RAISE_EXCEPTION;
768: END IF;
769: END IF;
769: END IF;
770: IF upper(column_name) = 'EXAM_CAL_TYPE' OR
771: column_name is null Then
772: IF new_references.EXAM_CAL_TYPE <> UPPER(new_references.EXAM_CAL_TYPE) Then
773: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
774: IGS_GE_MSG_STACK.ADD;
775: APP_EXCEPTION.RAISE_EXCEPTION;
776: END IF;
777: END IF;
777: END IF;
778: IF upper(column_name) = 'DT_ALIAS' OR
779: column_name is null Then
780: IF new_references.DT_ALIAS <> UPPER(new_references.DT_ALIAS) Then
781: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
782: IGS_GE_MSG_STACK.ADD;
783: APP_EXCEPTION.RAISE_EXCEPTION;
784: END IF;
785: END IF;
787:
788: IF upper(column_name) = 'EXAM_CI_SEQUENCE_NUMBER' OR
789: column_name is null Then
790: IF new_references.EXAM_CI_SEQUENCE_NUMBER < 1 OR new_references.EXAM_CI_SEQUENCE_NUMBER > 999999 Then
791: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
792: IGS_GE_MSG_STACK.ADD;
793: APP_EXCEPTION.RAISE_EXCEPTION;
794: END IF;
795: END IF;
795: END IF;
796: IF upper(column_name) = 'DAI_SEQUENCE_NUMBER' OR
797: column_name is null Then
798: IF new_references.DAI_SEQUENCE_NUMBER < 1 OR new_references.DAI_SEQUENCE_NUMBER > 999999 Then
799: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
800: IGS_GE_MSG_STACK.ADD;
801: APP_EXCEPTION.RAISE_EXCEPTION;
802: END IF;
803: END IF;
803: END IF;
804: IF upper(column_name) = 'ESE_ID' OR
805: column_name is null Then
806: IF new_references.ESE_ID < 1 OR new_references.ESE_ID > 999999 Then
807: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
808: IGS_GE_MSG_STACK.ADD;
809: APP_EXCEPTION.RAISE_EXCEPTION;
810: END IF;
811: END IF;