462:
463:
464: CURSOR remaining_payments_csr(p_contract_id IN NUMBER) IS
465: SELECT count(stm.khr_id) remaining_payments
466: FROM okl_strm_elements ste
467: ,okl_streams stm
468: ,okl_strm_type_b sty
469: ,okc_k_headers_b khr
470: WHERE stm.id = ste.stm_id
1183:
1184: -- get residual value
1185: CURSOR residual_csr IS
1186: SELECT NVL(SUM(cs.amount),0)
1187: FROM okl_streams_v asv,okl_strm_type_v bs,okl_strm_elements_v cs
1188: WHERE cs.stm_id = asv.id AND bs.id = asv.sty_id
1189: AND bs.name = 'Residual Value'
1190: AND cs.stream_element_date >= SYSDATE
1191: AND asv.khr_id = p_contract_id;
1192:
1193: -- get rent value
1194: CURSOR rent_csr IS
1195: SELECT NVL(SUM(cs.amount),0)
1196: FROM okl_streams_v asv,okl_strm_type_v bs,okl_strm_elements_v cs
1197: WHERE cs.stm_id = asv.id AND bs.id = asv.sty_id
1198: AND bs.name = 'Rent'
1199: AND cs.stream_element_date >= SYSDATE
1200: AND asv.khr_id = p_contract_id ;
1200: AND asv.khr_id = p_contract_id ;
1201: -- get unearned amount
1202: CURSOR unearned_csr IS
1203: SELECT NVL(SUM(cs.amount),0)
1204: FROM okl_streams_v asv,okl_strm_type_v bs,okl_strm_elements_v cs
1205: WHERE cs.stm_id = asv.id AND bs.id = asv.sty_id
1206: AND bs.name = 'Unearned Income'
1207: AND cs.stream_element_date >= SYSDATE
1208: AND asv.khr_id = p_contract_id ;