[Home] [Help]
42: -- Populate Old Values.
43: Open cur_old_ref_values;
44: Fetch cur_old_ref_values INTO old_references;
45: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
46: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
47: IGS_GE_MSG_STACK.ADD;
48: Close cur_old_ref_values;
49: APP_EXCEPTION.RAISE_EXCEPTION;
50:
110: new_references.ci_sequence_number,
111: new_references.ass_pattern_id,
112: v_message_name,
113: new_references.uoo_id) = FALSE THEN
114: FND_MESSAGE.SET_NAME('IGS',v_message_name);
115: IGS_GE_MSG_STACK.ADD;
116: APP_EXCEPTION.RAISE_EXCEPTION;
117:
118: END IF;
143: new_references.s_default_ind,
144: 'Y', -- Called from database trigger.
145: v_message_name,
146: new_references.uoo_id) = FALSE THEN
147: FND_MESSAGE.SET_NAME('IGS',v_message_name); APP_EXCEPTION.RAISE_EXCEPTION;
148: IGS_GE_MSG_STACK.ADD;
149: END IF;
150: END IF;
151: END IF;
178: new_references.ass_pattern_id,
179: new_references.creation_dt,
180: v_message_name,
181: new_references.uoo_id) = FALSE THEN
182: FND_MESSAGE.SET_NAME('IGS',v_message_name);
183: IGS_GE_MSG_STACK.ADD;
184: APP_EXCEPTION.RAISE_EXCEPTION;
185: END IF;
186: -- Validate there is only one active instance of the pattern for the student..
208: v_error_count,
209: v_warning_count,
210: v_message_name,
211: new_references.uoo_id) = FALSE THEN
212: FND_MESSAGE.SET_NAME('IGS',v_message_name);
213: IGS_GE_MSG_STACK.ADD;
214: APP_EXCEPTION.RAISE_EXCEPTION;
215: END IF;
216: -- Logically delete unit_ass_pattern_items within the pattern to the student
238: new_references.person_id,
239: new_references.course_cd,
240: new_references.uoo_id
241: )THEN
242: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
243: IGS_GE_MSG_STACK.ADD;
244: APP_EXCEPTION.RAISE_EXCEPTION;
245:
246: END IF;
248: ((new_references.ass_pattern_id IS NULL))) THEN
249: NULL;
250: ELSIF NOT IGS_AS_UNTAS_PATTERN_PKG.Get_UK_For_Validation (
251: new_references.ass_pattern_id ) THEN
252: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
253: IGS_GE_MSG_STACK.ADD;
254: APP_EXCEPTION.RAISE_EXCEPTION;
255:
256: END IF;
304: BEGIN
305: Open cur_rowid;
306: Fetch cur_rowid INTO lv_rowid;
307: IF (cur_rowid%FOUND) THEN
308: Fnd_Message.Set_Name ('IGS', 'IGS_AS_SUAAP_SUA_FK');
309: IGS_GE_MSG_STACK.ADD;
310: Close cur_rowid;
311: APP_EXCEPTION.RAISE_EXCEPTION;
312:
325: BEGIN
326: Open cur_rowid;
327: Fetch cur_rowid INTO lv_rowid;
328: IF (cur_rowid%FOUND) THEN
329: Fnd_Message.Set_Name ('IGS', 'IGS_AS_SUAAP_SUA_FK');
330: IGS_GE_MSG_STACK.ADD;
331: Close cur_rowid;
332: APP_EXCEPTION.RAISE_EXCEPTION;
333:
382: NEW_REFERENCES.person_id ,
383: NEW_REFERENCES.ass_pattern_id ,
384: NEW_REFERENCES.creation_dt,
385: NEW_REFERENCES.uoo_id) THEN
386: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
387: IGS_GE_MSG_STACK.ADD;
388: APP_EXCEPTION.RAISE_EXCEPTION;
389: END IF;
390:
406: new_references.person_id ,
407: new_references.ass_pattern_id ,
408: new_references.creation_dt,
409: new_references.uoo_id) THEN
410: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
411: IGS_GE_MSG_STACK.ADD;
412: APP_EXCEPTION.RAISE_EXCEPTION;
413: END IF;
414:
474: else
475: X_PROGRAM_UPDATE_DATE := SYSDATE;
476: end if;
477: else
478: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
479: IGS_GE_MSG_STACK.ADD;
480: APP_EXCEPTION.RAISE_EXCEPTION;
481: end if;
482: Before_DML(
570: begin
571: open c1;
572: fetch c1 into tlinfo;
573: if (c1%notfound) then
574: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
575: IGS_GE_MSG_STACK.ADD;
576: APP_EXCEPTION.RAISE_EXCEPTION;
577: close c1;
578: return;
584: AND (X_LOGICAL_DELETE_DT is null)))
585: ) then
586: null;
587: else
588: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
589: IGS_GE_MSG_STACK.ADD;
590: APP_EXCEPTION.RAISE_EXCEPTION;
591: end if;
592: return;
626: if X_LAST_UPDATE_LOGIN is NULL then
627: X_LAST_UPDATE_LOGIN := -1;
628: end if;
629: else
630: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
631: IGS_GE_MSG_STACK.ADD;
632: APP_EXCEPTION.RAISE_EXCEPTION;
633: end if;
634: Before_DML(
766:
767: IF upper(column_name) = 'CI_SEQUENCE_NUMBER ' OR
768: column_name is null Then
769: IF new_references.ci_sequence_number < 1 OR new_references.ci_sequence_number > 999999 Then
770: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
771: IGS_GE_MSG_STACK.ADD;
772: APP_EXCEPTION.RAISE_EXCEPTION;
773: END IF;
774: END IF;
776:
777: IF upper(column_name) = 'S_DEFAULT_IND' OR
778: column_name is null Then
779: IF new_references.S_DEFAULT_IND NOT IN ('Y','N') Then
780: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
781: IGS_GE_MSG_STACK.ADD;
782: APP_EXCEPTION.RAISE_EXCEPTION;
783: END IF;
784: END IF;