[Home] [Help]
33: Open cur_old_ref_values;
34: Fetch cur_old_ref_values INTO old_references;
35: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
36: Close cur_old_ref_values;
37: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_GE_MSG_STACK.ADD;
39: App_Exception.Raise_Exception;
40: Return;
41: END IF;
77: new_references.s_rule_call_cd,
78: 'CRS-STAGE',
79: new_references.rul_sequence_number,
80: v_message_name) = FALSE THEN
81: Fnd_Message.Set_Name('IGS',v_message_name);
82: IGS_GE_MSG_STACK.ADD;
83: App_Exception.Raise_Exception;
84: END IF;
85: END IF;
106: IF upper(column_name)= 'COURSE_CD' OR
107: column_name is null THEN
108: IF new_references.course_cd <> UPPER(new_references.course_cd)
109: THEN
110: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
111: IGS_GE_MSG_STACK.ADD;
112: App_Exception.Raise_Exception;
113: END IF;
114: END IF;
116: IF upper(column_name)= 'S_RULE_CALL_CD' OR
117: column_name is null THEN
118: IF new_references.s_rule_call_cd <> UPPER(new_references.s_rule_call_cd)
119: THEN
120: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
121: IGS_GE_MSG_STACK.ADD;
122: App_Exception.Raise_Exception;
123: END IF;
124: END IF;
127: column_name is null THEN
128: IF new_references.cst_sequence_number < 1 OR
129: new_references.cst_sequence_number > 999999
130: THEN
131: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
132: IGS_GE_MSG_STACK.ADD;
133: App_Exception.Raise_Exception;
134: END IF;
135: END IF;
138: column_name is null THEN
139: IF new_references.rul_sequence_number < 1 OR
140: new_references.rul_sequence_number > 999999
141: THEN
142: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
143: IGS_GE_MSG_STACK.ADD;
144: App_Exception.Raise_Exception;
145: END IF;
146: END IF;
162: new_references.version_number,
163: new_references.course_cd,
164: new_references.cst_sequence_number
165: )THEN
166: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
167: IGS_GE_MSG_STACK.ADD;
168: App_Exception.Raise_Exception;
169: END IF;
170: END IF;
175: ELSE
176: IF NOT IGS_RU_RULE_PKG.Get_PK_For_Validation (
177: new_references.rul_sequence_number
178: )THEN
179: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
180: IGS_GE_MSG_STACK.ADD;
181: App_Exception.Raise_Exception;
182: END IF;
183: END IF;
188: ELSE
189: IF NOT IGS_RU_CALL_PKG.Get_PK_For_Validation (
190: new_references.s_rule_call_cd
191: )THEN
192: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
193: IGS_GE_MSG_STACK.ADD;
194: App_Exception.Raise_Exception;
195: END IF;
196: END IF;
248: Open cur_rowid;
249: Fetch cur_rowid INTO lv_rowid;
250: IF (cur_rowid%FOUND) THEN
251: Close cur_rowid;
252: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CSR_CST_FK');
253: IGS_GE_MSG_STACK.ADD;
254: App_Exception.Raise_Exception;
255: Return;
256: END IF;
274: Open cur_rowid;
275: Fetch cur_rowid INTO lv_rowid;
276: IF (cur_rowid%FOUND) THEN
277: Close cur_rowid;
278: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CSR_RUL_FK');
279: IGS_GE_MSG_STACK.ADD;
280: App_Exception.Raise_Exception;
281: Return;
282: END IF;
300: Open cur_rowid;
301: Fetch cur_rowid INTO lv_rowid;
302: IF (cur_rowid%FOUND) THEN
303: Close cur_rowid;
304: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CSR_SRC_FK');
305: IGS_GE_MSG_STACK.ADD;
306: App_Exception.Raise_Exception;
307: Return;
308: END IF;
349: new_references.version_number ,
350: new_references.cst_sequence_number,
351: new_references.s_rule_call_cd
352: ) THEN
353: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
354: IGS_GE_MSG_STACK.ADD;
355: App_Exception.Raise_Exception;
356: END IF;
357: Check_Constraints;
368: new_references.version_number ,
369: new_references.cst_sequence_number,
370: new_references.s_rule_call_cd
371: ) THEN
372: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
373: IGS_GE_MSG_STACK.ADD;
374: App_Exception.Raise_Exception;
375: END IF;
376: Check_Constraints;
422: if X_LAST_UPDATE_LOGIN is NULL then
423: X_LAST_UPDATE_LOGIN := -1;
424: end if;
425: else
426: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
427: IGS_GE_MSG_STACK.ADD;
428: app_exception.raise_exception;
429: end if;
430: Before_DML( p_action => 'INSERT',
496: open c1;
497: fetch c1 into tlinfo;
498: if (c1%notfound) then
499: close c1;
500: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
501: IGS_GE_MSG_STACK.ADD;
502: app_exception.raise_exception;
503: return;
504: end if;
507: if ( (tlinfo.RUL_SEQUENCE_NUMBER = X_RUL_SEQUENCE_NUMBER)
508: ) then
509: null;
510: else
511: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
512: IGS_GE_MSG_STACK.ADD;
513: app_exception.raise_exception;
514: end if;
515: return;
541: if X_LAST_UPDATE_LOGIN is NULL then
542: X_LAST_UPDATE_LOGIN := -1;
543: end if;
544: else
545: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
546: IGS_GE_MSG_STACK.ADD;
547: app_exception.raise_exception;
548: end if;
549: Before_DML( p_action => 'UPDATE',