[Home] [Help]
70: Open cur_old_ref_values;
71: Fetch cur_old_ref_values INTO old_references;
72: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
73: Close cur_old_ref_values;
74: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
75: IGS_GE_MSG_STACK.ADD;
76: App_Exception.Raise_Exception;
77: Return;
78: END IF;
150: END IF;
151:
152: IF Upper(Column_Name)='SUBTITLE_MODIFIABLE_FLAG' OR Column_Name IS NULL Then
153: IF New_References.subtitle_modifiable_flag NOT IN ( 'Y' , 'N' ) Then
154: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
155: IGS_GE_MSG_STACK.ADD;
156: App_Exception.Raise_Exception;
157: END IF;
158: END IF;
158: END IF;
159:
160: IF Upper(Column_Name)='CLASS_SCHEDULE_EXCLUSION_FLAG' OR Column_Name IS NULL Then
161: IF New_References.class_schedule_exclusion_flag NOT IN ( 'Y' , 'N' ) Then
162: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
163: IGS_GE_MSG_STACK.ADD;
164: App_Exception.Raise_Exception;
165: END IF;
166: END IF;
166: END IF;
167:
168: IF Upper(Column_Name)='RECORD_EXCLUSION_FLAG' OR Column_Name IS NULL Then
169: IF New_References.record_exclusion_flag NOT IN ( 'Y' , 'N' ) Then
170: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
171: IGS_GE_MSG_STACK.ADD;
172: App_Exception.Raise_Exception;
173: END IF;
174: END IF;
190: begin
191: IF Get_Uk_For_Validation (
192: new_references.uoo_id
193: ) THEN
194: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
195: IGS_GE_MSG_STACK.ADD;
196: app_exception.raise_exception;
197: END IF;
198: END Check_Uniqueness ;
215: NULL;
216: ELSIF NOT Igs_Ps_Unit_Ofr_Opt_Pkg.Get_UK_For_Validation (
217: new_references.uoo_id
218: ) THEN
219: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
220: IGS_GE_MSG_STACK.ADD;
221: App_Exception.Raise_Exception;
222: END IF;
223:
345: Open cur_rowid;
346: Fetch cur_rowid INTO lv_rowid;
347: IF (cur_rowid%FOUND) THEN
348: Close cur_rowid;
349: Fnd_Message.Set_Name ('IGS', 'IGS_PS_USREF_UOO_UFK');
350: IGS_GE_MSG_STACK.ADD;
351: App_Exception.Raise_Exception;
352: Return;
353: END IF;
453: -- Call all the procedures related to Before Insert.
454: Null;
455: IF Get_Pk_For_Validation(
456: new_references.unit_section_reference_id) THEN
457: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
458: IGS_GE_MSG_STACK.ADD;
459: App_Exception.Raise_Exception;
460: END IF;
461: Check_Uniqueness;
474: ELSIF (p_action = 'VALIDATE_INSERT') THEN
475: -- Call all the procedures related to Before Insert.
476: IF Get_PK_For_Validation (
477: new_references.unit_section_reference_id) THEN
478: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
479: IGS_GE_MSG_STACK.ADD;
480: App_Exception.Raise_Exception;
481: END IF;
482: Check_Uniqueness;
589: if X_LAST_UPDATE_LOGIN is NULL then
590: X_LAST_UPDATE_LOGIN := -1;
591: end if;
592: else
593: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
594: IGS_GE_MSG_STACK.ADD;
595: app_exception.raise_exception;
596: end if;
597: SELECT IGS_PS_USEC_REF_S.nextval
798: begin
799: open c1;
800: fetch c1 into tlinfo;
801: if (c1%notfound) then
802: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
803: IGS_GE_MSG_STACK.ADD;
804: close c1;
805: app_exception.raise_exception;
806: return;
890: AND (X_SUBTITLE_ID is null)))
891: ) then
892: null;
893: else
894: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
895: IGS_GE_MSG_STACK.ADD;
896: app_exception.raise_exception;
897: end if;
898: return;
960: if X_LAST_UPDATE_LOGIN is NULL then
961: X_LAST_UPDATE_LOGIN := -1;
962: end if;
963: else
964: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
965: IGS_GE_MSG_STACK.ADD;
966: app_exception.raise_exception;
967: end if;
968: Before_DML(