[Home] [Help]
3797: CHR.scs_code -- rmunjulu 4622198
3798: ,
3799: CHR.org_id --akrangan added for sla ae uptake
3800: FROM okl_k_headers_v khr,
3801: okc_k_headers_b CHR -- rmunjulu 4622198
3802: WHERE khr.ID = p_khr_id AND khr.ID = CHR.ID; -- rmunjulu 4622198
3803:
3804: -- Get the product type
3805: CURSOR l_product_type_csr (
3864: -- rmunjulu EDAT
3865: l_quote_accpt_date DATE;
3866: l_quote_eff_date DATE;
3867: -- rmunjulu 4622198
3868: l_scs_code okc_k_headers_b.scs_code%TYPE;
3869: l_fact_synd_code fnd_lookups.lookup_code%TYPE;
3870: l_inv_acct_code okc_rules_b.rule_information1%TYPE;
3871:
3872: --akrangan Bug 5514059 start
3872: --akrangan Bug 5514059 start
3873: -- Used to get Assets selected for termination and
3874: -- Fee and Sold Service lines associated to the assets
3875: CURSOR k_asst_fee_srvc_lns_csr (
3876: p_chr_id IN okc_k_headers_b.ID%TYPE,
3877: p_qte_id IN okc_k_lines_b.ID%TYPE
3878: )
3879: IS
3880: SELECT cle.ID cle_id
3888: FROM okc_k_lines_b cle,
3889: okc_k_lines_b hdrcle,
3890: okc_k_items cim,
3891: okl_txl_quote_lines_b tql,
3892: okc_k_headers_b CHR,
3893: okc_line_styles_b lse
3894: WHERE hdrcle.chr_id = p_chr_id
3895: AND cle.cle_id = hdrcle.ID
3896: AND cim.dnz_chr_id = cle.dnz_chr_id
5144: is_debug_statement_on BOOLEAN
5145: := okl_debug_pub.check_log_on (l_module_name, g_level_statement);
5146: --SECHAWLA Bug # 2726739 : new declarations
5147: l_func_curr_code gl_ledgers_public_v.currency_code%TYPE;
5148: l_contract_curr_code okc_k_headers_b.currency_code%TYPE;
5149: -- RMUNJULU 06-MAR-03 Performance Fix Replaced K_HDR_FULL
5150: lx_contract_currency okc_k_headers_v.currency_code%TYPE;
5151: lx_currency_conversion_type okl_k_headers_v.currency_conversion_type%TYPE;
5152: lx_currency_conversion_rate okl_k_headers_v.currency_conversion_rate%TYPE;
11192: -- RMUNJULU Bug # 2484327 changed parameters to IN
11193: -- We need to change the status of Fee, Sold Service and Usage
11194: -- Based Billing lines
11195: CURSOR l_get_sls_csr (
11196: p_chr_id IN okc_k_headers_b.ID%TYPE,
11197: p_sts_code IN okc_k_headers_b.sts_code%TYPE,
11198: p_cle_id IN okc_k_lines_b.ID%TYPE
11199: )
11200: IS
11193: -- We need to change the status of Fee, Sold Service and Usage
11194: -- Based Billing lines
11195: CURSOR l_get_sls_csr (
11196: p_chr_id IN okc_k_headers_b.ID%TYPE,
11197: p_sts_code IN okc_k_headers_b.sts_code%TYPE,
11198: p_cle_id IN okc_k_lines_b.ID%TYPE
11199: )
11200: IS
11201: SELECT cim.cle_id cle_id
11228: -- We need to find out weahter we have fee, service, and Usage lines first
11229: -- so that we can Pro- rate and Sum up the Capital amount
11230: --and amount to the Top Lines after excluding Terminated Lines
11231: CURSOR l_chk_other_line_csr (
11232: p_chr_id IN okc_k_headers_b.ID%TYPE
11233: )
11234: IS
11235: SELECT '1'
11236: FROM DUAL
11253: -- We need to get the summed up amount for Sub lines of Fee and
11254: -- Sold Service Lines Excluding the terminated Lines
11255: CURSOR l_new_sls_amt_csr (
11256: p_chr_id IN okc_k_lines_v.dnz_chr_id%TYPE,
11257: p_sts_code IN okc_k_headers_b.sts_code%TYPE
11258: )
11259: IS
11260: SELECT SUM (kle.capital_amount) amount,
11261: cle.cle_id cle_id
11293: -- We need to get the Payment Info for Fee and Sold Service lines
11294: CURSOR l_sls_rule_pymnt_csr (
11295: p_chr_id IN okc_k_lines_v.dnz_chr_id%TYPE,
11296: p_cle_id IN okc_k_lines_v.ID%TYPE,
11297: p_sts_code IN okc_k_headers_b.sts_code%TYPE
11298: )
11299: IS
11300: SELECT rl.ID ID,
11301: rl.rule_information6 payment_amount
11344: ln_sls_payment_amount NUMBER := 0;
11345: ln_new_amount NUMBER := 0;
11346: ln_old_amount NUMBER := 0;
11347: ln_cle_id NUMBER := 0;
11348: l_chr_id okc_k_headers_b.ID%TYPE
11349: := p_term_rec.p_contract_id;
11350: l_akle_tbl klev_tbl_type := p_klev_tbl;
11351: l_clev_rec okl_okc_migration_pvt.clev_rec_type;
11352: l_klev_rec okl_contract_pub.klev_rec_type;