[Home] [Help]
45: Fetch cur_old_ref_values INTO old_references;
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;
191: Null;
192: IF Get_Pk_For_Validation(
193: new_references.occupational_title_code) 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: Check_Constraints;
199: ELSIF (p_action = 'UPDATE') THEN
208: -- Call all the procedures related to Before Insert.
209: IF Get_PK_For_Validation (
210: new_references.occupational_title_code) THEN
211: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
212: IGS_GE_MSG_STACK.ADD;
213: App_Exception.Raise_Exception;
214: END IF;
215: Check_Constraints;
216: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
298: X_LAST_UPDATE_LOGIN := -1;
299: end if;
300: else
301: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
302: IGS_GE_MSG_STACK.ADD;
303: app_exception.raise_exception;
304: end if;
305: Before_DML(
306: p_action=>'INSERT',
372: open c1;
373: fetch c1 into tlinfo;
374: if (c1%notfound) then
375: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
376: IGS_GE_MSG_STACK.ADD;
377: close c1;
378: app_exception.raise_exception;
379: return;
380: end if;
386: ) then
387: null;
388: else
389: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
390: IGS_GE_MSG_STACK.ADD;
391: app_exception.raise_exception;
392: end if;
393: return;
394: end LOCK_ROW;
430: X_LAST_UPDATE_LOGIN := -1;
431: end if;
432: else
433: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
434: IGS_GE_MSG_STACK.ADD;
435: app_exception.raise_exception;
436: end if;
437: Before_DML(
438: p_action=>'UPDATE',