[Home] [Help]
1893: ) IS
1894:
1895: l_xfer_tbl xfer_tbl_type;
1896:
1897: type inv_lines_tbl_type is table of ra_interface_lines_all%rowtype index by binary_integer;
1898: type inv_dist_tbl_type is table of ra_interface_distributions_all%rowtype index by pls_integer;
1899: type sales_credits_tbl_type is table of ra_interface_salescredits_all%rowtype index by pls_integer;
1900: type ar_contingency_tbl_type is table of ar_interface_conts_all%rowtype index by pls_integer;
1901:
3099: END IF;
3100: --vthiruva - Bug 4222231..end
3101:
3102: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3103: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Preparing Ra_interface_lines_all record.');
3104: END IF;
3105:
3106: -- -------------------------------------
3107: -- Build Invoice Lines Table
3608: inv_lines_tbl(hdr_cnt).LEGAL_ENTITY_ID := l_xfer_tbl(k).LEGAL_ENTITY_ID; -- for LE Uptake project 08-11-2006
3609:
3610:
3611: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3612: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Done Preparing Ra_interface_lines_all record.');
3613: END IF;
3614: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3615: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','inv_lines_tbl('||hdr_cnt||').legal_entity_id:' || inv_lines_tbl(hdr_cnt).legal_entity_id);
3616: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','inv_lines_tbl('||hdr_cnt||').org_id:' || inv_lines_tbl(hdr_cnt).org_id);
3631: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','inv_lines_tbl('||hdr_cnt||').term_id:' || inv_lines_tbl(hdr_cnt).term_id);
3632: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','inv_lines_tbl('||hdr_cnt||').unit_selling_price:' || inv_lines_tbl(hdr_cnt).unit_selling_price);
3633: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','inv_lines_tbl('||hdr_cnt||').unit_standard_price:' || inv_lines_tbl(hdr_cnt).unit_standard_price);
3634: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','inv_lines_tbl('||hdr_cnt||').uom_code:' || inv_lines_tbl(hdr_cnt).uom_code);
3635: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Done Preparing Ra_interface_lines_all record.');
3636: END IF;
3637: -- Start Sales Tax Code
3638:
3639: -- -------------------------------------
3643: -- Insert tax record for ivoices and on-account credit memos
3644: IF NVL(l_xfer_tbl(k).TAX_EXEMPT_FLAG, 'S') <> 'E' THEN
3645:
3646: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3647: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Preparing Ra_interface_lines_all tax record.');
3648: END IF;
3649: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3650: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Preparing Ra_interface_lines_all tax record.');
3651: END IF;
3646: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3647: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Preparing Ra_interface_lines_all tax record.');
3648: END IF;
3649: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3650: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Preparing Ra_interface_lines_all tax record.');
3651: END IF;
3652: --start| 02-MAR-07 cklee R12 Billing enhancement project |
3653: -- ebtax integration
3654: /*
3785: --start| 02-MAR-07 cklee R12 Billing enhancement project |
3786:
3787:
3788: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3789: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Done Preparing Ra_interface_lines_all tax record.');
3790: END IF;
3791: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3792: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Done Preparing Ra_interface_lines_all tax record.');
3793: END IF;
3788: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3789: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Done Preparing Ra_interface_lines_all tax record.');
3790: END IF;
3791: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3792: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Done Preparing Ra_interface_lines_all tax record.');
3793: END IF;
3794: END IF;
3795:
3796: -- End Sales Tax Code
4276: -- Transfer line records to the AR interface
4277: -- ---------------------------------------------
4278:
4279: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
4280: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inserting into ra_interface_lines_all');
4281: END IF;
4282: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
4283: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Inserting into ra_interface_lines_all');
4284: END IF;
4279: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
4280: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Inserting into ra_interface_lines_all');
4281: END IF;
4282: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
4283: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Inserting into ra_interface_lines_all');
4284: END IF;
4285:
4286: IF inv_lines_tbl.COUNT > 0 THEN
4287: FORALL indx in inv_lines_tbl.first..inv_lines_tbl.LAST
4285:
4286: IF inv_lines_tbl.COUNT > 0 THEN
4287: FORALL indx in inv_lines_tbl.first..inv_lines_tbl.LAST
4288: SAVE EXCEPTIONS
4289: INSERT INTO ra_interface_lines_all
4290: VALUES inv_lines_tbl(indx);
4291: END IF;
4292:
4293: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
4290: VALUES inv_lines_tbl(indx);
4291: END IF;
4292:
4293: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
4294: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Done Inserting into ra_interface_lines_all');
4295: END IF;
4296: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
4297: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Done Inserting into ra_interface_lines_all');
4298: END IF;
4293: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
4294: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Done Inserting into ra_interface_lines_all');
4295: END IF;
4296: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
4297: fnd_log.STRING(fnd_log.level_statement,'okl.plsql.okl_arintf_pvt.get_rec_feeder.debug','Done Inserting into ra_interface_lines_all');
4298: END IF;
4299: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
4300: FOR i IN 1..SQL%BULK_EXCEPTIONS.COUNT LOOP
4301: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN