1929: ) IS
1930: l_api_name CONSTANT VARCHAR2 (30)
1931: := 'call_pricing_api';
1932: -- Bug 5139658
1933: l_orig_system_id1 okc_k_headers_all_b.orig_system_id1%type;
1934: l_org_id okc_k_headers_all_b.org_id%type;
1935:
1936: CURSOR get_orig_system_id1 (
1937: p_chr_id NUMBER
1930: l_api_name CONSTANT VARCHAR2 (30)
1931: := 'call_pricing_api';
1932: -- Bug 5139658
1933: l_orig_system_id1 okc_k_headers_all_b.orig_system_id1%type;
1934: l_org_id okc_k_headers_all_b.org_id%type;
1935:
1936: CURSOR get_orig_system_id1 (
1937: p_chr_id NUMBER
1938: ) IS
1936: CURSOR get_orig_system_id1 (
1937: p_chr_id NUMBER
1938: ) IS
1939: SELECT orig_system_id1
1940: FROM okc_k_headers_all_b
1941: WHERE ID = p_chr_id;
1942:
1943:
1944: CURSOR get_org_id_csr (
1944: CURSOR get_org_id_csr (
1945: p_hdr_id NUMBER
1946: ) IS
1947: SELECT org_id
1948: FROM okc_k_headers_all_b
1949: WHERE ID = p_hdr_id;
1950:
1951: -- End Bug 5139658
1952:
1953: CURSOR l_pricelist_csr (
1954: p_chr_id NUMBER
1955: ) IS
1956: SELECT price_list_id
1957: FROM okc_k_headers_all_b
1958: WHERE ID = p_chr_id;
1959:
1960: -- Bug Fix 4291565
1961: CURSOR l_line_csr IS
2032: CURSOR l_currcode_csr (
2033: p_hdr_id NUMBER
2034: ) IS
2035: SELECT currency_code
2036: FROM okc_k_headers_all_b
2037: WHERE ID = p_hdr_id;
2038:
2039: l_currency VARCHAR2 (15);
2040: l_usage_type VARCHAR2 (10);
2927: p_chr_id NUMBER
2928: ) IS
2929: SELECT currency_code,
2930: price_list_id
2931: FROM okc_k_headers_all_b
2932: WHERE ID = p_chr_id;
2933:
2934: CURSOR l_srv_k_details_csr (
2935: p_chr_id NUMBER