V


Example heading with h2 size

Example heading with h3 size

Following is sample java code.

int i = 10;
if(i>0){
    System.out.println('positive');
}

CREATE OR REPLACE PROCEDURE GET_RP_DATA_REPHASEbackup13524(
P_ACCNO IN VARCHAR2,
P_OUT OUT SYS_REFCURSOR
)
AS
-- Declare variables for calculation
v_out_bal NUMBER;
v_rate NUMBER;
v_emi_amt NUMBER;
v_remaining_ten NUMBER;

BEGIN
-- Calculate v_out_bal
SELECT ABS(idbi.idbib_avg_vbal_acid@fin_cdp_live(acid, SYSDATE, SYSDATE, '01'))
INTO v_out_bal
FROM tbaadm.gam@fin_cdp_live
WHERE foracid = TRIM(P_ACCNO);

-- Calculate v_rate
SELECT idbi.retasst_getintrate@fin_cdp_live(acid, SYSDATE, '01') 
INTO v_rate
FROM tbaadm.gam@fin_cdp_live
WHERE foracid = TRIM(P_ACCNO);

-- Calculate v_emi_amt
SELECT flow_amt 
INTO v_emi_amt
FROM tbaadm.lrs@fin_cdp_live
WHERE acid = (SELECT acid FROM tbaadm.gam@fin_cdp_live WHERE foracid = TRIM(P_ACCNO))
AND current_int_rec_flg = 'Y'
AND LRS.FLOW_ID IN ('PRDEM', 'EIDEM')
AND lrs.del_flg != 'Y';

-- Calculate v_remaining_ten
SELECT ROUND(LN(v_emi_amt / (v_emi_amt - (v_rate / 12 / 100) * v_out_bal)) / LN(1 + (v_rate / 12 / 100))) 
INTO v_remaining_ten
FROM dual;

-- Open cursor
OPEN P_OUT FOR
    SELECT G.ACID,
           IDBI.IBANK_INTT_RATE@FIN_CDP_LIVE(SYSDATE, G.ACID, G.SANCT_LIM, 'D', 'N', '01') RATE,
           FORACID,
           ACCT_NAME,
           G.SOL_ID,
           G.SANCT_LIM,
           (CASE
               WHEN entry_by IN ('AL', 'PL', 'EL') THEN
                   g.sol_id
               ELSE
                   (SELECT SUBSTR(set_id, 4)
                    FROM tbaadm.sst@fin_cdp_live
                    WHERE bank_id = '01'
                      AND set_id LIKE 'RAC%'
                      AND sst.sol_id = g.sol_id
                      AND sst.del_flg != 'Y')
           END) RAC_SOLID,
           S.ENTRY_BY LOANTYPE,
           G.SCHM_CODE,
           S.REF_DESC SCHM_DESC,
           (SELECT SOL_ID || ' - ' || SOL_DESC TEXT
            FROM TBAADM.SOL@FIN_CDP_LIVE
            WHERE DEL_FLG = 'N'
              AND SOL_ID = G.SOL_ID) SOLDESC,
           IDBI.IDBIB_OVERDUE_AMT@FIN_CDP_LIVE(G.ACID, SYSDATE, '01') OVERDUEAMT,
           ABS(CLR_BAL_AMT) OUTSTANDINGAMT,
           (SELECT LOAN_PAPER_DATE
            FROM TBAADM.LHT@FIN_CDP_LIVE
            WHERE ACID = G.ACID
              AND SERIAL_NUM = (SELECT MAX(SERIAL_NUM)
                                FROM TBAADM.LHT@FIN_CDP_LIVE A
                                WHERE A.ACID = LHT.ACID
                                  AND STATUS = 'A'
                                  AND A.BANK_ID = '01')
              AND STATUS = 'A'
              AND BANK_ID = '01') HLAGDT,
           CASE
               WHEN FREE_TEXT IS NULL THEN
                   '3'
               WHEN ROI_GET_ACCOUNTDETAILS(FREE_TEXT, 'LAP_BORW_TYPE') = 1 THEN
                   '1'
               WHEN ROI_GET_ACCOUNTDETAILS(FREE_TEXT, 'LAP_BORW_TYPE') = 2 THEN
                   '2'
               ELSE
                   '3'
           END BORR_TYPE,
           CASE
               WHEN G.SCHM_CODE IN (SELECT SCHEMECODE
                                     FROM ROI_SCHEME_LOAN_MASTER
                                     WHERE LOAN_APPLIED = 3
                                       AND ACTIVE = 1) THEN
                   'TOPUP'
               ELSE
                   'NONE'
           END TOPUPCASE,
           CASE
               WHEN DMD_SATISFY_MTHD = 'E' THEN
                   'SI/DM'
               WHEN DMD_SATISFY_MTHD = 'N' THEN
                   'PDC'
               WHEN DMD_SATISFY_MTHD = 'P' THEN
                   'PDC'
               WHEN DMD_SATISFY_MTHD = 'D' THEN
                   'ECS'
           END AS REPAYMENTMODE,
           (SELECT REF_DESC
            FROM tbaadm.rct@FIN_CDP_LIVE
            WHERE ref_rec_type = '00'
              AND rct.bank_id = '01'
              AND ref_code = (SELECT borrower_category_code
                              FROM tbaadm.gac@FIN_CDP_LIVE
                              WHERE gac.acid = (SELECT gam.acid
                                                FROM tbaadm.gam@FIN_CDP_LIVE
                                                WHERE foracid = TRIM(P_ACCNO))
                                AND bank_id = '01')) AS BOR_DESC,
           (SELECT idbi.ibank_intt_rate@FIN_CDP_LIVE(SYSDATE, gam.acid, gam.sanct_lim, 'D', 'N', '01')
            FROM tbaadm.gam@FIN_CDP_LIVE
            WHERE foracid = TRIM(P_ACCNO)) AS EXSISTING_ROI,
           GET_RES_TENURE(TRIM(P_ACCNO)) AS restenure,
           GET_RP_BENCH(TRIM(P_ACCNO)) AS int_regim,
           NULL AS LOANEXPDATE,
           SANCT_LIM AS loan_amount,
           ABS(GET_SUSAGGRAMT(G.ACID, G.DRWNG_POWER, G.SANCT_LIM)) AGRILIM,
           GET_HLAMOD2(TRIM(P_ACCNO)) AS HLAMOD2,
           (SELECT main_classification_user
            FROM tbaadm.acd@FIN_CDP_LIVE
            WHERE b2k_id = (SELECT acid
                             FROM tbaadm.gam@FIN_CDP_LIVE
                             WHERE foracid = TRIM(P_ACCNO))
              AND b2k_type = 'ACCNT') AS ACT_STATUS,
           (SELECT OFLOW_AMT
            FROM tbaadm.lam@FIN_CDP_LIVE, tbaadm.gam@FIN_CDP_LIVE
            WHERE gam.acid = lam.acid
              AND gam.del_flg = 'N'
              AND gam.entity_cre_flg = 'Y'