849: p_cplv_rec IN CPLV_REC_TYPE) is
850: l_dummy_var varchar2(1) := '?';
851: cursor l_chr_csr is
852: select 'x'
853: from OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
854: where id = p_cplv_rec.chr_id;
855: begin
856:
857: IF (l_debug = 'Y') THEN
917:
918: cursor chr_csr is
919: select '!'
920: from
921: OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
922: ,okc_subclass_roles
923: where
924: okc_k_headers_all_b.id = p_cplv_rec.chr_id
925: and okc_subclass_roles.scs_code = okc_k_headers_all_b.scs_code
920: from
921: OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
922: ,okc_subclass_roles
923: where
924: okc_k_headers_all_b.id = p_cplv_rec.chr_id
925: and okc_subclass_roles.scs_code = okc_k_headers_all_b.scs_code
926: and okc_subclass_roles.rle_code = p_cplv_rec.rle_code
927: and sysdate between okc_subclass_roles.start_date
928: and NVL(okc_subclass_roles.end_date,sysdate)
921: OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
922: ,okc_subclass_roles
923: where
924: okc_k_headers_all_b.id = p_cplv_rec.chr_id
925: and okc_subclass_roles.scs_code = okc_k_headers_all_b.scs_code
926: and okc_subclass_roles.rle_code = p_cplv_rec.rle_code
927: and sysdate between okc_subclass_roles.start_date
928: and NVL(okc_subclass_roles.end_date,sysdate)
929: ;
939: and okc_line_style_roles.SRE_ID in
940: (
941: select okc_subclass_roles.ID
942: from
943: OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
944: ,okc_subclass_roles
945: where
946: okc_k_headers_all_b.id = p_cplv_rec.dnz_chr_id
947: and okc_subclass_roles.scs_code = okc_k_headers_all_b.scs_code
942: from
943: OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
944: ,okc_subclass_roles
945: where
946: okc_k_headers_all_b.id = p_cplv_rec.dnz_chr_id
947: and okc_subclass_roles.scs_code = okc_k_headers_all_b.scs_code
948: and okc_subclass_roles.rle_code = p_cplv_rec.rle_code
949: and sysdate between okc_subclass_roles.start_date
950: and NVL(okc_subclass_roles.end_date,sysdate)
943: OKC_K_HEADERS_ALL_B -- Modified by jvorugan for Bug:4645341 OKC_K_HEADERS_B
944: ,okc_subclass_roles
945: where
946: okc_k_headers_all_b.id = p_cplv_rec.dnz_chr_id
947: and okc_subclass_roles.scs_code = okc_k_headers_all_b.scs_code
948: and okc_subclass_roles.rle_code = p_cplv_rec.rle_code
949: and sysdate between okc_subclass_roles.start_date
950: and NVL(okc_subclass_roles.end_date,sysdate)
951: )
1174: cursor l_object1_csr is
1175: select '!'
1176: from
1177: okc_role_sources RS
1178: ,OKC_K_HEADERS_ALL_B KH -- Modified by jvorugan for Bug:4645341 okc_k_headers_b KH
1179: where
1180: RS.rle_code = p_cplv_rec.rle_code
1181: and RS.jtot_object_code = p_cplv_rec.jtot_object1_code
1182: and sysdate >= RS.start_date
1386: p_cplv_rec IN CPLV_REC_TYPE) is
1387: l_dummy varchar2(1) := '?';
1388: cursor Kt_Hr_Mj_Vr is
1389: select '!'
1390: from okc_k_headers_all_b -- Modified by Jvorugan for Bug:4645341 okc_k_headers_b
1391: where id = p_cplv_rec.dnz_chr_id;
1392: begin
1393:
1394: IF (l_debug = 'Y') THEN
1717: l_access_level varchar2(1);
1718:
1719: cursor c_buy_or_sell is
1720: select buy_or_sell
1721: from okc_k_headers_all_b -- Modified by Jvorugan for Bug:4645341 okc_k_headers_b
1722: where id = p_cplv_rec.dnz_chr_id;
1723:
1724: cursor c_access_level(p_intent varchar2) is
1725: select access_level
2280:
2281: /*changes made for bug6911126*/
2282: SELECT application_id
2283: INTO l_application_id
2284: FROM OKC_K_HEADERS_ALL_B
2285: WHERE id = x_cpl_rec.dnz_chr_id;
2286:
2287: IF l_application_id = 540 THEN
2288: IF x_cpl_rec.orig_system_id1 = OKC_API.G_MISS_NUM THEN