[Home] [Help]
4989: CURSOR c_trans_number_csr (p_header_source_id NUMBER)
4990: IS
4991: SELECT tai.trx_number trans_number
4992: ,tai.tcn_id tai_tcn_id
4993: FROM okl_trx_ar_invoices_b tai
4994: WHERE tai.id = p_header_source_id;
4995:
4996: -- Cursor to fetch the Qte_id from the AR Transaction Header
4997: --
5653: ,tld.khr_id khr_id
5654: ,tld.kle_id kle_id
5655: ,tld.sty_id sty_id
5656: ,tai.try_id try_id
5657: FROM okl_trx_ar_invoices_b tai
5658: ,okl_txl_ar_inv_lns_b til
5659: ,okl_txd_ar_ln_dtls_b tld
5660: WHERE tld.til_id_details = til.id
5661: AND til.tai_id = tai.id
5751: put_in_log(l_debug_enabled,is_debug_procedure_on,is_debug_statement_on,l_module, 'S',
5752: 'Header SOURCE_ID= ' || p_rxhv_rec.source_id || ' SOURCE_TABLE=' || p_rxhv_rec.source_table );
5753: -- Validation 2: The Header Source Table should be either the
5754: -- OKL AR Invoice Trx Header or OKL AR Adjustment Trx. Header table only
5755: -- ie. it should be either OKL_TRX_AR_INVOICES_B or OKL_TRX_AR_ADJSTS_B only
5756: IF UPPER(p_rxhv_rec.source_table) NOT IN ( G_TRX_AR_INVOICES_B, G_TRX_AR_ADJSTS_B)
5757: THEN
5758: OKL_API.set_message(
5759: p_app_name => G_APP_NAME
5796: END IF;
5797:
5798: -- Loop on the details for the current transaction header
5799: -- Call the populate_tld_sources
5800: IF l_header_source_table = 'OKL_TRX_AR_INVOICES_B'
5801: THEN
5802: -- As we wanted to store the records in the PL/SQL table starting from 1
5803: -- and after the loop, the tld_index should be nothing but the count of the
5804: -- Transaction Detail Lines fetched ...
6000: RAISE OKL_API.G_EXCEPTION_ERROR;
6001: END IF;
6002: END IF; -- IF l_capture_sources = 'Y'
6003: END LOOP; -- Loop on l_trx_ar_adj_lines_tbl ..
6004: END IF; -- IF l_header_source_table = 'OKL_TRX_AR_INVOICES_B'
6005: put_in_log(l_debug_enabled,is_debug_procedure_on,is_debug_statement_on,l_module, 'P',
6006: 'Calling okl_api.end_activity');
6007: okl_api.end_activity(
6008: x_msg_count => x_msg_count