[Home] [Help]
34: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
35: Close cur_old_ref_values;
36: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
37: IGS_GE_MSG_STACK.ADD;
38: App_Exception.Raise_Exception;
39: Return;
40: END IF;
41: Close cur_old_ref_values;
42:
74: IF Upper(Column_Name)='S_RULE_CALL_CD' OR Column_Name IS NULL Then
75: IF New_References.S_Rule_Call_Cd <> UPPER(New_References.S_Rule_Call_Cd) Then
76: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
77: IGS_GE_MSG_STACK.ADD;
78: App_Exception.Raise_Exception;
79: END IF;
80: END IF;
81:
82: IF Upper(Column_Name)='UNIT_CD' OR Column_Name IS NULL Then
82: IF Upper(Column_Name)='UNIT_CD' OR Column_Name IS NULL Then
83: IF New_References.Unit_Cd <> UPPER(New_References.Unit_CD) Then
84: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
85: IGS_GE_MSG_STACK.ADD;
86: App_Exception.Raise_Exception;
87: END IF;
88: END IF;
89:
90: END Check_Constraints;
99: IF NOT IGS_RU_CALL_PKG.Get_PK_For_Validation (
100: new_references.s_rule_call_cd) THEN
101: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
102: IGS_GE_MSG_STACK.ADD;
103: App_Exception.Raise_Exception;
104: END IF;
105:
106:
107: END IF;
113: IF NOT IGS_PS_UNIT_PKG.Get_PK_For_Validation (
114: new_references.unit_cd) THEN
115: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
116: IGS_GE_MSG_STACK.ADD;
117: App_Exception.Raise_Exception;
118: END IF;
119:
120:
121: END IF;
127: IF NOT IGS_RU_RULE_PKG.Get_PK_For_Validation (
128: new_references.rul_sequence_number) THEN
129: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
130: IGS_GE_MSG_STACK.ADD;
131: App_Exception.Raise_Exception;
132: END IF;
133:
134:
135: END IF;
182: IF (cur_rowid%FOUND) THEN
183: Close cur_rowid;
184: Fnd_Message.Set_Name ('IGS', 'IGS_PS_UR_SRC_FK');
185: IGS_GE_MSG_STACK.ADD;
186: App_Exception.Raise_Exception;
187: Return;
188: END IF;
189: Close cur_rowid;
190:
208: IF (cur_rowid%FOUND) THEN
209: Close cur_rowid;
210: Fnd_Message.Set_Name ('IGS', 'IGS_PS_UR_UN_FK');
211: IGS_GE_MSG_STACK.ADD;
212: App_Exception.Raise_Exception;
213: Return;
214: END IF;
215: Close cur_rowid;
216:
234: IF (cur_rowid%FOUND) THEN
235: Close cur_rowid;
236: Fnd_Message.Set_Name ('IGS', 'IGS_PS_UR_RUL_FK');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: Return;
240: END IF;
241: Close cur_rowid;
242:
274: IF Get_PK_For_Validation (New_References.unit_cd,
275: New_References.s_rule_call_cd) THEN
276: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
277: IGS_GE_MSG_STACK.ADD;
278: App_Exception.Raise_Exception;
279: END IF;
280: Check_Constraints;
281: Check_Parent_Existance;
282: ELSIF (p_action = 'UPDATE') THEN
289: IF Get_PK_For_Validation (New_References.unit_cd,
290: New_References.s_rule_call_cd) THEN
291: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
292: IGS_GE_MSG_STACK.ADD;
293: App_Exception.Raise_Exception;
294: END IF;
295: Check_Constraints;
296: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
297: Check_Constraints;
340: end if;
341: else
342: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
343: IGS_GE_MSG_STACK.ADD;
344: app_exception.raise_exception;
345: end if;
346:
347: Before_DML(
348: p_action => 'INSERT',
409: if (c1%notfound) then
410: close c1;
411: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
412: IGS_GE_MSG_STACK.ADD;
413: app_exception.raise_exception;
414: return;
415: end if;
416: close c1;
417:
420: null;
421: else
422: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
423: IGS_GE_MSG_STACK.ADD;
424: app_exception.raise_exception;
425: end if;
426: return;
427: end LOCK_ROW;
428:
452: end if;
453: else
454: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
455: IGS_GE_MSG_STACK.ADD;
456: app_exception.raise_exception;
457: end if;
458:
459: Before_DML(
460: p_action => 'UPDATE',