[Home] [Help]
584: -- rmunjulu R12 Fixes -- modified code to populate the new out TBL type
585:
586: -- rmunjulu R12 Fixes -- modified code to populate x_dist_tbl with values from cursor
587:
588: FOR acc_dtls_rec IN acc_dstrs_csr(p_tld_id, 'OKL_TXD_AR_LN_DTLS_B') LOOP
589:
590: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
591: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.Get_acct_disb.debug','acc_dtls_rec.cr_dr_flag'||acc_dtls_rec.cr_dr_flag);
592: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.Get_acct_disb.debug','acc_dtls_rec.code_combination_id'||acc_dtls_rec.code_combination_id);
1142: , TRYT.NAME TRY_NAME
1143: -- bug 6744584: contingency fix, added contingecy_id..racheruv
1144: , STY.CONTINGENCY_ID
1145: , TLD.INVOICE_FORMAT_LINE_TYPE INVOICE_LINE_TYPE -- Bug 7045347
1146: FROM OKL_TXD_AR_LN_DTLS_B TLD,
1147: OKL_TXL_AR_INV_LNS_V TIL,
1148: OKL_TRX_AR_INVOICES_V TAI,
1149: OKC_K_HEADERS_ALL_B KHR,
1150: --start:| 06-Apr-2007 cklee -- Fixed kle_id, asset_number issues |
1190: FROM hr_operating_units
1191: WHERE organization_id = mo_global.get_current_org_id;
1192:
1193:
1194: -- For R12, OKL_TXD_AR_LN_DTLS_B will be invoice line.
1195: --
1196: CURSOR tld_cnt_csr( p_req_id NUMBER, p_sts VARCHAR2 ) IS
1197: SELECT count(1)
1198: FROM OKL_TXD_AR_LN_DTLS_B TLD
1194: -- For R12, OKL_TXD_AR_LN_DTLS_B will be invoice line.
1195: --
1196: CURSOR tld_cnt_csr( p_req_id NUMBER, p_sts VARCHAR2 ) IS
1197: SELECT count(1)
1198: FROM OKL_TXD_AR_LN_DTLS_B TLD
1199: WHERE EXISTS
1200: (SELECT 1
1201: FROM OKL_TRX_AR_INVOICES_B TAI,
1202: OKL_TXL_AR_INV_LNS_B TIL
1400:
1401: --start: | 15-FEB-07 cklee R12 Billing enhancement project
1402: --l_error_xsi_id okl_ext_sell_invs_v.id%TYPE;
1403: l_error_tai_id okl_trx_ar_invoices_b.id%TYPE;
1404: l_error_txd_id OKL_TXD_AR_LN_DTLS_B.id%TYPE;
1405: --end: | 15-FEB-07 cklee R12 Billing enhancement project
1406:
1407: hdr_cnt NUMBER;
1408: sales_cr_cnt NUMBER;
1416:
1417: l_memo_line_id ar_memo_lines.memo_line_id%TYPE;
1418: */
1419:
1420: Cursor is_legacy_invoice (p_rev_txn_id OKL_TXD_AR_LN_DTLS_B.id%type) is
1421: select lsm_id
1422: from OKL_TXD_AR_LN_DTLS_B
1423: where id = p_rev_txn_id;
1424:
1418: */
1419:
1420: Cursor is_legacy_invoice (p_rev_txn_id OKL_TXD_AR_LN_DTLS_B.id%type) is
1421: select lsm_id
1422: from OKL_TXD_AR_LN_DTLS_B
1423: where id = p_rev_txn_id;
1424:
1425: l_lsm_id OKL_TXD_AR_LN_DTLS_B.lsm_id%type;
1426:
1421: select lsm_id
1422: from OKL_TXD_AR_LN_DTLS_B
1423: where id = p_rev_txn_id;
1424:
1425: l_lsm_id OKL_TXD_AR_LN_DTLS_B.lsm_id%type;
1426:
1427: Cursor get_invoice_line_id (p_rev_txn_id OKL_TXD_AR_LN_DTLS_B.id%type) is
1428: select a.customer_trx_line_id
1429: from ra_customer_trx_lines_all a
1423: where id = p_rev_txn_id;
1424:
1425: l_lsm_id OKL_TXD_AR_LN_DTLS_B.lsm_id%type;
1426:
1427: Cursor get_invoice_line_id (p_rev_txn_id OKL_TXD_AR_LN_DTLS_B.id%type) is
1428: select a.customer_trx_line_id
1429: from ra_customer_trx_lines_all a
1430: where a.INTERFACE_LINE_ATTRIBUTE14 = to_char(p_rev_txn_id); -- AKP
1431:
1444: txs.entity_code,
1445: inv.tax_line_id -- Bug 6619311
1446: FROM okl_tax_sources txs,
1447: okl_txl_ar_inv_lns_b inv
1448: ,okl_txd_ar_ln_dtls_b tld
1449: WHERE txs.trx_id = inv.txs_trx_id
1450: AND trx_line_id = inv.txs_trx_line_id
1451: AND inv.id = tld.til_id_details
1452: AND inv.tai_id = p_tai_id
2486: x_msg_count => x_msg_count,
2487: x_msg_data => x_msg_data,
2488: p_source_trx_id => l_xfer_tbl(k).TXN_ID,
2489: p_source_trx_name => l_xfer_tbl(k).try_name,
2490: p_source_table => 'OKL_TXD_AR_LN_DTLS_B',
2491: x_tax_det_rec => x_tax_det_rec); -- 5902234
2492: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2493: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','okl_process_sales_tax_pvt.get_tax_determinants returned with x_return_status:'||x_return_status);
2494: END IF;