[Home] [Help]
31: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
32: Close cur_old_ref_values;
33: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
34: IGS_GE_MSG_STACK.ADD;
35: App_Exception.Raise_Exception;
36: Return;
37: END IF;
38: Close cur_old_ref_values;
39:
139: IF Upper(Column_Name)='UNIT_CD' OR Column_Name IS NULL Then
140: IF New_References.Unit_Cd <> UPPER(New_References.Unit_Cd) Then
141: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
142: IGS_GE_MSG_STACK.ADD;
143: App_Exception.Raise_Exception;
144: END IF;
145: END IF;
146:
147: END Check_Constraints;
173: -- Call all the procedures related to Before Insert.
174: IF Get_PK_For_Validation (New_References.unit_cd) THEN
175: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
176: IGS_GE_MSG_STACK.ADD;
177: App_Exception.Raise_Exception;
178: END IF;
179: Check_Constraints;
180: ELSIF (p_action = 'UPDATE') THEN
181: -- Call all the procedures related to Before Update.
186: ELSIF (p_action = 'VALIDATE_INSERT') THEN
187: IF Get_PK_For_Validation (New_References.unit_cd) THEN
188: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
189: IGS_GE_MSG_STACK.ADD;
190: App_Exception.Raise_Exception;
191: END IF;
192: Check_Constraints;
193: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
194: Check_Constraints;
236: end if;
237: else
238: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
239: IGS_GE_MSG_STACK.ADD;
240: app_exception.raise_exception;
241: end if;
242: Before_DML(
243: p_action => 'INSERT',
244: x_rowid => X_ROWID,
296: if (c1%notfound) then
297: close c1;
298: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
299: IGS_GE_MSG_STACK.ADD;
300: app_exception.raise_exception;
301: return;
302: end if;
303: close c1;
304: