[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;
11191: -- RMUNJULU Bug # 2484327 changed parameters to IN
11192: -- We need to change the status of Fee, Sold Service and Usage
11193: -- Based Billing lines
11194: CURSOR l_get_sls_csr (
11195: p_chr_id IN okc_k_headers_b.ID%TYPE,
11196: p_sts_code IN okc_k_headers_b.sts_code%TYPE,
11197: p_cle_id IN okc_k_lines_b.ID%TYPE
11198: )
11199: IS
11192: -- We need to change the status of Fee, Sold Service and Usage
11193: -- Based Billing lines
11194: CURSOR l_get_sls_csr (
11195: p_chr_id IN okc_k_headers_b.ID%TYPE,
11196: p_sts_code IN okc_k_headers_b.sts_code%TYPE,
11197: p_cle_id IN okc_k_lines_b.ID%TYPE
11198: )
11199: IS
11200: SELECT cim.cle_id cle_id
11227: -- We need to find out weahter we have fee, service, and Usage lines first
11228: -- so that we can Pro- rate and Sum up the Capital amount
11229: --and amount to the Top Lines after excluding Terminated Lines
11230: CURSOR l_chk_other_line_csr (
11231: p_chr_id IN okc_k_headers_b.ID%TYPE
11232: )
11233: IS
11234: SELECT '1'
11235: FROM DUAL
11252: -- We need to get the summed up amount for Sub lines of Fee and
11253: -- Sold Service Lines Excluding the terminated Lines
11254: CURSOR l_new_sls_amt_csr (
11255: p_chr_id IN okc_k_lines_v.dnz_chr_id%TYPE,
11256: p_sts_code IN okc_k_headers_b.sts_code%TYPE
11257: )
11258: IS
11259: SELECT SUM (kle.capital_amount) amount,
11260: cle.cle_id cle_id
11292: -- We need to get the Payment Info for Fee and Sold Service lines
11293: CURSOR l_sls_rule_pymnt_csr (
11294: p_chr_id IN okc_k_lines_v.dnz_chr_id%TYPE,
11295: p_cle_id IN okc_k_lines_v.ID%TYPE,
11296: p_sts_code IN okc_k_headers_b.sts_code%TYPE
11297: )
11298: IS
11299: SELECT rl.ID ID,
11300: rl.rule_information6 payment_amount
11343: ln_sls_payment_amount NUMBER := 0;
11344: ln_new_amount NUMBER := 0;
11345: ln_old_amount NUMBER := 0;
11346: ln_cle_id NUMBER := 0;
11347: l_chr_id okc_k_headers_b.ID%TYPE
11348: := p_term_rec.p_contract_id;
11349: l_akle_tbl klev_tbl_type := p_klev_tbl;
11350: l_clev_rec okl_okc_migration_pvt.clev_rec_type;
11351: l_klev_rec okl_contract_pub.klev_rec_type;