[Home] [Help]
36: Open cur_old_ref_values;
37: Fetch cur_old_ref_values INTO old_references;
38: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
39: Close cur_old_ref_values;
40: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
41: IGS_GE_MSG_STACK.ADD;
42: App_Exception.Raise_Exception;
43: Return;
44: END IF;
91: new_references.related_cal_type,
92: new_references.related_ci_sequence_number,
93: v_message_name) = FALSE
94: THEN
95: Fnd_Message.Set_Name('IGS',v_message_name);
96: IGS_GE_MSG_STACK.ADD;
97: APP_EXCEPTION.RAISE_EXCEPTION;
98: END IF;
99: -- Validate related date alias instance value is different to parent.
106: new_references.related_cal_type,
107: new_references.related_ci_sequence_number,
108: v_message_name) = FALSE
109: THEN
110: Fnd_Message.Set_Name('IGS',v_message_name);
111: IGS_GE_MSG_STACK.ADD;
112: APP_EXCEPTION.RAISE_EXCEPTION;
113: END IF;
114: -- Validate related date alias instance calendar type.
115: IF IGS_CA_VAL_DAIP.calp_val_daip_ct (new_references.cal_type,
116: new_references.related_cal_type,
117: v_message_name) = FALSE
118: THEN
119: Fnd_Message.Set_Name('IGS',v_message_name);
120: IGS_GE_MSG_STACK.ADD;
121: APP_EXCEPTION.RAISE_EXCEPTION;
122: END IF;
123: END IF;
145: new_references.related_dai_sequence_number,
146: new_references.related_cal_type,
147: new_references.related_ci_sequence_number,
148: v_message_name) = FALSE THEN
149: Fnd_Message.Set_Name('IGS',v_message_name);
150: IGS_GE_MSG_STACK.ADD;
151: APP_EXCEPTION.RAISE_EXCEPTION;
152: END IF;
153: END IF;
180: end if;
181: If upper(column_name) = 'DAI_SEQUENCE_NUMBER' or column_name is null Then
182: if NEW_REFERENCES.dai_sequence_number <1 OR
183: NEW_REFERENCES.dai_sequence_number > 999999 then
184: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
185: IGS_GE_MSG_STACK.ADD;
186: App_Exception.Raise_Exception;
187: end if;
188: end if;
188: end if;
189: if upper(column_name) = 'CI_SEQUENCE_NUMBER' or column_name is null Then
190: if NEW_REFERENCES.ci_sequence_number < 1 OR
191: NEW_REFERENCES.ci_sequence_number > 999999 then
192: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
193: IGS_GE_MSG_STACK.ADD;
194: App_Exception.Raise_Exception;
195: end if;
196: end if;
196: end if;
197: if upper(column_name) = 'RELATED_DAI_SEQUENCE_NUMBER' or column_name is null Then
198: if NEW_REFERENCES.related_dai_sequence_number < 1 OR
199: NEW_REFERENCES.related_dai_sequence_number > 999999 then
200: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
201: IGS_GE_MSG_STACK.ADD;
202: App_Exception.Raise_Exception;
203: end if;
204: end if;
204: end if;
205: if upper(column_name) = 'RELATED_CI_SEQUENCE_NUMBER' or column_name is null Then
206: if NEW_REFERENCES.related_ci_sequence_number < 1 OR
207: NEW_REFERENCES.related_ci_sequence_number > 999999 then
208: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception;
211: end if;
212: end if;
211: end if;
212: end if;
213: if upper(column_name) = 'DT_ALIAS' or column_name is null Then
214: if NEW_REFERENCES.dt_alias <> UPPER( NEW_REFERENCES.dt_alias) then
215: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
216: IGS_GE_MSG_STACK.ADD;
217: App_Exception.Raise_Exception;
218: end if;
219: end if;
218: end if;
219: end if;
220: if upper(column_name) = 'CAL_TYPE' or column_name is null Then
221: if NEW_REFERENCES.cal_type <> UPPER( NEW_REFERENCES.cal_type) then
222: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
223: IGS_GE_MSG_STACK.ADD;
224: App_Exception.Raise_Exception;
225: end if;
226: end if;
225: end if;
226: end if;
227: if upper(column_name) = 'RELATED_DT_ALIAS' or column_name is null Then
228: if NEW_REFERENCES.related_dt_alias <> UPPER( NEW_REFERENCES.related_dt_alias) then
229: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
230: IGS_GE_MSG_STACK.ADD;
231: App_Exception.Raise_Exception;
232: end if;
233: end if;
232: end if;
233: end if;
234: if upper(column_name) = 'RELATED_CAL_TYPE' or column_name is null Then
235: if NEW_REFERENCES.related_cal_type <> UPPER( NEW_REFERENCES.related_cal_type) then
236: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: end if;
240: end if;
280: new_references.dai_sequence_number ,
281: new_references.cal_type ,
282: new_references.ci_sequence_number
283: )THEN
284: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
285: IGS_GE_MSG_STACK.ADD;
286: App_Exception.Raise_Exception;
287: END IF;
288: End Check_Uniqueness;
307: new_references.dai_sequence_number,
308: new_references.cal_type,
309: new_references.ci_sequence_number)
310: THEN
311: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
312: IGS_GE_MSG_STACK.ADD;
313: App_Exception.Raise_Exception;
314: END IF;
315:
330: new_references.related_dai_sequence_number,
331: new_references.related_cal_type,
332: new_references.related_ci_sequence_number
333: ) THEN
334: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
335: IGS_GE_MSG_STACK.ADD;
336: App_Exception.Raise_Exception;
337: END IF;
338: END IF;
405: Open cur_rowid;
406: Fetch cur_rowid INTO lv_rowid;
407: IF (cur_rowid%FOUND) THEN
408: Close cur_rowid;
409: Fnd_Message.Set_Name ('IGS', 'IGS_CA_DAIP_DAI_FK');
410: IGS_GE_MSG_STACK.ADD;
411: App_Exception.Raise_Exception;
412: Return;
413: END IF;
463: new_references.related_dt_alias ,
464: new_references.related_dai_sequence_number ,
465: new_references.related_cal_type ,
466: new_references.related_ci_sequence_number )THEN
467: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
468: IGS_GE_MSG_STACK.ADD;
469: App_Exception.Raise_Exception;
470: END IF;
471: Check_Uniqueness;
480: new_references.related_dt_alias ,
481: new_references.related_dai_sequence_number ,
482: new_references.related_cal_type ,
483: new_references.related_ci_sequence_number )THEN
484: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
485: IGS_GE_MSG_STACK.ADD;
486: App_Exception.Raise_Exception;
487: END IF;
488: Check_Uniqueness;
565: if X_LAST_UPDATE_LOGIN is NULL then
566: X_LAST_UPDATE_LOGIN := -1;
567: end if;
568: else
569: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
570: IGS_GE_MSG_STACK.ADD;
571: app_exception.raise_exception;
572: end if;
573: Before_DML (
652: open c1;
653: fetch c1 into tlinfo;
654: if (c1%notfound) then
655: close c1;
656: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
657: IGS_GE_MSG_STACK.ADD;
658: app_exception.raise_exception;
659: return;
660: end if;