[Home] [Help]
31: -- Populate Old Values.
32: Open cur_old_ref_values;
33: Fetch cur_old_ref_values INTO old_references;
34: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
35: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
36: IGS_GE_MSG_STACK.ADD;
37: Close cur_old_ref_values;
38: App_Exception.Raise_Exception;
39: Return;
85: IF IGS_PS_VAL_COUSR.crsp_val_iud_us_dtl (
86: v_unit_set_cd,
87: v_version_number,
88: v_message_name) = FALSE THEN
89: Fnd_Message.Set_Name('IGS', v_message_name);
90: IGS_GE_MSG_STACK.ADD;
91: App_Exception.Raise_Exception;
92: END IF;
93: IF p_inserting OR p_updating THEN
95: -- Can not alter details when COURSE type is closed
96: IF IGS_as_VAL_acot.crsp_val_cty_closed (
97: new_references.course_type,
98: v_message_name) = FALSE THEN
99: Fnd_Message.Set_Name('IGS', v_message_name);
100: IGS_GE_MSG_STACK.ADD;
101: App_Exception.Raise_Exception;
102: END IF;
103: END IF;
124:
125:
126: IF ((UPPER (column_name) = 'COURSE_TYPE') OR (column_name IS NULL)) THEN
127: IF (new_references.course_type <> UPPER (new_references.course_type)) THEN
128: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
129: IGS_GE_MSG_STACK.ADD;
130: App_Exception.Raise_Exception;
131: END IF;
132: END IF;
132: END IF;
133:
134: IF ((UPPER (column_name) = 'UNIT_SET_CD') OR (column_name IS NULL)) THEN
135: IF (new_references.unit_set_cd <> UPPER (new_references.unit_set_cd)) THEN
136: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
137: IGS_GE_MSG_STACK.ADD;
138: App_Exception.Raise_Exception;
139: END IF;
140: END IF;
152: ELSE
153: IF NOT IGS_PS_TYPE_PKG.Get_PK_For_Validation (
154: new_references.course_type
155: ) THEN
156: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
157: IGS_GE_MSG_STACK.ADD;
158: App_Exception.Raise_Exception;
159:
160: END IF;
171: new_references.unit_set_cd,
172: new_references.version_number
173: ) THEN
174:
175: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
176: IGS_GE_MSG_STACK.ADD;
177: App_Exception.Raise_Exception;
178:
179: END IF;
232:
233: Open cur_rowid;
234: Fetch cur_rowid INTO lv_rowid;
235: IF (cur_rowid%FOUND) THEN
236: Fnd_Message.Set_Name ('IGS', 'IGS_EN_USCT_US_FK');
237: IGS_GE_MSG_STACK.ADD;
238: Close cur_rowid;
239: App_Exception.Raise_Exception;
240: Return;
279: new_references.version_number,
280: new_references.course_type
281: ) THEN
282:
283: Fnd_message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
284: IGS_GE_MSG_STACK.ADD;
285: App_Exception.Raise_Exception;
286:
287: END IF;
301: new_references.unit_set_cd,
302: new_references.version_number,
303: new_references.course_type
304: ) THEN
305: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
306: IGS_GE_MSG_STACK.ADD;
307: App_Exception.Raise_Exception;
308: END IF;
309: Check_Constraints;
366: if X_LAST_UPDATE_LOGIN is NULL then
367: X_LAST_UPDATE_LOGIN := -1;
368: end if;
369: else
370: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
371: IGS_GE_MSG_STACK.ADD;
372: app_exception.raise_exception;
373: end if;
374:
436: begin
437: open c1;
438: fetch c1 into tlinfo;
439: if (c1%notfound) then
440: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
441: IGS_GE_MSG_STACK.ADD;
442: close c1;
443: app_exception.raise_exception;
444: return;