[Home] [Help]
45: Open cur_old_ref_values;
46: Fetch cur_old_ref_values INTO old_references;
47: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
48: Close cur_old_ref_values;
49: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
50: IGS_GE_MSG_STACK.ADD;
51: App_Exception.Raise_Exception;
52: Return;
53: END IF;
93: new_references.s_relation_type,
94: new_references.fee_cat,
95: new_references.fee_type,
96: v_message_name) = FALSE THEN
97: Fnd_Message.Set_Name('IGS',v_message_name);
98: IGS_GE_MSG_STACK.ADD;
99: App_Exception.Raise_Exception;
100: END IF;
101: END IF;
104: IF IGS_FI_VAL_FRTNS.finp_val_frtns_ft (
105: new_references.fee_type,
106: new_references.s_relation_type,
107: v_message_name) = FALSE THEN
108: Fnd_Message.Set_Name('IGS',v_message_name);
109: IGS_GE_MSG_STACK.ADD;
110: App_Exception.Raise_Exception;
111: END IF;
112: END IF;
117: IF IGS_FI_VAL_FRTNS.finp_val_frtns_amt (
118: new_references.retention_amount,
119: new_references.retention_percentage,
120: v_message_name) = FALSE THEN
121: Fnd_Message.Set_Name('IGS',v_message_name);
122: IGS_GE_MSG_STACK.ADD;
123: App_Exception.Raise_Exception;
124: END IF;
125: END IF;
130: new_references.fee_ci_sequence_number,
131: new_references.fee_type,
132: new_references.s_relation_type,
133: v_message_name) = FALSE THEN
134: Fnd_Message.Set_Name('IGS',v_message_name);
135: IGS_GE_MSG_STACK.ADD;
136: App_Exception.Raise_Exception;
137: END IF;
138: END IF;
201: new_references.fee_cal_type,
202: new_references.fee_ci_sequence_number,
203: new_references.s_relation_type,
204: v_message_name) = FALSE THEN
205: Fnd_Message.Set_Name('IGS',v_message_name);
206: IGS_GE_MSG_STACK.ADD;
207: App_Exception.Raise_Exception;
208: END IF;
209: END IF;
252: IF upper(Column_Name) = 'FEE_CI_SEQUENCE_NUMBER' OR
253: column_name is NULL THEN
254: IF new_references.fee_ci_sequence_number < 1 OR
255: new_references.fee_ci_sequence_number > 999999 THEN
256: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
257: IGS_GE_MSG_STACK.ADD;
258: App_Exception.Raise_Exception;
259: END IF;
260: END IF;
263: IF upper(Column_Name) = 'SEQUENCE_NUMBER' OR
264: column_name is NULL THEN
265: IF new_references.sequence_number < 1 OR
266: new_references.sequence_number > 999999 THEN
267: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
268: IGS_GE_MSG_STACK.ADD;
269: App_Exception.Raise_Exception;
270: END IF;
271: END IF;
274: IF upper(Column_Name) = 'DAI_SEQUENCE_NUMBER' OR
275: column_name is NULL THEN
276: IF new_references.dai_sequence_number < 1 OR
277: new_references.dai_sequence_number > 999999 THEN
278: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
279: IGS_GE_MSG_STACK.ADD;
280: App_Exception.Raise_Exception;
281: END IF;
282: END IF;
284: IF upper(Column_Name) = 'SCHEDULE_NUMBER' OR
285: column_name is NULL THEN
286: IF new_references.schedule_number < 1 OR
287: new_references.schedule_number > 999999 THEN
288: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
289: IGS_GE_MSG_STACK.ADD;
290: App_Exception.Raise_Exception;
291: END IF;
292: END IF;
294: IF new_references.S_RELATION_TYPE <> 'FTCI' AND
295: new_references.S_RELATION_TYPE <> 'FCCI' AND
296: new_references.S_RELATION_TYPE <> 'FCFL'
297: THEN
298: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
299: IGS_GE_MSG_STACK.ADD;
300: App_Exception.Raise_Exception;
301: END IF;
302: END IF;
302: END IF;
303: IF upper(Column_Name) = 'DT_ALIAS' OR
304: column_name is NULL THEN
305: IF new_references.dt_alias <> UPPER(new_references.dt_alias) THEN
306: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
307: IGS_GE_MSG_STACK.ADD;
308: App_Exception.Raise_Exception;
309: END IF;
310: END IF;
310: END IF;
311: IF upper(Column_Name) = 'FEE_CAL_TYPE' OR
312: column_name is NULL THEN
313: IF new_references.fee_cal_type <> UPPER(new_references.fee_cal_type) THEN
314: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
315: IGS_GE_MSG_STACK.ADD;
316: App_Exception.Raise_Exception;
317: END IF;
318: END IF;
319:
320: IF upper(Column_Name) = 'RETENTION_AMOUNT' OR
321: column_name is NULL THEN
322: IF new_references.retention_amount < 0 THEN
323: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
324: IGS_GE_MSG_STACK.ADD;
325: App_Exception.Raise_Exception;
326: END IF;
327: END IF;
328: IF upper(Column_Name) = 'RETENTION_PERCENTAGE' OR
329: column_name is NULL THEN
330: IF new_references.retention_percentage < 0 OR
331: new_references.retention_percentage > 100 THEN
332: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
333: IGS_GE_MSG_STACK.ADD;
334: App_Exception.Raise_Exception;
335: END IF;
336: END IF;
411: new_references.fee_type,
412: new_references.dt_alias,
413: new_references.s_relation_type,
414: new_references.dai_sequence_number) THEN
415: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
416: IGS_GE_MSG_STACK.ADD;
417: App_Exception.Raise_Exception;
418: END IF;
419: IF Get_UK2_For_Validation (
421: new_references.fee_ci_sequence_number,
422: new_references.fee_cat,
423: new_references.fee_type,
424: new_references.schedule_number) THEN
425: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
426: IGS_GE_MSG_STACK.ADD;
427: App_Exception.Raise_Exception;
428: END IF;
429:
445: new_references.dai_sequence_number,
446: new_references.fee_cal_type,
447: new_references.fee_ci_sequence_number
448: ) THEN
449: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
450: IGS_GE_MSG_STACK.ADD;
451: App_Exception.Raise_Exception;
452: END IF;
453: IF (((old_references.fee_cat = new_references.fee_cat) AND
461: new_references.fee_cat,
462: new_references.fee_cal_type,
463: new_references.fee_ci_sequence_number
464: ) THEN
465: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
466: IGS_GE_MSG_STACK.ADD;
467: App_Exception.Raise_Exception;
468: END IF ;
469: IF (((old_references.fee_cat = new_references.fee_cat) AND
480: new_references.fee_cal_type,
481: new_references.fee_ci_sequence_number,
482: new_references.fee_type
483: ) THEN
484: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
485: IGS_GE_MSG_STACK.ADD;
486: App_Exception.Raise_Exception;
487: END IF;
488: IF (((old_references.fee_type = new_references.fee_type) AND
496: new_references.fee_type,
497: new_references.fee_cal_type,
498: new_references.fee_ci_sequence_number
499: ) THEN
500: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
501: IGS_GE_MSG_STACK.ADD;
502: App_Exception.Raise_Exception;
503: END IF;
504: END Check_Parent_Existance;
549: Open cur_rowid;
550: Fetch cur_rowid INTO lv_rowid;
551: IF (cur_rowid%FOUND) THEN
552: Close cur_rowid;
553: Fnd_Message.Set_Name ('IGS', 'IGS_FI_FRTNS_DAI_FK');
554: IGS_GE_MSG_STACK.ADD;
555: App_Exception.Raise_Exception;
556: Return;
557: END IF;
573: Open cur_rowid;
574: Fetch cur_rowid INTO lv_rowid;
575: IF (cur_rowid%FOUND) THEN
576: Close cur_rowid;
577: Fnd_Message.Set_Name ('IGS', 'IGS_FI_FRTNS_FCCI_FK');
578: IGS_GE_MSG_STACK.ADD;
579: App_Exception.Raise_Exception;
580: Return;
581: END IF;
644: new_references.fee_cal_type,
645: new_references.fee_ci_sequence_number,
646: new_references.s_relation_type,
647: new_references.sequence_number ) THEN
648: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
649: IGS_GE_MSG_STACK.ADD;
650: App_Exception.Raise_Exception;
651: END IF;
652: Check_Uniqueness;
664: new_references.fee_cal_type,
665: new_references.fee_ci_sequence_number,
666: new_references.s_relation_type,
667: new_references.sequence_number ) THEN
668: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
669: IGS_GE_MSG_STACK.ADD;
670: App_Exception.Raise_Exception;
671: END IF;
672: Check_Uniqueness;
771: else
772: X_PROGRAM_UPDATE_DATE := SYSDATE;
773: end if;
774: else
775: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
776: IGS_GE_MSG_STACK.ADD;
777: app_exception.raise_exception;
778: end if;
779: Before_DML(
891: begin
892: open c1;
893: fetch c1 into tlinfo;
894: if (c1%notfound) then
895: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
896: IGS_GE_MSG_STACK.ADD;
897: app_exception.raise_exception;
898: close c1;
899: return;
916: AND (X_RETENTION_AMOUNT is null)))
917: ) then
918: null;
919: else
920: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
921: IGS_GE_MSG_STACK.ADD;
922: app_exception.raise_exception;
923: end if;
924: return;
981: else
982: X_PROGRAM_UPDATE_DATE := SYSDATE;
983: end if;
984: else
985: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
986: IGS_GE_MSG_STACK.ADD;
987: app_exception.raise_exception;
988: end if;
989: Before_DML(