65: IS
66:
67: CURSOR l_line_cur IS
68: SELECT contract.currency_code
69: FROM okc_k_headers_b contract, okc_k_lines_b line
70: WHERE contract.id = line.dnz_chr_id and line.id = p_cle_id;
71:
72: CURSOR l_hdr_cur IS
73: SELECT contract.currency_code
70: WHERE contract.id = line.dnz_chr_id and line.id = p_cle_id;
71:
72: CURSOR l_hdr_cur IS
73: SELECT contract.currency_code
74: FROM okc_k_headers_b contract
75: WHERE contract.id = p_chr_id;
76:
77:
78: l_Currency VARCHAR2(15);