815:
816: -- This cursor is used for the following purpose
817: -- For every record in okl_ext_sell_invs_b, okl_xtl_sell_invs_b check if
818: -- corresponding records exist in okl_cnsld_ar_hdrs_b, okl_cnsld_ar_lines_b,
819: -- okl_cnsld_ar_Strms_b tables.
820:
821: CURSOR ext_cnsld_check_csr IS
822: SELECT DISTINCT OKC_K_HEADERS_B.CONTRACT_NUMBER
823: FROM OKL_XTL_SELL_INVS_B
835: AND OKL_TXL_AR_INV_LNS_B.TAI_ID = OKL_TRX_AR_INVOICES_B.ID
836: AND OKL_TRX_AR_INVOICES_B.KHR_ID = OKC_K_HEADERS_B.id;
837:
838: -- This cursor is used for the following purpose
839: -- For every record in okl_cnsld_hdrs_b, okl_cnsld_ar_lines_b, okl_cnsld_ar_strms_b check
840: -- if corresponding records exist in AR.
841: CURSOR cnsld_ar_check_csr IS
842: SELECT DISTINCT OKC_K_HEADERS_B.CONTRACT_NUMBER
843: FROM OKL_CNSLD_AR_STRMS_B
839: -- For every record in okl_cnsld_hdrs_b, okl_cnsld_ar_lines_b, okl_cnsld_ar_strms_b check
840: -- if corresponding records exist in AR.
841: CURSOR cnsld_ar_check_csr IS
842: SELECT DISTINCT OKC_K_HEADERS_B.CONTRACT_NUMBER
843: FROM OKL_CNSLD_AR_STRMS_B
844: , OKL_CNSLD_AR_LINES_B
845: , OKL_CNSLD_AR_HDRS_B
846: , OKL_K_HEADERS
847: , OKC_K_HEADERS_B
845: , OKL_CNSLD_AR_HDRS_B
846: , OKL_K_HEADERS
847: , OKC_K_HEADERS_B
848: WHERE OKL_CNSLD_AR_LINES_B.CNR_ID = OKL_CNSLD_AR_HDRS_B.ID
849: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
850: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
851: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
852: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
853: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NULL;
847: , OKC_K_HEADERS_B
848: WHERE OKL_CNSLD_AR_LINES_B.CNR_ID = OKL_CNSLD_AR_HDRS_B.ID
849: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
850: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
851: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
852: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
853: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NULL;
854:
855: -- This cursor is used for the following purpose
848: WHERE OKL_CNSLD_AR_LINES_B.CNR_ID = OKL_CNSLD_AR_HDRS_B.ID
849: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
850: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
851: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
852: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
853: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NULL;
854:
855: -- This cursor is used for the following purpose
856: -- For every record in okl_cnsld_ar_strms_b check if receivable_invoice_id is a positive number.
849: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
850: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
851: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
852: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
853: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NULL;
854:
855: -- This cursor is used for the following purpose
856: -- For every record in okl_cnsld_ar_strms_b check if receivable_invoice_id is a positive number.
857: CURSOR cnsld_pstv_check_csr IS
852: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
853: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NULL;
854:
855: -- This cursor is used for the following purpose
856: -- For every record in okl_cnsld_ar_strms_b check if receivable_invoice_id is a positive number.
857: CURSOR cnsld_pstv_check_csr IS
858: SELECT DISTINCT OKC_K_HEADERS_B.CONTRACT_NUMBER
859: FROM OKL_CNSLD_AR_STRMS_B
860: , OKL_CNSLD_AR_LINES_B
855: -- This cursor is used for the following purpose
856: -- For every record in okl_cnsld_ar_strms_b check if receivable_invoice_id is a positive number.
857: CURSOR cnsld_pstv_check_csr IS
858: SELECT DISTINCT OKC_K_HEADERS_B.CONTRACT_NUMBER
859: FROM OKL_CNSLD_AR_STRMS_B
860: , OKL_CNSLD_AR_LINES_B
861: , OKL_CNSLD_AR_HDRS_B
862: , OKL_K_HEADERS
863: , OKC_K_HEADERS_B
861: , OKL_CNSLD_AR_HDRS_B
862: , OKL_K_HEADERS
863: , OKC_K_HEADERS_B
864: WHERE OKL_CNSLD_AR_LINES_B.CNR_ID = OKL_CNSLD_AR_HDRS_B.ID
865: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
866: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
867: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
868: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
869: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID < 0
863: , OKC_K_HEADERS_B
864: WHERE OKL_CNSLD_AR_LINES_B.CNR_ID = OKL_CNSLD_AR_HDRS_B.ID
865: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
866: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
867: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
868: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
869: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID < 0
870: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NOT NULL;
871:
864: WHERE OKL_CNSLD_AR_LINES_B.CNR_ID = OKL_CNSLD_AR_HDRS_B.ID
865: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
866: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
867: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
868: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
869: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID < 0
870: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NOT NULL;
871:
872: BEGIN
865: AND OKL_CNSLD_AR_STRMS_B.LLN_ID = OKL_CNSLD_AR_LINES_B.ID
866: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
867: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
868: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
869: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID < 0
870: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NOT NULL;
871:
872: BEGIN
873:
866: AND OKC_K_HEADERS_B.ID = OKL_K_HEADERS.ID
867: AND OKL_K_HEADERS.ID = OKL_CNSLD_AR_STRMS_B.KHR_ID
868: AND OKL_CNSLD_AR_STRMS_B.KHR_ID = OKL_CNSLD_AR_LINES_B.KHR_ID
869: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID < 0
870: AND OKL_CNSLD_AR_STRMS_B.RECEIVABLES_INVOICE_ID IS NOT NULL;
871:
872: BEGIN
873:
874: x_any_data_exists := false; -- VPANWAR changed for pre upgrade test