[Home] [Help]
35: Fetch cur_old_ref_values INTO old_references;
36: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
37: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_NAMED_RULE : P_ACTION INSERT VALIDATE_INSERT : IGSUI09B.PLS');
39: IGS_GE_MSG_STACK.ADD;
40: App_Exception.Raise_Exception;
41: Close cur_old_ref_values;
42: Return;
43: END IF;
82:
83: IF upper(Column_name) = 'MESSAGE_RULE' OR COLUMN_NAME IS NULL THEN
84: IF new_references.MESSAGE_RULE < 1 or new_references.MESSAGE_RULE > 999999 then
85: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
86: IGS_GE_MSG_STACK.ADD;
87: App_Exception.Raise_Exception ;
88: END IF;
89:
90: END IF ;
92: --Added following check as part of bug 2441196, this check should be there in check_constraint since rule_text is not null field.
93: IF upper(Column_name) = 'RULE_TEXT' OR COLUMN_NAME IS NULL THEN
94: IF new_references.RULE_TEXT IS NULL then
95: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
96: IGS_GE_MSG_STACK.ADD;
97: App_Exception.Raise_Exception ;
98: END IF;
99: END IF ;
100:
100:
101: IF upper(Column_name) = 'RUG_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
102: IF new_references.RUG_SEQUENCE_NUMBER < 1 or new_references.RUG_SEQUENCE_NUMBER > 999999 then
103: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception ;
106: END IF;
107:
108: END IF ;
109:
110: IF upper(Column_name) = 'RUD_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
111: IF new_references.RUD_SEQUENCE_NUMBER < 1 or new_references.RUD_SEQUENCE_NUMBER > 999999 then
112: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
113: IGS_GE_MSG_STACK.ADD;
114: App_Exception.Raise_Exception ;
115: END IF;
116:
117: END IF ;
128: new_references.rud_sequence_number
129: ) THEN
130: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
131: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_DESCRIPTION : P_ACTION Check_Parent_Existance rud_sequence_number : IGSUI09B.PLS');
132: IGS_GE_MSG_STACK.ADD;
133: App_Exception.Raise_Exception;
134: END IF;
135: END IF;
136:
142: new_references.rug_sequence_number
143: ) THEN
144: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
145: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_GROUP : P_ACTION Check_Parent_Existance rug_sequence_number : IGSUI09B.PLS');
146: IGS_GE_MSG_STACK.ADD;
147: App_Exception.Raise_Exception;
148: END IF;
149: END IF;
150:
156: new_references.rul_sequence_number
157: ) THEN
158: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
159: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_RULE : P_ACTION Check_Parent_Existance rul_sequence_number : IGSUI09B.PLS');
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
163: END IF;
164:
170: new_references.message_rule
171: ) THEN
172: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
173: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_RULE : P_ACTION Check_Parent_Existance message_rule : IGSUI09B.PLS');
174: IGS_GE_MSG_STACK.ADD;
175: App_Exception.Raise_Exception;
176: END IF;
177: END IF;
178:
238: Fetch cur_rowid INTO lv_rowid;
239: IF (cur_rowid%FOUND) THEN
240: Close cur_rowid;
241: Fnd_Message.Set_Name ('IGS', 'IGS_RU_NR_RUD_FK');
242: IGS_GE_MSG_STACK.ADD;
243: App_Exception.Raise_Exception;
244: Return;
245: END IF;
246: Close cur_rowid;
264: Fetch cur_rowid INTO lv_rowid;
265: IF (cur_rowid%FOUND) THEN
266: Close cur_rowid;
267: Fnd_Message.Set_Name ('IGS', 'IGS_RU_NR_RUG_FK');
268: IGS_GE_MSG_STACK.ADD;
269: App_Exception.Raise_Exception;
270: Return;
271: END IF;
272: Close cur_rowid;
291: Fetch cur_rowid INTO lv_rowid;
292: IF (cur_rowid%FOUND) THEN
293: Close cur_rowid;
294: Fnd_Message.Set_Name ('IGS', 'IGS_RU_NR_RUL_FK');
295: IGS_GE_MSG_STACK.ADD;
296: App_Exception.Raise_Exception;
297: Return;
298: END IF;
299: Close cur_rowid;
335: IF Get_PK_For_Validation (
336: new_references.rul_sequence_number
337: ) THEN
338: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
339: IGS_GE_MSG_STACK.ADD;
340: App_Exception.Raise_Exception;
341: END IF;
342: Check_Constraints;
343: Check_Parent_Existance;
352: IF Get_PK_For_Validation (
353: new_references.rul_sequence_number
354: ) THEN
355: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
356: IGS_GE_MSG_STACK.ADD;
357: App_Exception.Raise_Exception;
358: END IF;
359: Check_Constraints;
360: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
403: X_LAST_UPDATE_LOGIN := -1;
404: end if;
405: else
406: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
407: IGS_GE_MSG_STACK.ADD;
408: app_exception.raise_exception;
409: end if;
410:
411:
484: fetch c1 into tlinfo;
485: if (c1%notfound) then
486: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
487: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_NAMED_RULE : P_ACTION LOCK_ROW message_rule : IGSUI09B.PLS');
488: IGS_GE_MSG_STACK.ADD;
489: app_exception.raise_exception;
490: close c1;
491: return;
492: end if;
504: null;
505: else
506: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
507: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_NAMED_RULE : P_ACTION LOCK_ROW FORM_RECORD_CHANGED : IGSUI09B.PLS');
508: IGS_GE_MSG_STACK.ADD;
509: app_exception.raise_exception;
510: end if;
511: return;
512: end LOCK_ROW;
538: X_LAST_UPDATE_LOGIN := -1;
539: end if;
540: else
541: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
542: IGS_GE_MSG_STACK.ADD;
543: app_exception.raise_exception;
544: end if;
545:
546: