[Home] [Help]
900: l_lne l_toplne_csr%ROWTYPE;
901: --l_svclne l_topsvclne_csr%ROWTYPE;
902: l_svclne srv_amt_csr%ROWTYPE;
903:
904: amount1 okl_k_lines.AMOUNT%TYPE;
905: amount2 okl_k_lines.AMOUNT%TYPE;
906:
907: i NUMBER;
908:
901: --l_svclne l_topsvclne_csr%ROWTYPE;
902: l_svclne srv_amt_csr%ROWTYPE;
903:
904: amount1 okl_k_lines.AMOUNT%TYPE;
905: amount2 okl_k_lines.AMOUNT%TYPE;
906:
907: i NUMBER;
908:
909: BEGIN
1530: NVL(capitalize_down_payment_yn,'N') capitalize_down_payment_yn,
1531: capital_reduction_percent,
1532: oec,
1533: e.ste_code ste_code -- 5264170
1534: FROM OKL_K_LINES a,
1535: OKC_K_LINES_TL b,
1536: OKC_LINE_STYLES_V C,
1537: OKC_K_LINES_B d,
1538: OKC_STATUSES_B e
1550: l_principal_start_date DATE;
1551: l_principal_periods NUMBER;
1552: l_curr_cle_id NUMBER;
1553: l_tot_principal_payment NUMBER;
1554: l_capital_amount OKL_K_LINES.CAPITAL_AMOUNT%TYPE;
1555: l_oec_amount OKL_K_LINES.OEC%TYPE;
1556: l_capital_reduction OKL_K_LINES.CAPITAL_REDUCTION%TYPE;
1557: l_capital_reduction_percent OKL_K_LINES.CAPITAL_REDUCTION_PERCENT%TYPE;
1558: l_capitalize_down_payment_yn OKL_K_LINES.CAPITALIZE_DOWN_PAYMENT_YN%TYPE;
1551: l_principal_periods NUMBER;
1552: l_curr_cle_id NUMBER;
1553: l_tot_principal_payment NUMBER;
1554: l_capital_amount OKL_K_LINES.CAPITAL_AMOUNT%TYPE;
1555: l_oec_amount OKL_K_LINES.OEC%TYPE;
1556: l_capital_reduction OKL_K_LINES.CAPITAL_REDUCTION%TYPE;
1557: l_capital_reduction_percent OKL_K_LINES.CAPITAL_REDUCTION_PERCENT%TYPE;
1558: l_capitalize_down_payment_yn OKL_K_LINES.CAPITALIZE_DOWN_PAYMENT_YN%TYPE;
1559: l_asset_number OKC_K_LINES_TL.NAME%TYPE;
1552: l_curr_cle_id NUMBER;
1553: l_tot_principal_payment NUMBER;
1554: l_capital_amount OKL_K_LINES.CAPITAL_AMOUNT%TYPE;
1555: l_oec_amount OKL_K_LINES.OEC%TYPE;
1556: l_capital_reduction OKL_K_LINES.CAPITAL_REDUCTION%TYPE;
1557: l_capital_reduction_percent OKL_K_LINES.CAPITAL_REDUCTION_PERCENT%TYPE;
1558: l_capitalize_down_payment_yn OKL_K_LINES.CAPITALIZE_DOWN_PAYMENT_YN%TYPE;
1559: l_asset_number OKC_K_LINES_TL.NAME%TYPE;
1560: l_ste_code OKC_STATUSES_B.STE_CODE%TYPE;
1553: l_tot_principal_payment NUMBER;
1554: l_capital_amount OKL_K_LINES.CAPITAL_AMOUNT%TYPE;
1555: l_oec_amount OKL_K_LINES.OEC%TYPE;
1556: l_capital_reduction OKL_K_LINES.CAPITAL_REDUCTION%TYPE;
1557: l_capital_reduction_percent OKL_K_LINES.CAPITAL_REDUCTION_PERCENT%TYPE;
1558: l_capitalize_down_payment_yn OKL_K_LINES.CAPITALIZE_DOWN_PAYMENT_YN%TYPE;
1559: l_asset_number OKC_K_LINES_TL.NAME%TYPE;
1560: l_ste_code OKC_STATUSES_B.STE_CODE%TYPE;
1561:
1554: l_capital_amount OKL_K_LINES.CAPITAL_AMOUNT%TYPE;
1555: l_oec_amount OKL_K_LINES.OEC%TYPE;
1556: l_capital_reduction OKL_K_LINES.CAPITAL_REDUCTION%TYPE;
1557: l_capital_reduction_percent OKL_K_LINES.CAPITAL_REDUCTION_PERCENT%TYPE;
1558: l_capitalize_down_payment_yn OKL_K_LINES.CAPITALIZE_DOWN_PAYMENT_YN%TYPE;
1559: l_asset_number OKC_K_LINES_TL.NAME%TYPE;
1560: l_ste_code OKC_STATUSES_B.STE_CODE%TYPE;
1561:
1562: line_ind NUMBER;
3140: --2. Check the disb amt not exceed line payment amt --
3141: -- Find out lines for a contract
3142: CURSOR lines_csr(p_chr_id IN NUMBER) IS
3143: SELECT cle.id,cle.name,lse.lty_code
3144: FROM okl_k_lines_full_v cle, okc_line_styles_v lse
3145: WHERE cle.dnz_chr_id = p_chr_id
3146: AND cle.lse_id = lse.id
3147: AND lse.lty_code IN ('FREE_FORM1','FEE','SOLD_SERVICE');
3148:
3265: pph.id payment_hdr_id,
3266: pph.passthru_start_date,
3267: pph.passthru_term,
3268: pph.passthru_stream_type_id
3269: FROM okl_k_lines_full_v line,
3270: okc_line_styles_v style,
3271: okc_statuses_v sts,
3272: okl_party_payment_hdr pph
3273: WHERE line.lse_id = style.id
3303: nvl(line.name,line.item_description) name,
3304: line.fee_type,
3305: rule.object1_id1,
3306: style.name line_style
3307: FROM okl_k_lines_full_v line,
3308: okc_line_styles_v style,
3309: okc_statuses_v sts,
3310: okc_rule_groups_b rgp,
3311: okc_rules_b rule
5396: l.name,
5397: l.amount,
5398: l.capital_amount,
5399: l.fee_type
5400: FROM okl_k_lines_full_v l,
5401: okc_line_styles_v sty,
5402: okc_statuses_v sts
5403: WHERE l.lse_id = sty.id
5404: AND l.sts_code = sts.code
5759:
5760: CURSOR l_rq_top_fee_ln_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE ) IS
5761: SELECT kle.id, kle.qte_id, kle.amount, cleb.name
5762: FROM okc_k_lines_v cleb,
5763: okl_k_lines kle
5764: WHERE cleb.dnz_chr_id = chrID
5765: AND kle.ID = cleb.ID
5766: AND kle.fee_type = 'ROLLOVER'
5767: -- AND cleb.sts_code NOT IN ('HOLD','EXPIRED','TERMINATED','CANCELLED', 'ABANDONED');
5777:
5778: CURSOR l_rq_top_fee_ln_csr1 ( chrID IN OKC_K_HEADERS_B.ID%TYPE ) IS
5779: SELECT kle.qte_id
5780: FROM okc_k_lines_b cleb,
5781: okl_k_lines kle
5782: WHERE cleb.dnz_chr_id = chrID
5783: AND kle.ID = cleb.ID
5784: AND kle.fee_type = 'ROLLOVER'
5785: -- AND cleb.sts_code NOT IN ('HOLD','EXPIRED','TERMINATED','CANCELLED', 'ABANDONED');
5793: /* Cursor to get the rollover quote fee sub-lines (applied to assets) for a
5794: given contract. */
5795:
5796: CURSOR l_rq_sub_ln_fee_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
5797: feeTopLine IN OKL_K_LINES.ID%TYPE) IS
5798: SELECT kle.id, kle.amount, cleb.end_date
5799: FROM okc_k_lines_b cleb,
5800: okl_k_lines kle
5801: WHERE cleb.dnz_chr_id = chrID
5796: CURSOR l_rq_sub_ln_fee_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
5797: feeTopLine IN OKL_K_LINES.ID%TYPE) IS
5798: SELECT kle.id, kle.amount, cleb.end_date
5799: FROM okc_k_lines_b cleb,
5800: okl_k_lines kle
5801: WHERE cleb.dnz_chr_id = chrID
5802: AND kle.ID = cleb.ID
5803: AND cleb.CLE_ID = feeTopLine
5804: -- AND cleb.sts_code NOT IN ('HOLD','EXPIRED','TERMINATED','CANCELLED', 'ABANDONED');
5822: /* Cursor to get the rollover quote fee top/sub-line payments for a
5823: given contract. */
5824:
5825: CURSOR l_rq_fee_pmt_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
5826: feeLine IN OKL_K_LINES.ID%TYPE) IS
5827:
5828: SELECT sll.rule_information2 start_date,
5829: SLL.rule_information3 periods,
5830: DECODE(sll.object1_id1, 'M', 1, 'Q', 3, 'S', 6, 'A', 12) mpp,
5851: /* Cursor to get the rollover quote fee top/sub-line payments HEADER for a
5852: given contract. */
5853:
5854: CURSOR l_rq_fee_pmtH_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
5855: feeLine IN OKL_K_LINES.ID%TYPE) IS
5856:
5857: SELECT slh.id
5858: FROM okc_rules_b slh,
5859: okc_rule_groups_b rgp,
5867: AND slh.object1_id1 = TO_CHAR(sty.id)
5868: AND styt.LANGUAGE = USERENV('LANG')
5869: AND sty.id = styt.id;
5870:
5871: l_top_fee_ln_id OKL_K_LINES.ID%TYPE;
5872: l_top_fee_ln_name OKC_K_LINES_V.NAME%TYPE;
5873: l_sub_fee_ln_id OKL_K_LINES.ID%TYPE;
5874: l_qte_id OKL_K_LINES.QTE_ID%TYPE;
5875: l_qte_num OKL_TRX_QUOTES_V.QUOTE_NUMBER%TYPE;
5869: AND sty.id = styt.id;
5870:
5871: l_top_fee_ln_id OKL_K_LINES.ID%TYPE;
5872: l_top_fee_ln_name OKC_K_LINES_V.NAME%TYPE;
5873: l_sub_fee_ln_id OKL_K_LINES.ID%TYPE;
5874: l_qte_id OKL_K_LINES.QTE_ID%TYPE;
5875: l_qte_num OKL_TRX_QUOTES_V.QUOTE_NUMBER%TYPE;
5876: p_term_tbl Okl_Trx_Quotes_Pub.qtev_tbl_type;
5877: x_term_tbl Okl_Trx_Quotes_Pub.qtev_tbl_type;
5870:
5871: l_top_fee_ln_id OKL_K_LINES.ID%TYPE;
5872: l_top_fee_ln_name OKC_K_LINES_V.NAME%TYPE;
5873: l_sub_fee_ln_id OKL_K_LINES.ID%TYPE;
5874: l_qte_id OKL_K_LINES.QTE_ID%TYPE;
5875: l_qte_num OKL_TRX_QUOTES_V.QUOTE_NUMBER%TYPE;
5876: p_term_tbl Okl_Trx_Quotes_Pub.qtev_tbl_type;
5877: x_term_tbl Okl_Trx_Quotes_Pub.qtev_tbl_type;
5878: x_err_msg VARCHAR2(1000);
6232: -- after the Calculate Upfront Tax process
6233: CURSOR l_fn_top_fee_ln_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE ) IS
6234: SELECT kle.id, kle.amount, cleb.name
6235: FROM okc_k_lines_v cleb,
6236: okl_k_lines kle,
6237: okc_statuses_b okcsts
6238: WHERE cleb.dnz_chr_id = chrID
6239: AND cleb.chr_id = chrID
6240: AND kle.ID = cleb.ID
6247: /* Cursor to get the financed fee sub-lines (applied to assets) for a
6248: given contract. */
6249:
6250: CURSOR l_fn_sub_ln_fee_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
6251: feeTopLine IN OKL_K_LINES.ID%TYPE) IS
6252: SELECT kle.id, kle.amount, cleb.end_date
6253: ,cleb.start_date -- added for bug 5115701
6254: FROM okc_k_lines_b cleb,
6255: okl_k_lines kle,
6251: feeTopLine IN OKL_K_LINES.ID%TYPE) IS
6252: SELECT kle.id, kle.amount, cleb.end_date
6253: ,cleb.start_date -- added for bug 5115701
6254: FROM okc_k_lines_b cleb,
6255: okl_k_lines kle,
6256: okc_statuses_b okcsts
6257: WHERE cleb.dnz_chr_id = chrID
6258: AND kle.ID = cleb.ID
6259: AND cleb.CLE_ID = feeTopLine
6265: /* Cursor to get the financed fee top/sub-line payments for a
6266: given contract. */
6267:
6268: CURSOR l_fn_fee_pmt_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
6269: feeLine IN OKL_K_LINES.ID%TYPE) IS
6270:
6271: SELECT Fnd_Date.canonical_to_date(sll.rule_information2) start_date, -- formated for bug 5115701,
6272: SLL.rule_information3 periods,
6273: DECODE(sll.object1_id1, 'M', 1, 'Q', 3, 'S', 6, 'A', 12) mpp,
6294: /* Cursor to get the financed fee top/sub-line payments HEADER for a
6295: given contract. */
6296:
6297: CURSOR l_fn_fee_pmtH_csr ( chrID IN OKC_K_HEADERS_B.ID%TYPE,
6298: feeLine IN OKL_K_LINES.ID%TYPE) IS
6299:
6300: SELECT slh.id
6301: FROM okc_rules_b slh,
6302: okc_rule_groups_b rgp,
6310: AND slh.object1_id1 = TO_CHAR(sty.id)
6311: AND styt.LANGUAGE = USERENV('LANG')
6312: AND sty.id = styt.id;
6313:
6314: l_top_fee_ln_id OKL_K_LINES.ID%TYPE;
6315: l_top_fee_ln_name OKC_K_LINES_V.NAME%TYPE;
6316: l_sub_fee_ln_id OKL_K_LINES.ID%TYPE;
6317: x_err_msg VARCHAR2(1000);
6318:
6312: AND sty.id = styt.id;
6313:
6314: l_top_fee_ln_id OKL_K_LINES.ID%TYPE;
6315: l_top_fee_ln_name OKC_K_LINES_V.NAME%TYPE;
6316: l_sub_fee_ln_id OKL_K_LINES.ID%TYPE;
6317: x_err_msg VARCHAR2(1000);
6318:
6319: l_fn_sub_ln_fee_cnt NUMBER := 0;
6320: l_pmt_dup_sub_ln_cnt NUMBER := 0; -- Counter for duplicate payments for a sub-line.
6542:
6543: CURSOR l_k_std_csr ( chrID OKC_K_HEADERS_B.ID%TYPE ) IS
6544: SELECT 1
6545: FROM okc_k_lines_b cleb,
6546: okl_k_lines kle,
6547: okc_k_headers_b khr
6548: WHERE khr.id = chrID
6549: AND cleb.dnz_chr_id = khr.id
6550: AND kle.ID = cleb.ID
6632: SELECT ls.lty_code,
6633: ls.name line_type,
6634: kle.id,
6635: kle.name
6636: FROM OKL_K_LINES_FULL_V kle,
6637: OKC_LINE_STYLES_V ls,
6638: OKC_STATUSES_B sts
6639: WHERE kle.lse_id = ls.id
6640: AND ls.lty_code IN ('FREE_FORM1', 'FEE', 'SOLD_SERVICE')
7002: AND okcsts.ste_code IN ('EXPIRED','HOLD','CANCELLED','TERMINATED', 'ABANDONED'));
7003:
7004: CURSOR get_line_amt (p_id IN NUMBER) IS
7005: SELECT nvl(capital_amount,0) capital_amount, kle.name name
7006: FROM okl_k_lines_full_v kle
7007: WHERE kle.id = p_id;
7008:
7009: CURSOR get_payment_line_amt (p_rgp_id IN NUMBER, p_chr_id IN NUMBER) IS
7010: select nvl(sum(tot_amt),0)
7034: );
7035:
7036: l_cle_id NUMBER;
7037: l_chr_id NUMBER;
7038: l_capital_amount okl_k_lines.capital_amount%type;
7039: l_ast_name okl_k_lines_full_v.name%type := null;
7040: l_payment_amount okl_k_lines.capital_amount%type;
7041: l_deal_type_yn varchar2(1) := 'N';
7042: BEGIN
7035:
7036: l_cle_id NUMBER;
7037: l_chr_id NUMBER;
7038: l_capital_amount okl_k_lines.capital_amount%type;
7039: l_ast_name okl_k_lines_full_v.name%type := null;
7040: l_payment_amount okl_k_lines.capital_amount%type;
7041: l_deal_type_yn varchar2(1) := 'N';
7042: BEGIN
7043: -- initialize return status
7036: l_cle_id NUMBER;
7037: l_chr_id NUMBER;
7038: l_capital_amount okl_k_lines.capital_amount%type;
7039: l_ast_name okl_k_lines_full_v.name%type := null;
7040: l_payment_amount okl_k_lines.capital_amount%type;
7041: l_deal_type_yn varchar2(1) := 'N';
7042: BEGIN
7043: -- initialize return status
7044: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
7394: kle.oec
7395: -- Bug 6417667 End
7396: --down_payment_yes_no
7397: FROM
7398: okl_k_lines kle,
7399: okc_k_lines_v cle,
7400: okc_line_styles_b sty,
7401: okc_statuses_b sts
7402: WHERE cle.id = kle.id
7704: p_lty_code OKC_LINE_STYLES_V.LTY_CODE%TYPE) IS
7705: SELECT line.id,
7706: line.line_number,
7707: line.amount
7708: FROM okl_k_lines_full_v line,
7709: okc_line_styles_v style,
7710: okc_statuses_b sts
7711: WHERE line.lse_id = style.id
7712: AND style.lty_code = p_lty_code
7715: AND line.dnz_chr_id = p_chr_id;
7716:
7717: CURSOR sub_line_amt_csr (p_line_id OKC_K_LINES_B.ID%TYPE) IS
7718: SELECT SUM(NVL(capital_amount,0))
7719: FROM okl_k_lines_full_v line
7720: WHERE line.cle_id = p_line_id;
7721:
7722: CURSOR txd_csr1 (Kleid NUMBER) IS
7723: SELECT
7820: CURSOR l_kle_csr(ltycode VARCHAR2, chrid OKL_K_HEADERS.KHR_ID%TYPE) IS
7821: SELECT NVL(kle.name,kle.item_description) name,
7822: kle.id,
7823: ls.name line_style
7824: FROM OKL_K_LINES_FULL_V kle,
7825: OKC_LINE_STYLES_v ls,
7826: OKC_STATUSES_B sts
7827: WHERE kle.lse_id = ls.id
7828: AND ls.lty_code = ltycode
7839: l_oec number;
7840:
7841: -- Bug 5216135 : kbbhavsa : 29-May-06 : start
7842: -- cursor to fecth link line id for top line id
7843: CURSOR l_kle_link_csr(ltycode VARCHAR2, chrid OKL_K_HEADERS.KHR_ID%TYPE, cleid OKL_K_LINES_FULL_V.CLE_ID%TYPE) IS
7844: SELECT kle.id
7845: FROM OKL_K_LINES_FULL_V kle,
7846: OKC_LINE_STYLES_v ls,
7847: OKC_STATUSES_B sts
7841: -- Bug 5216135 : kbbhavsa : 29-May-06 : start
7842: -- cursor to fecth link line id for top line id
7843: CURSOR l_kle_link_csr(ltycode VARCHAR2, chrid OKL_K_HEADERS.KHR_ID%TYPE, cleid OKL_K_LINES_FULL_V.CLE_ID%TYPE) IS
7844: SELECT kle.id
7845: FROM OKL_K_LINES_FULL_V kle,
7846: OKC_LINE_STYLES_v ls,
7847: OKC_STATUSES_B sts
7848: WHERE kle.lse_id = ls.id
7849: AND ls.lty_code = ltycode
7851: AND sts.code = kle.sts_code
7852: AND sts.ste_code NOT IN ( 'HOLD', 'TERMINATED', 'EXPIRED', 'CANCELLED')
7853: and kle.cle_id = cleid;
7854:
7855: l_link_cle_id OKL_K_LINES_FULL_V.ID%TYPE;
7856: -- Bug 5216135 : kbbhavsa : 29-May-06 : End
7857:
7858: CURSOR system_corp_book_csr(p_chr_id NUMBER) IS
7859: SELECT A.ASST_ADD_BOOK_TYPE_CODE,
8956: SELECT cle.id,
8957: name,
8958: kle.residual_value
8959: FROM okc_k_lines_v cle,
8960: okl_k_lines kle,
8961: okc_line_styles_b sty,
8962: okc_statuses_b sts
8963: WHERE cle.lse_id = sty.id
8964: AND cle.dnz_chr_id = p_chr_id
9162:
9163: CURSOR l_inst_csr( chrId NUMBER ) IS
9164: SELECT inst.object_id1_new
9165: FROM OKL_TXL_ITM_INSTS inst,
9166: OKL_K_LINES_FULL_V kle,
9167: OKC_LINE_STYLES_B lse
9168: WHERE inst.kle_id = kle.id
9169: AND lse.id = kle.lse_id
9170: AND lse.lty_code = 'INST_ITEM'
9174:
9175: CURSOR l_shipto_csr( chrId NUMBER ) IS
9176: SELECT inv.shipping_address_id1
9177: FROM OKL_SUPP_INVOICE_DTLS inv,
9178: OKL_K_LINES_FULL_V kle,
9179: OKC_LINE_STYLES_B lse
9180: WHERE inv.cle_id = kle.id
9181: AND lse.id = kle.lse_id
9182: AND lse.lty_code = 'ITEM'
10224: CURSOR con_le_roll_qt_le_csr(p_contract_id IN NUMBER) IS
10225: SELECT 1 FROM
10226: OKC_K_HEADERS_B chr,
10227: OKL_K_HEADERS khr,
10228: OKL_K_LINES kle,
10229: OKC_K_LINES_B cle,
10230: OKL_TRX_QUOTES_B qte,
10231: OKC_LINE_STYLES_B cls
10232: WHERE cle.id = kle.id
10604: SELECT line.id,
10605: NVL(line.capital_amount,0) capital_amount,
10606: line.start_date,
10607: strm.code strm_type
10608: FROM okl_k_lines_full_v line,
10609: okc_k_items item,
10610: okl_strmtyp_source_v strm,
10611: okc_line_styles_v style,
10612: okc_statuses_b sts
10625:
10626: CURSOR fee_subline_csr (p_cle_id OKC_K_LINES_V.ID%TYPE) IS
10627: SELECT id,
10628: NVL(capital_amount,0) capital_amount
10629: FROM okl_k_lines_full_v line,
10630: okc_statuses_b sts
10631: WHERE line.cle_id = p_cle_id
10632: AND line.sts_code = sts.code
10633: --Bug# 4959361: Include Terminated lines when fetching sub-line amount
10855: kle.residual_code,
10856: kle.residual_grnty_amount,
10857: kle.start_date,
10858: kle.end_date
10859: FROM OKL_K_LINES_FULL_V kle,
10860: OKC_LINE_STYLES_B ls,
10861: OKC_STATUSES_B sts
10862: WHERE kle.lse_id = ls.id
10863: AND ls.lty_code = ltycode
11014:
11015: CURSOR asset_line_csr (p_chr_id OKC_K_HEADERS_V.ID%TYPE) IS
11016: SELECT line.id,
11017: line.name
11018: FROM okl_k_lines_full_v line,
11019: okc_line_styles_v style,
11020: okc_statuses_b sts
11021: WHERE line. dnz_chr_id = p_chr_id
11022: AND line.lse_id = style.id
11130: cleb.id subsidy_cle_id,
11131: cleb_asst.start_date asset_start_date,
11132: kle.amount,
11133: kle.subsidy_override_amount
11134: FROM okl_k_lines kle,
11135: okc_k_lines_tl clet,
11136: okc_k_lines_b cleb,
11137: okc_line_styles_b lseb,
11138: okc_k_lines_tl clet_asst,
11179: lx_subsidy_pool_id okl_subsidy_pools_b.id%TYPE;
11180: lx_sub_pool_curr_code okl_subsidy_pools_b.currency_code%TYPE;
11181: lx_pool_status okl_subsidy_pools_b.decision_status_code%TYPE;
11182: lx_pool_balance okl_subsidy_pools_b.total_subsidy_amount%TYPE;
11183: lv_subsidy_amount okl_k_lines.subsidy_override_amount%TYPE;
11184: -- sjalasut, added local variables to support logging
11185: l_module CONSTANT fnd_log_messages.MODULE%TYPE := 'okl.plsql.OKL_QA_DATA_INTEGRITY.CHECK_SUBSIDIES_ERRORS';
11186: l_debug_enabled VARCHAR2(10);
11187: is_debug_statement_on BOOLEAN;
11815:
11816: CURSOR l_financed_csr (p_chr_id NUMBER) IS
11817: SELECT cle.id,
11818: style.name line_type
11819: FROM okl_k_lines kle,
11820: okc_k_lines_b cle,
11821: okc_line_styles_v style
11822: WHERE cle.dnz_chr_id = p_chr_id
11823: AND cle.id = kle.id