[Home] [Help]
49: cst_warn CONSTANT CHAR := 'W';
50: v_record_found BOOLEAN DEFAULT FALSE;
51: v_yes_found BOOLEAN DEFAULT FALSE;
52: CURSOR c_fcm(
53: cp_admission_cat IGS_FI_FEE_CAT_MAP.admission_cat%TYPE)IS
54: SELECT fcm.dflt_cat_ind
55: FROM IGS_FI_FEE_CAT_MAP fcm
56: WHERE fcm.admission_cat = cp_admission_cat;
57: BEGIN
51: v_yes_found BOOLEAN DEFAULT FALSE;
52: CURSOR c_fcm(
53: cp_admission_cat IGS_FI_FEE_CAT_MAP.admission_cat%TYPE)IS
54: SELECT fcm.dflt_cat_ind
55: FROM IGS_FI_FEE_CAT_MAP fcm
56: WHERE fcm.admission_cat = cp_admission_cat;
57: BEGIN
58: --- Set the default message number
59: p_message_name := null;
96: -- Validate if the fee category can be marked as the default for the admission
97: -- category
98: -- (only one fee category can be marked as the default)
99: DECLARE
100: v_dflt_cat_ind IGS_FI_FEE_CAT_MAP.dflt_cat_ind%TYPE;
101: cst_yes CONSTANT CHAR := 'Y';
102: CURSOR c_fcm(cp_admission_cat IGS_FI_FEE_CAT_MAP.admission_cat%TYPE,
103: cp_fee_cat IGS_FI_FEE_CAT_MAP.fee_cat%TYPE)IS
104: SELECT fcm.dflt_cat_ind
98: -- (only one fee category can be marked as the default)
99: DECLARE
100: v_dflt_cat_ind IGS_FI_FEE_CAT_MAP.dflt_cat_ind%TYPE;
101: cst_yes CONSTANT CHAR := 'Y';
102: CURSOR c_fcm(cp_admission_cat IGS_FI_FEE_CAT_MAP.admission_cat%TYPE,
103: cp_fee_cat IGS_FI_FEE_CAT_MAP.fee_cat%TYPE)IS
104: SELECT fcm.dflt_cat_ind
105: FROM IGS_FI_FEE_CAT_MAP fcm
106: WHERE fcm.admission_cat = cp_admission_cat AND
99: DECLARE
100: v_dflt_cat_ind IGS_FI_FEE_CAT_MAP.dflt_cat_ind%TYPE;
101: cst_yes CONSTANT CHAR := 'Y';
102: CURSOR c_fcm(cp_admission_cat IGS_FI_FEE_CAT_MAP.admission_cat%TYPE,
103: cp_fee_cat IGS_FI_FEE_CAT_MAP.fee_cat%TYPE)IS
104: SELECT fcm.dflt_cat_ind
105: FROM IGS_FI_FEE_CAT_MAP fcm
106: WHERE fcm.admission_cat = cp_admission_cat AND
107: fcm.fee_cat <> cp_fee_cat AND
101: cst_yes CONSTANT CHAR := 'Y';
102: CURSOR c_fcm(cp_admission_cat IGS_FI_FEE_CAT_MAP.admission_cat%TYPE,
103: cp_fee_cat IGS_FI_FEE_CAT_MAP.fee_cat%TYPE)IS
104: SELECT fcm.dflt_cat_ind
105: FROM IGS_FI_FEE_CAT_MAP fcm
106: WHERE fcm.admission_cat = cp_admission_cat AND
107: fcm.fee_cat <> cp_fee_cat AND
108: fcm.dflt_cat_ind = cst_yes;
109: BEGIN
127: IGS_GE_MSG_STACK.ADD;
128: App_Exception.Raise_Exception;
129: END admp_val_fcm_dflt;
130: --
131: -- Validate if IGS_FI_FEE_CAT.fee_cat is closed.
132: FUNCTION finp_val_fc_closed(
133: p_fee_cat IN VARCHAR2 ,
134: p_message_name OUT NOCOPY VARCHAR2 )
135: RETURN BOOLEAN AS
133: p_fee_cat IN VARCHAR2 ,
134: p_message_name OUT NOCOPY VARCHAR2 )
135: RETURN BOOLEAN AS
136: BEGIN --FINP_VAL_FC_CLOSED
137: --Validate if IGS_FI_FEE_CAT.fee_cat is closed
138: DECLARE
139: v_closed_ind IGS_FI_FEE_CAT.closed_ind%type;
140: CURSOR c_fc IS
141: SELECT fc.closed_ind
135: RETURN BOOLEAN AS
136: BEGIN --FINP_VAL_FC_CLOSED
137: --Validate if IGS_FI_FEE_CAT.fee_cat is closed
138: DECLARE
139: v_closed_ind IGS_FI_FEE_CAT.closed_ind%type;
140: CURSOR c_fc IS
141: SELECT fc.closed_ind
142: FROM IGS_FI_FEE_CAT fc
143: WHERE fc.fee_cat = p_fee_cat;
138: DECLARE
139: v_closed_ind IGS_FI_FEE_CAT.closed_ind%type;
140: CURSOR c_fc IS
141: SELECT fc.closed_ind
142: FROM IGS_FI_FEE_CAT fc
143: WHERE fc.fee_cat = p_fee_cat;
144: BEGIN
145: --- Set the default message number
146: p_message_name := null;