[Home] [Help]
53: Open cur_old_ref_values;
54: Fetch cur_old_ref_values INTO old_references;
55: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
56: Close cur_old_ref_values;
57: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
58: IGS_GE_MSG_STACK.ADD;
59: App_Exception.Raise_Exception;
60: Return;
61: END IF;
150: new_references.fee_type,
151: new_references.s_fee_trigger_cat,
152: old_references.s_fee_trigger_cat,
153: v_message_name) = FALSE THEN
154: Fnd_Message.Set_Name('IGS',v_message_name);
155: IGS_GE_MSG_STACK.ADD;
156: App_Exception.Raise_Exception;
157: END IF;
158: IF IGS_FI_VAL_FT.finp_val_ft_sftc (
159: new_references.fee_type,
160: new_references.s_fee_trigger_cat,
161: old_references.s_fee_trigger_cat,
162: v_message_name) = FALSE THEN
163: Fnd_Message.Set_Name('IGS',v_message_name);
164: IGS_GE_MSG_STACK.ADD;
165: App_Exception.Raise_Exception;
166: END IF;
167: END IF;
173: IF IGS_FI_VAL_FT.finp_val_ft_sft_trig (
174: new_references.s_fee_type,
175: new_references.s_fee_trigger_cat,
176: v_message_name) = FALSE THEN
177: Fnd_Message.Set_Name('IGS',v_message_name);
178: IGS_GE_MSG_STACK.ADD;
179: App_Exception.Raise_Exception;
180: END IF;
181: END IF;
187: IF IGS_FI_VAL_FT.finp_val_ft_opt_pymt (
188: new_references.fee_type,
189: new_references.optional_payment_ind,
190: v_message_name) = FALSE THEN
191: Fnd_Message.Set_Name('IGS',v_message_name);
192: IGS_GE_MSG_STACK.ADD;
193: App_Exception.Raise_Exception;
194: END IF;
195: /* Bug- 1989694, SF012_DLD-Account History and Payment
199: Open cur_optfeeflag_set(new_references.fee_type);
200: fetch cur_optfeeflag_set into l_optfeeflag;
201: IF cur_optfeeflag_set%FOUND THEN
202: CLOSE cur_optfeeflag_set;
203: Fnd_Message.Set_Name('IGS','IGS_FI_CANT_MODIFY_OPT_IND');
204: IGS_GE_MSG_STACK.ADD;
205: App_Exception.Raise_Exception;
206: END IF;
207: CLOSE cur_optfeeflag_set;
220:
221: IF NVL(l_count,0) >= 1 THEN
222: --If system fee type is of Refund
223: IF new_references.s_fee_type = 'REFUND' THEN
224: fnd_message.set_name('IGS','IGS_FI_REFUND_FEE');
225: --If system fee type is of Document
226: ELSIF new_references.s_fee_type = 'DOCUMENT' THEN
227: fnd_message.set_name('IGS','IGS_FI_DOC_TYP_NOT_MORE_ONE');
228: END IF;
223: IF new_references.s_fee_type = 'REFUND' THEN
224: fnd_message.set_name('IGS','IGS_FI_REFUND_FEE');
225: --If system fee type is of Document
226: ELSIF new_references.s_fee_type = 'DOCUMENT' THEN
227: fnd_message.set_name('IGS','IGS_FI_DOC_TYP_NOT_MORE_ONE');
228: END IF;
229: igs_ge_msg_stack.add;
230: app_exception.raise_exception;
231: END IF;
237: IF new_references.s_fee_type = 'REFUND' THEN
238: IF new_references.s_fee_trigger_cat <> 'INSTITUTN' THEN
239: --got the lookup meaning and added token to the
240: --message IGS_FI_ANC_TRG_CAT.
241: fnd_Message.Set_Name('IGS','IGS_FI_ANC_TRG_CAT');
242: fnd_message.set_token('S_FEE_TRIG_CAT', igs_fi_gen_gl.get_lkp_meaning(p_v_lookup_type => 'IGS_FI_LOCKBOX',
243: p_v_lookup_code => 'INSTITUTION'));
244: IGS_GE_MSG_STACK.ADD;
245: App_Exception.Raise_Exception;
238: IF new_references.s_fee_trigger_cat <> 'INSTITUTN' THEN
239: --got the lookup meaning and added token to the
240: --message IGS_FI_ANC_TRG_CAT.
241: fnd_Message.Set_Name('IGS','IGS_FI_ANC_TRG_CAT');
242: fnd_message.set_token('S_FEE_TRIG_CAT', igs_fi_gen_gl.get_lkp_meaning(p_v_lookup_type => 'IGS_FI_LOCKBOX',
243: p_v_lookup_code => 'INSTITUTION'));
244: IGS_GE_MSG_STACK.ADD;
245: App_Exception.Raise_Exception;
246: END IF;
283: OPEN cur_ft_chrg(new_references.fee_type);
284: FETCH cur_ft_chrg INTO l_var;
285: IF(cur_ft_chrg%FOUND) THEN
286: CLOSE cur_ft_chrg;
287: FND_MESSAGE.SET_NAME('IGS','IGS_FI_FEE_CLASS_USED');
288: IGS_GE_MSG_STACK.ADD;
289: APP_EXCEPTION.RAISE_EXCEPTION;
290: END IF;
291: CLOSE cur_ft_chrg;
406: new_references.s_fee_type <> 'PAY_PLAN' AND
407: new_references.s_fee_type <> 'AUDIT' AND
408: new_references.s_fee_type <> 'SPECIAL' AND
409: new_references.s_fee_type <> 'WAIVER_ADJ' THEN
410: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
411: IGS_GE_MSG_STACK.ADD;
412: App_Exception.Raise_Exception;
413: END IF;
414: END IF;
416: column_name is NULL) THEN
417: IF new_references.optional_payment_ind <> 'Y' AND
418: new_references.optional_payment_ind <> 'N'
419: THEN
420: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
421: IGS_GE_MSG_STACK.ADD;
422: App_Exception.Raise_Exception;
423: END IF;
424: END IF;
425: IF (upper(Column_Name) = 'CLOSED_IND' OR
426: column_name is NULL) THEN
427: IF(new_references.closed_ind <> 'Y' AND
428: new_references.closed_ind <> 'N') THEN
429: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
430: IGS_GE_MSG_STACK.ADD;
431: App_Exception.Raise_Exception;
432: END IF;
433: END IF;
440: new_references.s_fee_trigger_cat <> 'UNITSET' AND
441: new_references.s_fee_trigger_cat <> 'AUDIT' AND
442: new_references.s_fee_trigger_cat <> 'SPECIAL' THEN
443:
444: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
445: IGS_GE_MSG_STACK.ADD;
446: App_Exception.Raise_Exception;
447: END IF;
448: END IF;
457: 'INTEREST',
458: 'SPONSOR',
459: 'AID_ADJ',
460: 'DOCUMENT') THEN
461: fnd_message.set_name('IGS',
462: 'IGS_FI_CANNOT_SET_OPT');
463: igs_ge_msg_stack.add;
464: app_exception.raise_exception;
465: END IF;
469: IF ( UPPER(column_name) = 'DESIGNATED_PAYMENT_FLAG'
470: OR column_name is NULL) THEN
471: IF( new_references.designated_payment_flag <> 'Y'
472: AND new_references.designated_payment_flag <> 'N' ) THEN
473: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
474: igs_ge_msg_stack.ADD;
475: app_exception.raise_exception;
476: END IF;
477: END IF;
496: NULL;
497: ELSE
498: IF NOT igs_lookups_view_pkg.get_pk_for_validation('FEE_CLASS',
499: new_references.fee_class) 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 IF;
587: IF (p_action = 'INSERT') THEN
588: -- Call all the procedures related to Before Insert.
589: BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE, p_updating =>FALSE , p_deleting =>FALSE);
590: IF Get_PK_For_Validation ( new_references.fee_type )THEN
591: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
592: IGS_GE_MSG_STACK.ADD;
593: App_Exception.Raise_Exception;
594: END IF;
595:
609: check_parent_existance; --Bug 2175865
610: ELSIF (p_action = 'VALIDATE_INSERT') THEN
611: -- Call all the procedures related to Before Insert.
612: IF Get_PK_For_Validation ( new_references.fee_type ) THEN
613: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
614: IGS_GE_MSG_STACK.ADD;
615: App_Exception.Raise_Exception;
616: END IF;
617: Check_Constraints;
678: if X_LAST_UPDATE_LOGIN is NULL then
679: X_LAST_UPDATE_LOGIN := -1;
680: end if;
681: else
682: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
683: IGS_GE_MSG_STACK.ADD;
684: app_exception.raise_exception;
685: end if;
686:
780: begin
781: open c1;
782: fetch c1 into tlinfo;
783: if (c1%notfound) then
784: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
785: IGS_GE_MSG_STACK.ADD;
786: app_exception.raise_exception;
787: close c1;
788: return;
804: OR ((tlinfo.DESIGNATED_PAYMENT_FLAG IS NULL) AND (X_DESIGNATED_PAYMENT_FLAG IS NULL)))
805: ) then
806: null;
807: else
808: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
809: IGS_GE_MSG_STACK.ADD;
810: app_exception.raise_exception;
811: end if;
812: return;
843: if X_LAST_UPDATE_LOGIN is NULL then
844: X_LAST_UPDATE_LOGIN := -1;
845: end if;
846: else
847: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
848: IGS_GE_MSG_STACK.ADD;
849: app_exception.raise_exception;
850: end if;
851: