[Home] [Help]
129: BEGIN
130: DECLARE
131: e_resource_busy EXCEPTION;
132: PRAGMA EXCEPTION_INIT(e_resource_busy, -54);
133: v_s_fee_structure_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
134: v_fee_liability_status IGS_FI_F_CAT_FEE_LBL.fee_liability_status%TYPE;
135: CURSOR c_fss IS
136: SELECT fss.s_fee_structure_status
137: FROM IGS_FI_FEE_STR_STAT fss
133: v_s_fee_structure_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
134: v_fee_liability_status IGS_FI_F_CAT_FEE_LBL.fee_liability_status%TYPE;
135: CURSOR c_fss IS
136: SELECT fss.s_fee_structure_status
137: FROM IGS_FI_FEE_STR_STAT fss
138: WHERE fss.fee_structure_status = p_fee_type_ci_status;
139: CURSOR c_fcfl IS
140: SELECT fcfl.*, fcfl.rowid -- kdande -> rowid was added to make a call to Update_Row TBH.
141: FROM IGS_FI_F_CAT_FEE_LBL fcfl
149: -- to 'INACTIVE' update the IGS_FI_F_CAT_FEE_LBL.fee_liability_status
150: -- in related records to 'INACTIVE'.
151: p_message_name := NULL;
152: -- 1. Check if the fee_type_ci_status relates to a system
153: -- status in IGS_FI_FEE_STR_STAT of 'INACTIVE'.
154: OPEN c_fss;
155: FETCH c_fss INTO v_s_fee_structure_status;
156: CLOSE c_fss;
157: IF (v_s_fee_structure_status <> 'INACTIVE') THEN
344: -- ACTIVE.
345: DECLARE
346: cst_hecs CONSTANT IGS_FI_FEE_TYPE.s_fee_type%TYPE := 'HECS';
347: cst_institutn CONSTANT IGS_FI_FEE_TYPE.s_fee_trigger_cat%TYPE := 'INSTITUTN';
348: cst_active CONSTANT IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'ACTIVE';
349: v_s_fee_type IGS_FI_FEE_TYPE.s_fee_type%TYPE;
350: v_s_fee_trigger_cat IGS_FI_FEE_TYPE.s_fee_trigger_cat%TYPE;
351: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
352: v_s_fee_structure_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE;
348: cst_active CONSTANT IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'ACTIVE';
349: v_s_fee_type IGS_FI_FEE_TYPE.s_fee_type%TYPE;
350: v_s_fee_trigger_cat IGS_FI_FEE_TYPE.s_fee_trigger_cat%TYPE;
351: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
352: v_s_fee_structure_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE;
353: v_acc_closed_ind IGS_FI_ACC.closed_ind%TYPE;
354: v_s_cal_status IGS_CA_STAT.s_cal_status%TYPE;
355: v_s_cal_cat IGS_CA_TYPE.S_CAL_CAT%TYPE;
356: CURSOR c_fss (
353: v_acc_closed_ind IGS_FI_ACC.closed_ind%TYPE;
354: v_s_cal_status IGS_CA_STAT.s_cal_status%TYPE;
355: v_s_cal_cat IGS_CA_TYPE.S_CAL_CAT%TYPE;
356: CURSOR c_fss (
357: cp_fee_type_ci_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE) IS
358: SELECT fss.s_fee_structure_status
359: FROM IGS_FI_FEE_STR_STAT fss
360: WHERE fss.fee_structure_status = cp_fee_type_ci_status;
361: CURSOR c_ft IS
355: v_s_cal_cat IGS_CA_TYPE.S_CAL_CAT%TYPE;
356: CURSOR c_fss (
357: cp_fee_type_ci_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE) IS
358: SELECT fss.s_fee_structure_status
359: FROM IGS_FI_FEE_STR_STAT fss
360: WHERE fss.fee_structure_status = cp_fee_type_ci_status;
361: CURSOR c_ft IS
362: SELECT ft.s_fee_type,
363: ft.s_fee_trigger_cat
538: RETURN BOOLEAN AS
539: gv_other_detail VARCHAR2(255);
540: BEGIN
541: DECLARE
542: cst_active CONSTANT IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'ACTIVE';
543: cst_planned CONSTANT
544: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'PLANNED';
545: cst_inactive CONSTANT
546: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'INACTIVE';
540: BEGIN
541: DECLARE
542: cst_active CONSTANT IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'ACTIVE';
543: cst_planned CONSTANT
544: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'PLANNED';
545: cst_inactive CONSTANT
546: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'INACTIVE';
547: v_new_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
548: v_old_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
542: cst_active CONSTANT IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'ACTIVE';
543: cst_planned CONSTANT
544: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'PLANNED';
545: cst_inactive CONSTANT
546: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'INACTIVE';
547: v_new_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
548: v_old_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
549: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
550: CURSOR c_fss (
543: cst_planned CONSTANT
544: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'PLANNED';
545: cst_inactive CONSTANT
546: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'INACTIVE';
547: v_new_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
548: v_old_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
549: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
550: CURSOR c_fss (
551: cp_ftci_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE) IS
544: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'PLANNED';
545: cst_inactive CONSTANT
546: IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE := 'INACTIVE';
547: v_new_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
548: v_old_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
549: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
550: CURSOR c_fss (
551: cp_ftci_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE) IS
552: SELECT fss.s_fee_structure_status
547: v_new_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
548: v_old_system_status IGS_FI_FEE_STR_STAT.s_fee_structure_status%TYPE;
549: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
550: CURSOR c_fss (
551: cp_ftci_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE) IS
552: SELECT fss.s_fee_structure_status
553: FROM IGS_FI_FEE_STR_STAT fss
554: WHERE fss.fee_structure_status = cp_ftci_status;
555: CURSOR c_fcfl IS
549: v_fee_type IGS_FI_F_CAT_FEE_LBL.fee_type%TYPE;
550: CURSOR c_fss (
551: cp_ftci_status IGS_FI_FEE_STR_STAT.fee_structure_status%TYPE) IS
552: SELECT fss.s_fee_structure_status
553: FROM IGS_FI_FEE_STR_STAT fss
554: WHERE fss.fee_structure_status = cp_ftci_status;
555: CURSOR c_fcfl IS
556: SELECT fcfl.fee_type
557: FROM IGS_FI_F_CAT_FEE_LBL fcfl
560: fcfl.fee_ci_sequence_number = p_fee_ci_sequence_number;
561: CURSOR c_fcfl_fss IS
562: SELECT fcfl.fee_type
563: FROM IGS_FI_F_CAT_FEE_LBL fcfl,
564: IGS_FI_FEE_STR_STAT fss
565: WHERE fcfl.fee_type = p_fee_type AND
566: fcfl.fee_cal_type = p_fee_cal_type AND
567: fcfl.fee_ci_sequence_number = p_fee_ci_sequence_number AND
568: fcfl.fee_liability_status = fss.fee_structure_status AND