[Home] [Help]
35:
36: TYPE fin_line_tab_type IS TABLE OF NUMBER;
37:
38: TYPE asset_rec_type IS RECORD (fin_asset_id OKC_K_LINES_B.id%TYPE,
39: amount OKL_K_LINES.tradein_amount%TYPE,
40: asset_number OKC_K_LINES_TL.name%TYPE,
41: description OKC_K_LINES_TL.item_description%TYPE,
42: oec OKL_K_LINES.oec%TYPE,
43: capitalize_yn OKL_K_LINES.capitalize_down_payment_yn%TYPE,
38: TYPE asset_rec_type IS RECORD (fin_asset_id OKC_K_LINES_B.id%TYPE,
39: amount OKL_K_LINES.tradein_amount%TYPE,
40: asset_number OKC_K_LINES_TL.name%TYPE,
41: description OKC_K_LINES_TL.item_description%TYPE,
42: oec OKL_K_LINES.oec%TYPE,
43: capitalize_yn OKL_K_LINES.capitalize_down_payment_yn%TYPE,
44: receiver_code OKL_K_LINES.down_payment_receiver_code%TYPE);
45:
46: TYPE asset_tbl_type IS TABLE OF asset_rec_type INDEX BY BINARY_INTEGER;
39: amount OKL_K_LINES.tradein_amount%TYPE,
40: asset_number OKC_K_LINES_TL.name%TYPE,
41: description OKC_K_LINES_TL.item_description%TYPE,
42: oec OKL_K_LINES.oec%TYPE,
43: capitalize_yn OKL_K_LINES.capitalize_down_payment_yn%TYPE,
44: receiver_code OKL_K_LINES.down_payment_receiver_code%TYPE);
45:
46: TYPE asset_tbl_type IS TABLE OF asset_rec_type INDEX BY BINARY_INTEGER;
47:
40: asset_number OKC_K_LINES_TL.name%TYPE,
41: description OKC_K_LINES_TL.item_description%TYPE,
42: oec OKL_K_LINES.oec%TYPE,
43: capitalize_yn OKL_K_LINES.capitalize_down_payment_yn%TYPE,
44: receiver_code OKL_K_LINES.down_payment_receiver_code%TYPE);
45:
46: TYPE asset_tbl_type IS TABLE OF asset_rec_type INDEX BY BINARY_INTEGER;
47:
48: PROCEDURE Create_all_line(
751: ast_key.concatenated_segments asset_key_name,
752: cim_fa.object1_id1 asset_id
753: FROM okl_txl_assets_b txl,
754: okc_line_styles_b lse_fa,
755: okl_k_lines kle_fa,
756: okc_k_lines_b cleb_fa,
757: okl_asset_key_lov_uv ast_key,
758: okx_ast_locs_v ast_loc,
759: okc_k_items cim_fa
892:
893:
894: --start NISINHA Bug 6490572
895:
896: -- cursor to get Model Number and Manufacturer from OKL_K_LINES for loan contracts
897:
898: CURSOR c_fa_line_loan(p_clev_fin_id IN okc_k_lines_b.id%type,
899: p_dnz_chr_id IN okc_k_headers_all_b.id%type) IS
900: SELECT kle_fa.model_number,
900: SELECT kle_fa.model_number,
901: kle_fa.year_built,
902: kle_fa.manufacturer_name
903: FROM okc_line_styles_b lse_fa,
904: okl_k_lines kle_fa,
905: okc_k_lines_b cleb_fa
906: WHERE cleb_fa.id = kle_fa.id
907: AND lse_fa.id = cleb_fa.lse_id
908: AND lse_fa.lty_code = 'FIXED_ASSET'
1594: clet_fin.item_description description,
1595: NVL(kle_fin.oec,0) oec
1596: FROM okc_k_lines_b cleb_fin,
1597: okc_k_lines_tl clet_fin,
1598: okl_k_lines kle_fin,
1599: okc_line_styles_b lse_fin,
1600: okc_statuses_b sts
1601: WHERE cleb_fin.dnz_chr_id = p_chr_id
1602: AND cleb_fin.chr_id = p_chr_id
1615: clet_fin.item_description description,
1616: NVL(kle_fin.oec,0) oec
1617: FROM okc_k_lines_b cleb_fin,
1618: okc_k_lines_tl clet_fin,
1619: okl_k_lines kle_fin,
1620: okc_line_styles_b lse_fin,
1621: okc_statuses_b sts
1622: WHERE cleb_fin.dnz_chr_id = p_chr_id
1623: AND cleb_fin.chr_id = p_chr_id
1633:
1634: CURSOR c_term_fin_lines(p_chr_id IN NUMBER) is
1635: SELECT SUM(NVL(kle_fin.tradein_amount,0)) amount
1636: FROM okc_k_lines_b cleb_fin,
1637: okl_k_lines kle_fin,
1638: okc_line_styles_b lse_fin
1639: WHERE cleb_fin.dnz_chr_id = p_chr_id
1640: AND cleb_fin.chr_id = p_chr_id
1641: AND cleb_fin.sts_code = 'TERMINATED'
1846: NVL(kle_fin.capitalize_down_payment_yn,'Y') capitalize_yn,
1847: NVL(kle_fin.down_payment_receiver_code,'LESSOR') receiver_code
1848: FROM okc_k_lines_b cleb_fin,
1849: okc_k_lines_tl clet_fin,
1850: okl_k_lines kle_fin,
1851: okc_line_styles_b lse_fin,
1852: okc_statuses_b sts
1853: WHERE cleb_fin.dnz_chr_id = p_chr_id
1854: AND cleb_fin.chr_id = p_chr_id
1869: NVL(kle_fin.capitalize_down_payment_yn,'Y') capitalize_yn,
1870: NVL(kle_fin.down_payment_receiver_code,'LESSOR') receiver_code
1871: FROM okc_k_lines_b cleb_fin,
1872: okc_k_lines_tl clet_fin,
1873: okl_k_lines kle_fin,
1874: okc_line_styles_b lse_fin,
1875: okc_statuses_b sts
1876: WHERE cleb_fin.dnz_chr_id = p_chr_id
1877: AND cleb_fin.chr_id = p_chr_id
1889: CURSOR c_term_fin_lines(p_chr_id IN NUMBER) is
1890: SELECT SUM( NVL(kle_fin.capital_reduction,0) +
1891: (NVL(kle_fin.capital_reduction_percent,0)/100 * kle_fin.oec)) amount
1892: FROM okc_k_lines_b cleb_fin,
1893: okl_k_lines kle_fin,
1894: okc_line_styles_b lse_fin
1895: WHERE cleb_fin.dnz_chr_id = p_chr_id
1896: AND cleb_fin.chr_id = p_chr_id
1897: AND cleb_fin.sts_code = 'TERMINATED'
2101: RETURN VARCHAR2
2102: IS
2103: CURSOR c_subsidy_amount(p_khr_id NUMBER, p_subsidy_id NUMBER) IS
2104: SELECT OKL_ACCOUNTING_UTIL.format_amount(SUM(NVL(kle_sub.subsidy_override_amount,kle_sub.amount)), cleb_sub.currency_code) subsidy_amount
2105: FROM okl_k_lines kle_sub,
2106: okc_k_lines_b cleb_sub
2107: WHERE kle_sub.subsidy_id = p_subsidy_id
2108: AND cleb_sub.dnz_chr_id = p_khr_id
2109: AND cleb_sub.id = kle_sub.id
2125: RETURN VARCHAR2
2126: IS
2127: CURSOR c_down_payment_amount(p_khr_id NUMBER) IS
2128: SELECT OKL_ACCOUNTING_UTIL.format_amount(SUM( NVL(kle_fin.capital_reduction,0) + (NVL(kle_fin.capital_reduction_percent,0)/100 * kle_fin.oec) ), cleb_fin.currency_code) down_payment_amount
2129: FROM okl_k_lines kle_fin,
2130: okc_k_lines_b cleb_fin
2131: WHERE cleb_fin.chr_id = p_khr_id
2132: AND cleb_fin.dnz_chr_id = p_khr_id
2133: AND kle_fin.id = cleb_fin.id