[Home] [Help]
34: -- Populate Old Values.
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: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
39: Igs_Ge_Msg_Stack.Add;
40: Close cur_old_ref_values;
41: App_Exception.Raise_Exception;
42: Return;
75: (p_updating AND
76: (new_references.exam_supervisor_type <> old_references.exam_supervisor_type)) THEN
77: IF IGS_AS_VAL_ESU.assp_val_est_closed(new_references.exam_supervisor_type,
78: v_message_name) = FALSE THEN
79: Fnd_Message.Set_Name('IGS', v_message_name);
80: Igs_Ge_Msg_Stack.Add;
81: App_Exception.Raise_Exception;
82: END IF;
83: END IF;
91: -- As part of the bug# 1956374 changed to the below call from IGS_AS_VAL_ESU.crsp_val_ou_sys_sts
92: IF IGS_PS_VAL_CRV.crsp_val_ou_sys_sts(new_references.responsible_org_unit_cd,
93: new_references.responsible_ou_start_dt,
94: v_message_name) = FALSE THEN
95: Fnd_Message.Set_Name('IGS', v_message_name);
96: Igs_Ge_Msg_Stack.Add;
97: App_Exception.Raise_Exception;
98: END IF;
99: END IF;
110: ELSE
111: IF NOT(IGS_AS_EXM_SPRVSRTYP_PKG.Get_PK_For_Validation (
112: new_references.exam_supervisor_type
113: ))THEN
114: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
115: Igs_Ge_Msg_Stack.Add;
116: App_Exception.Raise_Exception;
117: END IF;
118:
127: IF NOT(IGS_OR_UNIT_PKG.Get_PK_For_Validation (
128: new_references.responsible_org_unit_cd,
129: new_references.responsible_ou_start_dt
130: ))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: END IF;
140: ELSE
141: IF NOT(IGS_PE_PERSON_PKG.Get_PK_For_Validation (
142: new_references.person_id
143: ))THEN
144: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
145: Igs_Ge_Msg_Stack.Add;
146: App_Exception.Raise_Exception;
147: END IF;
148: END IF;
166: END IF;
167: IF upper(column_name) = 'EXAM_SUPERVISOR_TYPE' OR
168: column_name is null Then
169: IF new_references.exam_supervisor_type <> UPPER(new_references.exam_supervisor_type) Then
170: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
171: Igs_Ge_Msg_Stack.Add;
172: App_Exception.Raise_Exception;
173: END IF;
174: END IF;
175:
176: IF upper(column_name) = 'PREVIOUS_SESSIONS' OR
177: column_name is null Then
178: IF new_references.previous_sessions < 0 AND new_references.previous_sessions > 9999 Then
179: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
180: Igs_Ge_Msg_Stack.Add;
181: App_Exception.Raise_Exception;
182: END IF;
183: END IF;
241:
242: Open cur_rowid;
243: Fetch cur_rowid INTO lv_rowid;
244: IF (cur_rowid%FOUND) THEN
245: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ESU_EST_FK');
246: Igs_Ge_Msg_Stack.Add;
247: Close cur_rowid;
248: App_Exception.Raise_Exception;
249: Return;
269:
270: Open cur_rowid;
271: Fetch cur_rowid INTO lv_rowid;
272: IF (cur_rowid%FOUND) THEN
273: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ESU_OU_FK');
274: Igs_Ge_Msg_Stack.Add;
275: Close cur_rowid;
276: App_Exception.Raise_Exception;
277: Return;
295:
296: Open cur_rowid;
297: Fetch cur_rowid INTO lv_rowid;
298: IF (cur_rowid%FOUND) THEN
299: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ESU_PE_FK');
300: Igs_Ge_Msg_Stack.Add;
301: Close cur_rowid;
302: App_Exception.Raise_Exception;
303: Return;
346: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
347: IF Get_PK_For_Validation (
348: new_references.person_id
349: ) THEN
350: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
351: Igs_Ge_Msg_Stack.Add;
352: App_Exception.Raise_Exception;
353: END IF;
354:
366: ELSIF (p_action = 'VALIDATE_INSERT') THEN
367: IF Get_PK_For_Validation (
368: new_references.person_id
369: ) THEN
370: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
371: Igs_Ge_Msg_Stack.Add;
372: App_Exception.Raise_Exception;
373: END IF;
374: Check_Constraints;
413: if X_LAST_UPDATE_LOGIN is NULL then
414: X_LAST_UPDATE_LOGIN := -1;
415: end if;
416: else
417: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
418: Igs_Ge_Msg_Stack.Add;
419: app_exception.raise_exception;
420: end if;
421: Before_DML(
493: begin
494: open c1;
495: fetch c1 into tlinfo;
496: if (c1%notfound) then
497: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
498: Igs_Ge_Msg_Stack.Add;
499: close c1;
500: app_exception.raise_exception;
501: return;
517: AND (X_COMMENTS is null)))
518: ) then
519: null;
520: else
521: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
522: Igs_Ge_Msg_Stack.Add;
523: app_exception.raise_exception;
524: end if;
525: return;
552: if X_LAST_UPDATE_LOGIN is NULL then
553: X_LAST_UPDATE_LOGIN := -1;
554: end if;
555: else
556: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
557: Igs_Ge_Msg_Stack.Add;
558: app_exception.raise_exception;
559: end if;
560: Before_DML(