[Home] [Help]
55: OPEN cur_old_ref_values;
56: FETCH cur_old_ref_values INTO old_references;
57: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
58: CLOSE cur_old_ref_values;
59: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
60: IGS_GE_MSG_STACK.ADD;
61: APP_EXCEPTION.RAISE_EXCEPTION;
62: RETURN;
63: END IF;
125: BEGIN
126:
127: IF new_references.create_date IS NOT NULL AND new_references.end_date IS NOT NULL THEN
128: IF new_references.create_date> new_references.end_date THEN
129: FND_MESSAGE.SET_NAME('IGS','IGS_PS_CD_GT_ED');
130: IGS_GE_MSG_STACK.ADD;
131: APP_EXCEPTION.RAISE_EXCEPTION;
132: END IF;
133: END IF;
134:
135: FOR lv_date_rec in c_date LOOP
136: IF new_references.end_date IS NULL THEN --main
137: IF lv_date_rec.end_date IS NULL THEN
138: FND_MESSAGE.SET_NAME('IGS','IGS_PS_ED_VAL');
139: IGS_GE_MSG_STACK.ADD;
140: APP_EXCEPTION.RAISE_EXCEPTION;
141: ELSIF new_references.create_date < lv_date_rec.end_date THEN
142: FND_MESSAGE.SET_NAME('IGS','IGS_PS_CREATE_DT');
138: FND_MESSAGE.SET_NAME('IGS','IGS_PS_ED_VAL');
139: IGS_GE_MSG_STACK.ADD;
140: APP_EXCEPTION.RAISE_EXCEPTION;
141: ELSIF new_references.create_date < lv_date_rec.end_date THEN
142: FND_MESSAGE.SET_NAME('IGS','IGS_PS_CREATE_DT');
143: IGS_GE_MSG_STACK.ADD;
144: APP_EXCEPTION.RAISE_EXCEPTION;
145: END IF;
146: ELSE
145: END IF;
146: ELSE
147: IF lv_date_rec.end_date IS NULL THEN --inner
148: IF new_references.end_date >= lv_date_rec.create_date THEN
149: FND_MESSAGE.SET_NAME('IGS','IGS_PS_ED_VAL');
150: IGS_GE_MSG_STACK.ADD;
151: APP_EXCEPTION.RAISE_EXCEPTION;
152: END IF;
153: ELSE
152: END IF;
153: ELSE
154: IF (new_references.create_date < lv_date_rec.create_date AND
155: new_references.end_date > lv_date_rec.end_date) THEN
156: FND_MESSAGE.SET_NAME('IGS','IGS_PS_DT_RANGE');
157: IGS_GE_MSG_STACK.ADD;
158: APP_EXCEPTION.RAISE_EXCEPTION;
159: END IF;
160: IF((new_references.create_date BETWEEN lv_date_rec.create_date AND lv_date_rec.end_date) OR
158: APP_EXCEPTION.RAISE_EXCEPTION;
159: END IF;
160: IF((new_references.create_date BETWEEN lv_date_rec.create_date AND lv_date_rec.end_date) OR
161: (new_references.end_date BETWEEN lv_date_rec.create_date AND lv_date_rec.end_date)) THEN
162: FND_MESSAGE.SET_NAME('IGS','IGS_PS_DT_RANGE');
163: IGS_GE_MSG_STACK.ADD;
164: APP_EXCEPTION.RAISE_EXCEPTION;
165: END IF;
166: END IF; --inner
194: new_references.catalog_version_id
195: ,new_references.note_type_id
196: ,new_references.sequence
197: ) THEN
198: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
199: IGS_GE_MSG_STACK.ADD;
200: APP_EXCEPTION.RAISE_EXCEPTION;
201: END IF;
202: END check_uniqueness ;
229: NULL;
230: ELSIF NOT Igs_Ps_Catlg_Vers_Pkg.Get_PK_For_Validation (
231: new_references.catalog_version_id
232: ) THEN
233: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
234: IGS_GE_MSG_STACK.ADD;
235: APP_EXCEPTION.RAISE_EXCEPTION;
236: END IF;
237:
240: NULL;
241: ELSIF NOT igs_ps_note_types_pkg.get_pk_for_validation (
242: new_references.note_type_id
243: ) THEN
244: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
245: IGS_GE_MSG_STACK.ADD;
246: APP_EXCEPTION.RAISE_EXCEPTION;
247: END IF;
248:
372: Open cur_rowid;
373: Fetch cur_rowid INTO lv_rowid;
374: IF (cur_rowid%FOUND) THEN
375: Close cur_rowid;
376: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CNDV_CATV_FK');
377: IGS_GE_MSG_STACK.ADD;
378: App_Exception.Raise_Exception;
379: Return;
380: END IF;
416: Open cur_rowid;
417: Fetch cur_rowid INTO lv_rowid;
418: IF (cur_rowid%FOUND) THEN
419: Close cur_rowid;
420: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CNDV_NTPV_FK');
421: IGS_GE_MSG_STACK.ADD;
422: App_Exception.Raise_Exception;
423: Return;
424: END IF;
486: -- Call all the procedures related to Before Insert.
487: Null;
488: IF Get_Pk_For_Validation(
489: new_references.catalog_note_id) THEN
490: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
491: IGS_GE_MSG_STACK.ADD;
492: App_Exception.Raise_Exception;
493: END IF;
494: Check_Uniqueness;
506: ELSIF (p_action = 'VALIDATE_INSERT') THEN
507: -- Call all the procedures related to Before Insert.
508: IF Get_PK_For_Validation (
509: new_references.catalog_note_id) THEN
510: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
511: IGS_GE_MSG_STACK.ADD;
512: App_Exception.Raise_Exception;
513: END IF;
514: Check_Uniqueness;
613: if X_LAST_UPDATE_LOGIN is NULL then
614: X_LAST_UPDATE_LOGIN := -1;
615: end if;
616: else
617: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
618: IGS_GE_MSG_STACK.ADD;
619: app_exception.raise_exception;
620: end if;
621: SELECT IGS_PS_CATLG_NOTES_S.nextval INTO x_CATALOG_NOTE_ID FROM DUAL;
720: begin
721: open c1;
722: fetch c1 into tlinfo;
723: if (c1%notfound) then
724: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
725: IGS_GE_MSG_STACK.ADD;
726: close c1;
727: app_exception.raise_exception;
728: return;
742: AND (X_NOTE_TEXT is null)))
743: ) then
744: null;
745: else
746: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
747: IGS_GE_MSG_STACK.ADD;
748: app_exception.raise_exception;
749: end if;
750: return;
797: if X_LAST_UPDATE_LOGIN is NULL then
798: X_LAST_UPDATE_LOGIN := -1;
799: end if;
800: else
801: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
802: IGS_GE_MSG_STACK.ADD;
803: app_exception.raise_exception;
804: end if;
805: Before_DML(