[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;
83: new_references.fee_ci_sequence_number,
84: new_references.s_relation_type,
85: new_references.rate_number,
86: v_message_name) = FALSE THEN
87: Fnd_Message.Set_Name('IGS',v_message_name);
88: IGS_GE_MSG_STACK.ADD;
89: App_Exception.Raise_Exception;
90: END IF;
91: -- Validate elements range rate can only be created when the parent records
98: new_references.fee_cat,
99: new_references.range_number,
100: new_references.rate_number,
101: v_message_name) = FALSE THEN
102: Fnd_Message.Set_Name('IGS',v_message_name);
103: IGS_GE_MSG_STACK.ADD;
104: App_Exception.Raise_Exception;
105: END IF;
106: END IF;
126: new_references.rate_number,
127: new_references.s_relation_type,
128: new_references.create_dt,
129: v_message_name) = FALSE THEN
130: Fnd_Message.Set_Name('IGS',v_message_name);
131: IGS_GE_MSG_STACK.ADD;
132: App_Exception.Raise_Exception;
133: END IF;
134: END IF;
143: new_references.rate_number,
144: new_references.create_dt,
145: new_references.fee_cat
146: )) THEN
147: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
148: IGS_GE_MSG_STACK.ADD;
149: App_Exception.Raise_Exception;
150: END IF;
151: IF (Get_UK2_For_Validation (
150: END IF;
151: IF (Get_UK2_For_Validation (
152: new_references.err_id
153: )) THEN
154: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
155: IGS_GE_MSG_STACK.ADD;
156: App_Exception.Raise_Exception;
157: END IF;
158: END Check_Uniqueness;
186: new_references.rate_number := igs_ge_number.to_num (column_value);
187: END IF;
188: IF ((UPPER (column_name) = 'FEE_CAL_TYPE') OR (column_name IS NULL)) THEN
189: IF (new_references.fee_cal_type <> UPPER (new_references.fee_cal_type)) THEN
190: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
191: IGS_GE_MSG_STACK.ADD;
192: App_Exception.Raise_Exception;
193: END IF;
194: END IF;
193: END IF;
194: END IF;
195: IF ((UPPER (column_name) = 'S_RELATION_TYPE') OR (column_name IS NULL)) THEN
196: IF (new_references.s_relation_type NOT IN ('FCFL', 'FTCI')) THEN
197: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
198: IGS_GE_MSG_STACK.ADD;
199: App_Exception.Raise_Exception;
200: END IF;
201: END IF;
200: END IF;
201: END IF;
202: IF ((UPPER (column_name) = 'FEE_CI_SEQUENCE_NUMBER') OR (column_name IS NULL)) THEN
203: IF ((new_references.fee_ci_sequence_number < 1) OR (new_references.fee_ci_sequence_number > 999999)) THEN
204: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
205: IGS_GE_MSG_STACK.ADD;
206: App_Exception.Raise_Exception;
207: END IF;
208: END IF;
207: END IF;
208: END IF;
209: IF ((UPPER (column_name) = 'RANGE_NUMBER') OR (column_name IS NULL)) THEN
210: IF ((new_references.range_number < 1) OR (new_references.range_number > 999999)) THEN
211: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
212: IGS_GE_MSG_STACK.ADD;
213: App_Exception.Raise_Exception;
214: END IF;
215: END IF;
214: END IF;
215: END IF;
216: IF ((UPPER (column_name) = 'RATE_NUMBER') OR (column_name IS NULL)) THEN
217: IF ((new_references.rate_number < 1) OR (new_references.rate_number > 999999999)) THEN
218: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
219: IGS_GE_MSG_STACK.ADD;
220: App_Exception.Raise_Exception;
221: END IF;
222: END IF;
244: new_references.s_relation_type,
245: new_references.range_number,
246: new_references.fee_cat
247: ) THEN
248: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
249: IGS_GE_MSG_STACK.ADD;
250: App_Exception.Raise_Exception;
251: END IF;
252: END IF;
271: new_references.s_relation_type,
272: new_references.rate_number,
273: new_references.fee_cat
274: ) THEN
275: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
276: IGS_GE_MSG_STACK.ADD;
277: App_Exception.Raise_Exception;
278: END IF;
279: END IF;
375: Open cur_rowid;
376: Fetch cur_rowid INTO lv_rowid;
377: IF (cur_rowid%FOUND) THEN
378: Close cur_rowid;
379: Fnd_Message.Set_Name ('IGS', 'IGS_FI_ERR_ER_UK_FK');
380: IGS_GE_MSG_STACK.ADD;
381: App_Exception.Raise_Exception;
382: Return;
383: 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_FI_ERR_FAR_UK_FK');
410: IGS_GE_MSG_STACK.ADD;
411: App_Exception.Raise_Exception;
412: Return;
413: END IF;
457: BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );
458: IF (Get_PK_For_Validation (
459: new_references.err_id
460: )) THEN
461: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
462: IGS_GE_MSG_STACK.ADD;
463: App_Exception.Raise_Exception;
464: END IF;
465: Check_Uniqueness;
477: ELSIF (p_action = 'VALIDATE_INSERT') THEN
478: IF (Get_PK_For_Validation (
479: new_references.err_id
480: )) THEN
481: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
482: IGS_GE_MSG_STACK.ADD;
483: App_Exception.Raise_Exception;
484: END IF;
485: Check_Uniqueness;
551: else
552: X_PROGRAM_UPDATE_DATE:=SYSDATE;
553: end if;
554: else
555: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
556: IGS_GE_MSG_STACK.ADD;
557: app_exception.raise_exception;
558: end if;
559: SELECT IGS_FI_ELM_RANGE_RT_ERR_ID_S.NextVal
662: open c1;
663: fetch c1 into tlinfo;
664: if (c1%notfound) then
665: close c1;
666: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
667: IGS_GE_MSG_STACK.ADD;
668: app_exception.raise_exception;
669: return;
670: end if;
684: AND (X_LOGICAL_DELETE_DT is null)))
685: ) then
686: null;
687: else
688: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
689: IGS_GE_MSG_STACK.ADD;
690: app_exception.raise_exception;
691: end if;
692: return;
737: else
738: X_PROGRAM_UPDATE_DATE:=SYSDATE;
739: end if;
740: else
741: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
742: IGS_GE_MSG_STACK.ADD;
743: app_exception.raise_exception;
744: end if;
745: Before_DML(