[Home] [Help]
39: -- Populate Old Values.
40: Open cur_old_ref_values;
41: Fetch cur_old_ref_values INTO old_references;
42: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
43: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
44: IGS_GE_MSG_STACK.ADD;
45: Close cur_old_ref_values;
46: App_Exception.Raise_Exception;
47: Return;
86: THEN
87: IF IGS_EN_VAL_PCE.enrp_val_encmb_dt (
88: new_references.pcge_start_dt,
89: v_message_name) = FALSE THEN
90: Fnd_Message.Set_Name('IGS', v_message_name);
91: IGS_GE_MSG_STACK.ADD;
92: App_Exception.Raise_Exception;
93: END IF;
94: END IF;
99: IF IGS_EN_VAL_PCE.enrp_val_encmb_dts (
100: new_references.pee_start_dt,
101: new_references.pcge_start_dt,
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: END IF;
115: IF IGS_EN_VAL_PCE.enrp_val_strt_exp_dt (
116: new_references.pcge_start_dt,
117: new_references.expiry_dt,
118: v_message_name) = FALSE THEN
119: Fnd_Message.Set_Name('IGS', v_message_name);
120: IGS_GE_MSG_STACK.ADD;
121: App_Exception.Raise_Exception;
122: END IF;
123: IF IGS_EN_VAL_PCE.enrp_val_encmb_dt (
122: END IF;
123: IF IGS_EN_VAL_PCE.enrp_val_encmb_dt (
124: new_references.expiry_dt,
125: v_message_name) = FALSE THEN
126: Fnd_Message.Set_Name('IGS', v_message_name);
127: IGS_GE_MSG_STACK.ADD;
128: App_Exception.Raise_Exception;
129: END IF;
130: END IF;
135: IF IGS_EN_VAL_PCE.enrp_val_pee_table (
136: new_references.s_encmb_effect_type,
137: 'IGS_PE_CRS_GRP_EXCL',
138: v_message_name) = FALSE THEN
139: Fnd_Message.Set_Name('IGS', v_message_name);
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception;
142: END IF;
143: END IF;
170: new_references.pee_start_dt,
171: new_references.course_group_cd,
172: new_references.pcge_start_dt,
173: v_message_name) = FALSE THEN
174: Fnd_Message.Set_Name('IGS', v_message_name);
175: IGS_GE_MSG_STACK.ADD;
176: App_Exception.Raise_Exception;
177: END IF;
178:
208:
209: IF upper(column_name) = 'COURSE_GROUP_CD' OR
210: column_name is null Then
211: IF new_references.course_group_cd <> UPPER(new_references.course_group_cd) Then
212: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
213: IGS_GE_MSG_STACK.ADD;
214: App_Exception.Raise_Exception;
215: END IF;
216: END IF;
218: IF upper(column_name) = 'ENCUMBRANCE_TYPE' OR
219: column_name is null Then
220: IF new_references.encumbrance_type <>
221: UPPER(new_references.encumbrance_type) Then
222: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
223: IGS_GE_MSG_STACK.ADD;
224: App_Exception.Raise_Exception;
225: END IF;
226: END IF;
227: IF upper(column_name) = 'S_ENCMB_EFFECT_TYPE' OR
228: column_name is null Then
229: IF new_references.s_encmb_effect_type<>
230: UPPER(new_references.s_encmb_effect_type) Then
231: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
232: IGS_GE_MSG_STACK.ADD;
233: App_Exception.Raise_Exception;
234: END IF;
235: END IF;
249:
250: IF NOT IGS_PS_GRP_PKG.Get_PK_For_Validation (
251: new_references.course_group_cd
252: ) THEN
253: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
254: IGS_GE_MSG_STACK.ADD;
255: App_Exception.Raise_Exception;
256: END IF;
257: END IF;
276: new_references.pen_start_dt,
277: new_references.s_encmb_effect_type,
278: new_references.pee_start_dt,
279: new_references.pee_sequence_number ) THEN
280: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
281: IGS_GE_MSG_STACK.ADD;
282: App_Exception.Raise_Exception;
283: END IF;
284: END IF;
349:
350: Open cur_rowid;
351: Fetch cur_rowid INTO lv_rowid;
352: IF (cur_rowid%FOUND) THEN
353: Fnd_Message.Set_Name ('IGS', 'IGS_PE_PCGE_PEE_FK');
354: IGS_GE_MSG_STACK.ADD;
355: Close cur_rowid;
356: App_Exception.Raise_Exception;
357: Return;
410: new_references.pee_start_dt ,
411: new_references.pee_sequence_number,
412: new_references.course_group_cd,
413: new_references.pcge_start_dt) THEN
414: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
415: IGS_GE_MSG_STACK.ADD;
416: App_Exception.Raise_Exception;
417: END IF;
418:
438: new_references.pee_start_dt ,
439: new_references.pee_sequence_number,
440: new_references.course_group_cd,
441: new_references.pcge_start_dt) THEN
442: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
443: IGS_GE_MSG_STACK.ADD;
444: App_Exception.Raise_Exception;
445: END IF;
446: Check_Constraints; -- if procedure present
516: if X_LAST_UPDATE_LOGIN is NULL then
517: X_LAST_UPDATE_LOGIN := -1;
518: end if;
519: else
520: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
521: IGS_GE_MSG_STACK.ADD;
522: app_exception.raise_exception;
523: end if;
524:
608: begin
609: open c1;
610: fetch c1 into tlinfo;
611: if (c1%notfound) then
612: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
613:
614: close c1;
615: App_Exception.Raise_Exception;
616: return;
622: AND (X_EXPIRY_DT is null)))
623: ) then
624: null;
625: else
626: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
627: app_exception.raise_exception;
628: end if;
629: return;
630: end LOCK_ROW;
659: if X_LAST_UPDATE_LOGIN is NULL then
660: X_LAST_UPDATE_LOGIN := -1;
661: end if;
662: else
663: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
664: IGS_GE_MSG_STACK.ADD;
665: app_exception.raise_exception;
666: end if;
667: Before_DML(