[Home] [Help]
1355: -- Utility name: Populate_Lines_GT
1356: --
1357: -- Type : Private
1358: --
1359: -- Function : It populate zx_transaction_lines_gt. The records of this table will be processed for
1360: -- zx_api_pub.calculate_tax procedure to generate taxes (zx_lines)
1361: --
1362: -- Pre-reqs : None
1363: --
1378: l_debug_info VARCHAR2(240);
1379:
1380: -- This structure to populate all the lines information previous to insert
1381: -- in eTax global temporary table.
1382: TYPE Trans_Lines_Tab_Type IS TABLE OF zx_transaction_lines_gt%ROWTYPE;
1383: trans_lines Trans_Lines_Tab_Type := Trans_Lines_Tab_Type();
1384: l_ctrl_hdr_tx_appl_flag VARCHAR2(1);
1385: l_line_level_action VARCHAR2(30);
1386: l_line_class VARCHAR2(30);
1615: INL_LOGGING_PVT.Log_Statement (p_module_name => g_module_name,
1616: p_procedure_name => l_function_name,
1617: p_debug_info => l_debug_info);
1618: ------------------------------------------------------------------
1619: -- Will populate a dinamic table to include in zx_transaction_lines_gt
1620: IF (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
1621: trans_lines(i).application_id := 9004;
1622: trans_lines(i).entity_code := G_ENTITY_CODE;
1623: trans_lines(i).event_class_code := p_event_class_code;
1690: END LOOP;
1691: END IF;
1692: IF ( l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
1693: -- if exist any row from this shipment it will be removed
1694: DELETE FROM zx_transaction_lines_gt
1695: WHERE trx_id= l_ship_header_rec.ship_header_id;
1696: -------------------------------------------------------------------
1697: l_debug_info := 'Step 15: Bulk Insert into global temp table';
1698: -------------------------------------------------------------------
1701: p_procedure_name => l_function_name,
1702: p_debug_info => l_debug_info);
1703: -- populate the table
1704: FORALL m IN trans_lines.FIRST..trans_lines.LAST
1705: INSERT INTO zx_transaction_lines_gt
1706: VALUES trans_lines(m);
1707: -------------------------------------------------------------------
1708:
1709: l_debug_info := 'Step 15: Populate pl/sql table inserted: '||sql%rowcount||' line(s)';
2248: --- This procedure will calculate the tax from the current transaction
2249: --- and populate zx_lines
2250:
2251: /*
2252: FROM ZX_TRANSACTION_LINES_GT
2253: WHERE TRX_ID = l_ship_header_rec.ship_header_id
2254: */
2255: zx_api_pub.calculate_tax(
2256: p_api_version => 1.0,