[Home] [Help]
147:
148: -- Get contract org_id
149: CURSOR l_chr_csr (cp_chr_id NUMBER) IS
150: SELECT h.authoring_org_id
151: FROM okc_k_headers_b h
152: WHERE h.id = cp_chr_id;
153:
154: l_result okc_k_headers_b.authoring_org_id%TYPE;
155:
150: SELECT h.authoring_org_id
151: FROM okc_k_headers_b h
152: WHERE h.id = cp_chr_id;
153:
154: l_result okc_k_headers_b.authoring_org_id%TYPE;
155:
156: BEGIN
157:
158: OPEN l_chr_csr (p_chr_id);
185:
186: -- Get contract org_id
187: CURSOR l_chr_csr (cp_chr_id NUMBER) IS
188: SELECT h.currency_code
189: FROM okc_k_headers_b h
190: WHERE h.id = cp_chr_id;
191:
192: l_result okc_k_headers_b.currency_code%TYPE;
193:
188: SELECT h.currency_code
189: FROM okc_k_headers_b h
190: WHERE h.id = cp_chr_id;
191:
192: l_result okc_k_headers_b.currency_code%TYPE;
193:
194: BEGIN
195:
196: OPEN l_chr_csr (p_chr_id);
991: l_no_rule_data EXCEPTION;
992:
993: --gboomina Bug 4734134 - Added - to get SCS_CODE - Start
994: l_msg_name VARCHAR2(30);
995: l_scs_code okc_k_headers_b.scs_code%type;
996: -- cursor to get scs_code
997: CURSOR scs_code_csr IS
998: SELECT scs_code
999: FROM okc_k_headers_b
995: l_scs_code okc_k_headers_b.scs_code%type;
996: -- cursor to get scs_code
997: CURSOR scs_code_csr IS
998: SELECT scs_code
999: FROM okc_k_headers_b
1000: WHERE id = p_chr_id;
1001: --gboomina Bug 4734134 - End
1002: BEGIN
1003:
1173: CPL.ROLE party_role,
1174: CPL.jtot_object1_code jtot_object1_code,
1175: CPL.object1_id1 object1_id1,
1176: CPL.object1_id2 object1_id2
1177: FROM OKC_K_HEADERS_B CHR,
1178: OKC_K_PARTY_ROLES_V CPL
1179: WHERE CHR.id = p_chr_id
1180: AND CHR.id = CPL.chr_id
1181: AND CPL.rle_code = 'LESSEE';
1312: -- End of comments
1313:
1314: PROCEDURE get_formula_value (
1315: p_formula_name IN OKL_FORMULAE_B.name%TYPE,
1316: p_chr_id IN OKC_K_HEADERS_B.id%TYPE,
1317: p_cle_id IN OKL_K_LINES.id%TYPE,
1318: p_additional_parameters IN
1319: okl_execute_formula_pub.ctxt_val_tbl_type,
1320: x_formula_value OUT NOCOPY NUMBER,
1895: SELECT kpr.jtot_object1_code,
1896: kpr.object1_id1,
1897: kpr.object1_id2
1898: FROM okl_k_headers khr,
1899: okc_k_headers_b par,
1900: okc_k_party_roles_b kpr
1901: WHERE khr.id = cp_chr_id
1902: AND par.id = khr.khr_id
1903: AND par.scs_code = 'PROGRAM'
3800:
3801: -- This cursor is used to get the deal type for a contract.
3802: CURSOR l_oklheaders_csr(p_khr_id IN NUMBER) IS
3803: SELECT chr.sts_code,khr.deal_type
3804: FROM okl_k_headers khr, okc_k_headers_b chr
3805: WHERE khr.id = p_khr_id
3806: AND KHR.ID = CHR.ID;
3807:
3808: -- SECHAWLA 09-AUG-05 4304230 : new declaraions end
3960: -- exception section to close the cursor if open.
3961: -- End of Commnets
3962:
3963: FUNCTION get_party_name(
3964: p_chr_id IN OKC_K_HEADERS_B.ID%TYPE,
3965: p_rle_code IN OKC_K_PARTY_ROLES_B.RLE_CODE%TYPE,
3966: p_kle_id IN OKL_K_HEADERS.ID%TYPE)
3967: RETURN VARCHAR2 IS
3968: lv_object1_id1 OKC_K_PARTY_ROLES_B.OBJECT1_ID1%TYPE;
3971: lv_name VARCHAR2(2000) := NULL;
3972: excp_party_error EXCEPTION;
3973:
3974: -- Get the Party role details
3975: CURSOR c_party_csr(p_chr_id OKC_K_HEADERS_B.ID%TYPE,
3976: p_kle_id OKL_K_LINES.ID%TYPE,
3977: p_rle_code OKC_K_PARTY_ROLES_B.RLE_CODE%TYPE)
3978: IS
3979: SELECT object1_id1,
4055: QTE.consolidated_yn consolidated_yn,
4056: QTE.qst_code qst_code,
4057: QTE.qtp_code qtp_code
4058: FROM OKL_TRX_QUOTES_B QTE,
4059: OKC_K_HEADERS_B KHR
4060: WHERE qte.khr_id = khr.id
4061: AND qte.khr_id = p_khr_id
4062: AND QTE.qtp_code LIKE 'TER%';
4063:
5132: -- Description : Get Net Book value per unit from FA for a particular asset
5133: -- End of comments
5134:
5135: FUNCTION get_fa_nbv (
5136: p_chr_id IN OKC_K_HEADERS_B.ID%TYPE
5137: ,p_asset_id IN NUMBER
5138: ) RETURN NUMBER IS
5139:
5140: CURSOR get_rel_date(p_khr_id IN NUMBER) IS
5138: ) RETURN NUMBER IS
5139:
5140: CURSOR get_rel_date(p_khr_id IN NUMBER) IS
5141: SELECT start_date
5142: FROM okc_k_headers_b
5143: WHERE id = p_khr_id;
5144:
5145: CURSOR get_book_type_code(p_ast_id IN NUMBER) IS
5146: SELECT fbc.book_type_code