[Home] [Help]
514: -- Cursor to select the interest Name
515: CURSOR indx_csr IS
516: SELECT distinct idx.NAME
517: FROM OKL_K_RATE_PARAMS okl,
518: OKL_INDICES idx
519: WHERE okl.khr_id = (SELECT id
520: FROM OKC_K_HEADERS_B
521: WHERE contract_number =p_contract_number
522: AND scs_code = 'LEASE')
531: -- changes made as part of OKLR12B disbursements project.
532: CURSOR change_csr(v_khr_id NUMBER,
533: v_start_date DATE,
534: v_end_date DATE,
535: v_name OKL_INDICES.NAME%TYPE) IS
536: SELECT ac.check_date change_date
537: FROM OKL_TRX_AP_INVOICES_B oklinv,
538: okl_txl_ap_inv_lns_all_b tpl,
539: okl_cnsld_ap_invs_all okl_cnsld,
556: AND ac.check_date <= v_end_date
557: UNION
558: SELECT oiv.datetime_valid change_date
559: FROM OKL_INDEX_VALUES oiv,
560: OKL_INDICES oi
561: WHERE oiv.idx_id = oi.id
562: AND oi.name = v_name
563: AND oiv.datetime_valid >= v_start_date
564: AND oiv.datetime_valid <= v_end_date;
597: CURSOR int_max_csr(v_name VARCHAR2,
598: v_interest_date DATE) IS
599: SELECT idv.value
600: FROM OKL_INDEX_VALUES idv,
601: OKL_INDICES idx
602: WHERE idx.ID = idv.IDX_ID
603: AND idx.NAME = v_name
604: AND idv.datetime_valid = (SELECT MAX(idv.datetime_valid)
605: FROM OKL_INDEX_VALUES idv ,
602: WHERE idx.ID = idv.IDX_ID
603: AND idx.NAME = v_name
604: AND idv.datetime_valid = (SELECT MAX(idv.datetime_valid)
605: FROM OKL_INDEX_VALUES idv ,
606: OKL_INDICES idx
607: WHERE idx.id = idv.idx_id
608: AND idx.name = v_name
609: AND idv.datetime_valid <= v_interest_date);
610:
626: CURSOR num_days_csr(p_date DATE) IS
627: SELECT add_months(trunc(p_date,'year'),12) - trunc(p_date,'year')
628: FROM dual;
629:
630: l_name OKL_INDICES.name%TYPE;
631: l_prev_start_date DATE;
632: l_temp_interest NUMBER := 0;
633: l_total_interest NUMBER := 0;
634: l_principal_amount NUMBER := 0;