31: -- Populate Old Values.
32: Open cur_old_ref_values;
33: Fetch cur_old_ref_values INTO old_references;
34: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
35: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
36: IGS_GE_MSG_STACK.ADD;
37: Close cur_old_ref_values;
38: App_Exception.Raise_Exception;
39: Return;
71:
72: IF upper(column_name) = 'PERSON_RELATION_TYPE' OR
73: column_name is null Then
74: IF new_references.person_relation_type <>UPPER(new_references.person_relation_type) Then
75: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
76: IGS_GE_MSG_STACK.ADD;
77: App_Exception.Raise_Exception;
78: END IF;
79: END IF;
144: -- Call all the procedures related to Before Insert.
145:
146: IF Get_PK_For_Validation (
147: new_references.person_relation_type ) THEN
148: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
149: IGS_GE_MSG_STACK.ADD;
150: App_Exception.Raise_Exception;
151: END IF;
152:
163: Check_Child_Existance; -- if procedure present
164: ELSIF (p_action = 'VALIDATE_INSERT') THEN
165: IF Get_PK_For_Validation (
166: new_references.person_relation_type ) THEN
167: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
168: IGS_GE_MSG_STACK.ADD;
169: App_Exception.Raise_Exception;
170: END IF;
171:
226: if X_LAST_UPDATE_LOGIN is NULL then
227: X_LAST_UPDATE_LOGIN := -1;
228: end if;
229: else
230: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
231: IGS_GE_MSG_STACK.ADD;
232: app_exception.raise_exception;
233: end if;
234: Before_DML(
289: begin
290: open c1;
291: fetch c1 into tlinfo;
292: if (c1%notfound) then
293: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
294:
295: close c1;
296: App_Exception.Raise_Exception;
297: return;
301: if ( (tlinfo.DESCRIPTION = X_DESCRIPTION)
302: ) then
303: null;
304: else
305: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
306: app_exception.raise_exception;
307: end if;
308: return;
309: end LOCK_ROW;
331: if X_LAST_UPDATE_LOGIN is NULL then
332: X_LAST_UPDATE_LOGIN := -1;
333: end if;
334: else
335: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
336: IGS_GE_MSG_STACK.ADD;
337: app_exception.raise_exception;
338: end if;
339: