[Home] [Help]
32: || with assignment operator for defaulting variable v_ret_val.
33: ----------------------------------------------------------------------------*/
34: gv_other_detail VARCHAR2(255);
35: BEGIN -- finp_val_fc_clsd_upd
36: -- Validate update of the IGS_FI_FEE_CAT.closed_ind.
37: DECLARE
38: v_check CHAR;
39: v_ret_val BOOLEAN := TRUE;
40: CURSOR c_fcm IS
38: v_check CHAR;
39: v_ret_val BOOLEAN := TRUE;
40: CURSOR c_fcm IS
41: SELECT 'x'
42: FROM IGS_FI_FEE_CAT_MAP
43: WHERE fee_cat = p_fee_cat AND
44: dflt_cat_ind = 'Y';
45: BEGIN
46: p_message_name := NULL;
57: RETURN v_ret_val;
58: END;
59: END finp_val_fc_clsd_upd;
60: --
61: -- Warn if IGS_FI_FEE_CAT.currency_cd change effects child records.
62: FUNCTION finp_chk_rates_exist(
63: p_fee_cat IN VARCHAR2 ,
64: p_message_name OUT NOCOPY VARCHAR2 )
65: RETURN BOOLEAN AS
64: p_message_name OUT NOCOPY VARCHAR2 )
65: RETURN BOOLEAN AS
66: gv_other_detail VARCHAR2(255);
67: BEGIN -- finp_chk_rates_exist
68: -- Check if IGS_FI_F_CAT_FEE_LBL records exist for the IGS_FI_FEE_CAT,
69: -- which have associated IGS_FI_FEE_AS_RATE records.
70: DECLARE
71: cst_fcfl CONSTANT VARCHAR2(5) := 'FCFL';
72: CURSOR c_fcfl(
69: -- which have associated IGS_FI_FEE_AS_RATE records.
70: DECLARE
71: cst_fcfl CONSTANT VARCHAR2(5) := 'FCFL';
72: CURSOR c_fcfl(
73: cp_fee_cat IGS_FI_FEE_CAT.fee_cat%TYPE) IS
74: SELECT fee_cal_type,
75: fee_ci_sequence_number,
76: FEE_TYPE
77: FROM IGS_FI_F_CAT_FEE_LBL
79: CURSOR c_far(
80: cp_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE,
81: cp_fee_cal_type IGS_FI_F_CAT_FEE_LBL.fee_cal_type%TYPE,
82: cp_fee_ci_sequence_number IGS_FI_F_CAT_FEE_LBL.fee_ci_sequence_number%TYPE,
83: cp_fee_cat IGS_FI_FEE_CAT.fee_cat%TYPE) IS
84: SELECT rate_number
85: FROM IGS_FI_FEE_AS_RATE
86: WHERE fee_type= cp_fee_type AND
87: fee_cal_type = cp_fee_cal_type AND
91: CURSOR c_err(
92: cp_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE,
93: cp_fee_cal_type IGS_FI_F_CAT_FEE_LBL.fee_cal_type%TYPE,
94: cp_fee_ci_sequence_number IGS_FI_F_CAT_FEE_LBL.fee_ci_sequence_number%TYPE,
95: cp_fee_cat IGS_FI_FEE_CAT.fee_cat%TYPE)IS
96: SELECT range_number
97: FROM IGS_FI_ELM_RANGE_RT
98: WHERE FEE_TYPE = cp_fee_type AND
99: fee_cal_type = cp_fee_cal_type AND
109: -- Check parameter
110: IF p_fee_cat IS NULL THEN
111: RETURN FALSE;
112: END IF;
113: -- Use a loop to find any IGS_FI_F_CAT_FEE_LBL records based on the IGS_FI_FEE_CAT.
114: FOR v_fcfl_rec IN c_fcfl(p_fee_cat) LOOP
115: -- Check if any associated IGS_FI_FEE_AS_RATE records exist for the
116: -- IGS_FI_F_CAT_FEE_LBL record. If so, return a warning.
117: OPEN c_far(