[Home] [Help]
38: Fetch cur_old_ref_values INTO old_references;
39: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
40: Close cur_old_ref_values;
41: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
42: IGS_GE_MSG_STACK.ADD;
43: App_Exception.Raise_Exception;
44: Return;
45: END IF;
46: Close cur_old_ref_values;
93: v_unit_cd,
94: v_version_number,
95: v_message_name) = FALSE THEN
96: FND_MESSAGE.SET_NAME('IGS',v_message_name);
97: IGS_GE_MSG_STACK.ADD;
98: APP_EXCEPTION.RAISE_EXCEPTION;
99: END IF;
100: -- Validate IGS_PS_UNIT level.
101: IF p_inserting OR (p_updating AND (old_references.unit_level <> new_references.unit_level)) THEN
103: IF IGS_PS_VAL_UV.crsp_val_unit_lvl (
104: new_references.unit_level,
105: v_message_name) = FALSE THEN
106: FND_MESSAGE.SET_NAME('IGS',v_message_name);
107: IGS_GE_MSG_STACK.ADD;
108: APP_EXCEPTION.RAISE_EXCEPTION;
109: END IF;
110: END IF;
111:
165: OPEN cur_rowid;
166: FETCH cur_rowid INTO lv_rowid;
167: IF cur_rowid%FOUND THEN
168: FND_MESSAGE.SET_NAME ('IGS', 'IGS_PR_PRA_CRV_FK');
169: IGS_GE_MSG_STACK.ADD;
170: CLOSE CUR_ROWID;
171: APP_EXCEPTION.RAISE_EXCEPTION;
172: RETURN;
173: END IF;
193: column_name is null THEN
194: IF new_references.unit_cd <> UPPER(new_references.unit_cd)
195: THEN
196: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
197: IGS_GE_MSG_STACK.ADD;
198: App_Exception.Raise_Exception;
199: END IF;
200: END IF;
201:
203: column_name is null THEN
204: IF new_references.unit_level <> UPPER(new_references.unit_level)
205: THEN
206: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
207: IGS_GE_MSG_STACK.ADD;
208: App_Exception.Raise_Exception;
209: END IF;
210: END IF;
211:
214: IF new_references.wam_weighting < 0 OR
215: new_references.wam_weighting > 99999.99
216: THEN
217: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception;
220: END IF;
221: END IF;
222:
232: IF NOT IGS_PS_UNIT_LEVEL_PKG.Get_PK_For_Validation (
233: new_references.unit_level
234: )THEN
235: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: END IF;
239: END IF;
240:
248: new_references.unit_cd,
249: new_references.version_number
250: )THEN
251: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
252: IGS_GE_MSG_STACK.ADD;
253: App_Exception.Raise_Exception;
254: END IF;
255: END IF;
256:
262: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
263: new_references.course_cd,
264: new_references.course_version_number) THEN
265: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
266: IGS_GE_MSG_STACK.ADD;
267: APP_EXCEPTION.RAISE_EXCEPTION;
268: END IF;
269: END IF;
270: END Check_Parent_Existance;
320: Fetch cur_rowid INTO lv_rowid;
321: IF (cur_rowid%FOUND) THEN
322: Close cur_rowid;
323: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CUL_UV_FK');
324: IGS_GE_MSG_STACK.ADD;
325: App_Exception.Raise_Exception;
326: Return;
327: END IF;
328: Close cur_rowid;
373: new_references.version_number,
374: new_references.course_cd,
375: new_references.course_version_number) THEN
376: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
377: IGS_GE_MSG_STACK.ADD;
378: App_Exception.Raise_Exception;
379: END IF;
380: Check_Constraints;
381: Check_Parent_Existance;
393: new_references.version_number,
394: new_references.course_cd,
395: new_references.course_version_number) THEN
396: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
397: IGS_GE_MSG_STACK.ADD;
398: App_Exception.Raise_Exception;
399: END IF;
400: Check_Constraints;
401: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
452: X_LAST_UPDATE_LOGIN := -1;
453: end if;
454: else
455: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
456: IGS_GE_MSG_STACK.ADD;
457: app_exception.raise_exception;
458: end if;
459: Before_DML( p_action => 'INSERT',
460: x_rowid => X_ROWID,
587: X_LAST_UPDATE_LOGIN := -1;
588: end if;
589: else
590: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
591: IGS_GE_MSG_STACK.ADD;
592: app_exception.raise_exception;
593: end if;
594: Before_DML( p_action => 'UPDATE',
595: x_rowid => X_ROWID,