46: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
47: Close cur_old_ref_values;
48: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
49: IGS_GE_MSG_STACK.ADD;
50: App_Exception.Raise_Exception;
51: Return;
52: END IF;
53: Close cur_old_ref_values;
54:
125: new_references.unit_section_occurrence_id
126: ) THEN
127: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
128: IGS_GE_MSG_STACK.ADD;
129: App_Exception.Raise_Exception;
130: END IF;
131:
132: OPEN cur_reference_cd_chk(new_references.reference_code_type);
133: FETCH cur_reference_cd_chk INTO l_var;
143: new_references.reference_code
144: ) THEN
145: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
146: IGS_GE_MSG_STACK.ADD;
147: App_Exception.Raise_Exception;
148: END IF;
149: END IF;
150: CLOSE cur_reference_cd_chk;
151:
216: IF (cur_rowid%FOUND) THEN
217: Close cur_rowid;
218: Fnd_Message.Set_Name ('IGS', 'IGS_PS_USOR_USO_FK');
219: IGS_GE_MSG_STACK.ADD;
220: App_Exception.Raise_Exception;
221: Return;
222: END IF;
223: Close cur_rowid;
224:
255: IF (cur_rowid%FOUND) THEN
256: CLOSE cur_rowid;
257: fnd_message.set_name ('IGS', 'IGS_PS_USOR_RCT_FK');
258: igs_ge_msg_stack.add;
259: app_exception.raise_exception;
260: RETURN;
261: END IF;
262: CLOSE cur_rowid;
263:
295: IF (cur_rowid%FOUND) THEN
296: CLOSE cur_rowid;
297: fnd_message.set_name ('IGS', 'IGS_PS_USOR_RC_FK');
298: igs_ge_msg_stack.add;
299: app_exception.raise_exception;
300: RETURN;
301: END IF;
302: CLOSE cur_rowid;
303:
341: x_reference_code => new_references.reference_code,
342: x_Unit_section_Occurrence_Id => new_references.Unit_section_Occurrence_Id) THEN
343: FND_MESSAGE.SET_NAME('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
344: IGS_GE_MSG_STACK.ADD;
345: APP_EXCEPTION.RAISE_EXCEPTION;
346: END IF;
347: END Check_Uniqueness;
348:
349:
395: IF Get_Pk_For_Validation(
396: new_references.unit_sec_occur_reference_id) THEN
397: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
398: IGS_GE_MSG_STACK.ADD;
399: App_Exception.Raise_Exception;
400: END IF;
401: Check_Constraints;
402: Check_Uniqueness;
403: Check_Parent_Existance;
415: IF Get_PK_For_Validation (
416: new_references.unit_sec_occur_reference_id) THEN
417: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
418: IGS_GE_MSG_STACK.ADD;
419: App_Exception.Raise_Exception;
420: END IF;
421: Check_Constraints;
422: Check_Uniqueness;
423: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
520: end if;
521: else
522: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
523: IGS_GE_MSG_STACK.ADD;
524: app_exception.raise_exception;
525: end if;
526: SELECT
527: igs_ps_usec_occur_ref_s.nextval
528: INTO
609: if (c1%notfound) then
610: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
611: IGS_GE_MSG_STACK.ADD;
612: close c1;
613: app_exception.raise_exception;
614: return;
615: end if;
616: close c1;
617: if ( ( tlinfo.UNIT_SECTION_OCCURRENCE_ID = X_UNIT_SECTION_OCCURRENCE_ID)
624: null;
625: else
626: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
627: IGS_GE_MSG_STACK.ADD;
628: app_exception.raise_exception;
629: end if;
630: return;
631: end LOCK_ROW;
632:
669: end if;
670: else
671: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
672: IGS_GE_MSG_STACK.ADD;
673: app_exception.raise_exception;
674: end if;
675: Before_DML(
676: p_action=>'UPDATE',
677: x_rowid=>X_ROWID,