[Home] [Help]
32:
33: -- rmunjulu BUG 5050158
34: CURSOR get_contract_end_date_csr (p_contract_id IN NUMBER ) IS
35: SELECT end_date
36: FROM okc_k_headers_b
37: WHERE id = p_contract_id;
38: -- added for bug 14049528
39: CURSOR get_contract_start_date_csr (p_contract_id IN NUMBER ) IS
40: SELECT start_date
37: WHERE id = p_contract_id;
38: -- added for bug 14049528
39: CURSOR get_contract_start_date_csr (p_contract_id IN NUMBER ) IS
40: SELECT start_date
41: FROM okc_k_headers_b
42: WHERE id = p_contract_id;
43:
44: l_last_int_calc_till_date DATE;
45: l_last_sch_int_calc_date DATE;
560:
561: -- Check if the Financial asset is serviced thru OKS - Will return the OKL Contract
562: CURSOR link_csr (p_kle_id OKC_K_LINES_V.ID%TYPE) IS
563: SELECT KREL.chr_id okl_contract_id
564: FROM OKC_K_HEADERS_B OKS_CHRB,
565: OKC_LINE_STYLES_B OKS_COV_PD_LSE,
566: OKC_K_LINES_B OKS_COV_PD_CLEB,
567: OKC_K_REL_OBJS KREL,
568: OKC_LINE_STYLES_B LNK_SRV_LSE,
711: SELECT COUNT(CLE.id) no_of_contract_assets
712: FROM OKC_K_LINES_B CLE,
713: OKC_LINE_STYLES_B LSE,
714: --OKC_STATUSES_B STS,
715: OKC_K_HEADERS_B CHR
716: WHERE CLE.lse_id = LSE.id
717: AND LSE.lty_code = 'FREE_FORM1'
718: --AND CLE.sts_code = STS.code
719: AND CLE.sts_code = CHR.sts_code
841: CURSOR get_additional_assets_csr (p_khr_id IN NUMBER, p_qte_id IN NUMBER) IS
842: SELECT 1
843: FROM OKC_K_LINES_B CLE,
844: OKC_LINE_STYLES_B LSE,
845: OKC_K_HEADERS_B CHR
846: WHERE CLE.lse_id = LSE.id
847: AND LSE.lty_code = 'FREE_FORM1'
848: AND CLE.sts_code = CHR.sts_code
849: AND CHR.id = CLE.dnz_chr_id
1162: -- RMUNJULU 05-JAN-04 new cursor to get the contract status
1163: -- Get the sts_code for the contract
1164: CURSOR get_k_sts_csr (p_chr_id IN NUMBER) IS
1165: SELECT CHR.sts_code
1166: FROM OKC_K_HEADERS_B CHR
1167: WHERE CHR.id = p_chr_id;
1168:
1169: -- RMUNJULU 05-JAN-04 Added variable
1170: l_sts_code OKC_K_HEADERS_B.sts_code%TYPE;
1166: FROM OKC_K_HEADERS_B CHR
1167: WHERE CHR.id = p_chr_id;
1168:
1169: -- RMUNJULU 05-JAN-04 Added variable
1170: l_sts_code OKC_K_HEADERS_B.sts_code%TYPE;
1171:
1172: BEGIN
1173: IF (is_debug_procedure_on) THEN
1174: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,l_module_name ,'Begin(+)');
1821: -- sure that the contract has a logical post
1822: -- booking status.
1823: CURSOR k_contractstatus_csr IS
1824: SELECT khr.contract_number, sts.ste_code, sts.meaning
1825: FROM okc_k_headers_b khr, okc_statuses_v sts
1826: WHERE khr.sts_code = sts.code
1827: AND khr.id = p_contract_id;
1828:
1829: -- Cursor to check if contract locked
2530: SELECT id,
2531: object_version_number,
2532: sts_code,
2533: scs_code
2534: FROM OKC_K_HEADERS_B
2535: WHERE id = p_term_rec.p_contract_id;
2536:
2537: -- Get the K deal_type
2538: -- RMUNJULU 06-MAR-03 Performance Fix Replaced K_HDR_FULL
3543:
3544: -- get contract_end_date
3545: cursor c_contract_eff_to(c_contract_id number) is
3546: select end_date
3547: from okc_k_headers_b
3548: where id = c_contract_id;
3549:
3550: --**SMODUGA added for currency conversion info
3551: -- get currency conversion info
3626:
3627: -- rmunjulu 4622198
3628: CURSOR khr_dtls_csr ( p_khr_id NUMBER ) IS
3629: SELECT chr.scs_code
3630: FROM okc_k_headers_b chr
3631: WHERE chr.id = p_khr_id;
3632:
3633: -- rmunjulu 4622198
3634: l_scs_code OKC_K_HEADERS_B.scs_code%TYPE;
3630: FROM okc_k_headers_b chr
3631: WHERE chr.id = p_khr_id;
3632:
3633: -- rmunjulu 4622198
3634: l_scs_code OKC_K_HEADERS_B.scs_code%TYPE;
3635: l_fact_synd_code FND_LOOKUPS.lookup_code%TYPE;
3636: l_inv_acct_code OKC_RULES_B.rule_information1%TYPE;
3637: --akrangan Bug 5526955 fix start
3638: CURSOR check_accrual_previous_csr IS
5515: l_quote_accpt_date DATE;
5516: l_quote_eff_date DATE;
5517: l_sty_id NUMBER;
5518: l_bpd_acc_rec OKL_ACC_CALL_PUB.bpd_acc_rec_type;
5519: l_currency_code OKC_K_HEADERS_B.currency_code%TYPE;
5520: l_loan_refund_amount NUMBER;
5521: l_functional_currency_code VARCHAR2(15);
5522: l_contract_currency_code VARCHAR2(15);
5523: l_currency_conversion_type VARCHAR2(30);