[Home] [Help]
43: Fetch cur_old_ref_values INTO old_references;
44: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
45: Close cur_old_ref_values;
46: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
47: IGS_GE_MSG_STACK.ADD;
48: App_Exception.Raise_Exception;
49: Return;
50: END IF;
51: Close cur_old_ref_values;
116: new_references.unit_cd,
117: new_references.version_number
118: ) THEN
119: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
120: IGS_GE_MSG_STACK.ADD;
121: App_Exception.Raise_Exception;
122: END IF;
123:
124: END Check_Parent_Existance;
193: Fetch cur_rowid INTO lv_rowid;
194: IF (cur_rowid%FOUND) THEN
195: Close cur_rowid;
196: Fnd_Message.Set_Name ('IGS', 'IGS_PS_UOM_UV_FK');
197: IGS_GE_MSG_STACK.ADD;
198: App_Exception.Raise_Exception;
199: Return;
200: END IF;
201: Close cur_rowid;
247: new_references.version_number,
248: new_references.offering_mode,
249: new_references.unit_cd) THEN
250: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
251: IGS_GE_MSG_STACK.ADD;
252: App_Exception.Raise_Exception;
253: END IF;
254: Check_Constraints;
255: Check_Parent_Existance;
267: new_references.version_number,
268: new_references.offering_mode,
269: new_references.unit_cd) THEN
270: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
271: IGS_GE_MSG_STACK.ADD;
272: App_Exception.Raise_Exception;
273: END IF;
274: Check_Constraints;
275: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
353: X_LAST_UPDATE_LOGIN := -1;
354: end if;
355: else
356: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
357: IGS_GE_MSG_STACK.ADD;
358: app_exception.raise_exception;
359: end if;
360: Before_DML(
361: p_action=>'INSERT',
424: open c1;
425: fetch c1 into tlinfo;
426: if (c1%notfound) then
427: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
428: IGS_GE_MSG_STACK.ADD;
429: close c1;
430: app_exception.raise_exception;
431: return;
432: end if;