[Home] [Help]
46: Fetch cur_old_ref_values INTO old_references;
47: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
48: Close cur_old_ref_values;
49: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
50: IGS_GE_MSG_STACK.ADD;
51: App_Exception.Raise_Exception;
52: Return;
53: END IF;
54: Close cur_old_ref_values;
185: Null;
186: IF Get_Pk_For_Validation(
187: new_references.sequence_number) THEN
188: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
189: IGS_GE_MSG_STACK.ADD;
190: App_Exception.Raise_Exception;
191: END IF;
192: Check_Constraints;
193: ELSIF (p_action = 'UPDATE') THEN
201: -- Call all the procedures related to Before Insert.
202: IF Get_PK_For_Validation (
203: new_references.sequence_number) THEN
204: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
205: IGS_GE_MSG_STACK.ADD;
206: App_Exception.Raise_Exception;
207: END IF;
208: Check_Constraints;
209: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
288: X_LAST_UPDATE_LOGIN := -1;
289: end if;
290: else
291: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
292: IGS_GE_MSG_STACK.ADD;
293: app_exception.raise_exception;
294: end if;
295: Before_DML(
296: p_action=>'INSERT',
374: open c1;
375: fetch c1 into tlinfo;
376: if (c1%notfound) then
377: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
378: IGS_GE_MSG_STACK.ADD;
379: close c1;
380: app_exception.raise_exception;
381: return;
382: end if;
392: ) then
393: null;
394: else
395: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
396: IGS_GE_MSG_STACK.ADD;
397: app_exception.raise_exception;
398: end if;
399: return;
400: end LOCK_ROW;
436: X_LAST_UPDATE_LOGIN := -1;
437: end if;
438: else
439: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
440: IGS_GE_MSG_STACK.ADD;
441: app_exception.raise_exception;
442: end if;
443: Before_DML(
444: p_action=>'UPDATE',