[Home] [Help]
1036: -- Utility name: Populate_Lines_GT
1037: --
1038: -- Type : Private
1039: --
1040: -- Function : It populate zx_transaction_lines_gt. The records of this table will be processed for
1041: -- zx_api_pub.calculate_tax procedure to generate taxes (zx_lines)
1042: --
1043: -- Pre-reqs : None
1044: --
1059: l_debug_info VARCHAR2(240);
1060:
1061: -- This structure to populate all the lines information previous to insert
1062: -- in eTax global temporary table.
1063: TYPE Trans_Lines_Tab_Type IS TABLE OF zx_transaction_lines_gt%ROWTYPE;
1064: trans_lines Trans_Lines_Tab_Type := Trans_Lines_Tab_Type();
1065: l_ctrl_hdr_tx_appl_flag VARCHAR2(1);
1066: l_line_level_action VARCHAR2(30);
1067: l_line_class VARCHAR2(30);
1296: INL_LOGGING_PVT.Log_Statement (p_module_name => g_module_name,
1297: p_procedure_name => l_function_name,
1298: p_debug_info => l_debug_info);
1299: ------------------------------------------------------------------
1300: -- Will populate a dinamic table to include in zx_transaction_lines_gt
1301: IF (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
1302: trans_lines(i).application_id := 9004;
1303: trans_lines(i).entity_code := G_ENTITY_CODE;
1304: trans_lines(i).event_class_code := p_event_class_code;
1371: END LOOP;
1372: END IF;
1373: IF ( l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
1374: -- if exist any row from this shipment it will be removed
1375: DELETE FROM zx_transaction_lines_gt
1376: WHERE trx_id= l_ship_header_rec.ship_header_id;
1377: -------------------------------------------------------------------
1378: l_debug_info := 'Step 15: Bulk Insert into global temp table';
1379: -------------------------------------------------------------------
1382: p_procedure_name => l_function_name,
1383: p_debug_info => l_debug_info);
1384: -- populate the table
1385: FORALL m IN trans_lines.FIRST..trans_lines.LAST
1386: INSERT INTO zx_transaction_lines_gt
1387: VALUES trans_lines(m);
1388: -------------------------------------------------------------------
1389:
1390: l_debug_info := 'Step 15: Populate pl/sql table inserted: '||sql%rowcount||' line(s)';
1913: -- This procedure will calculate the tax from the current transaction
1914: -- and populate zx_lines
1915:
1916: /*
1917: FROM ZX_TRANSACTION_LINES_GT
1918: WHERE TRX_ID = l_ship_header_rec.ship_header_id
1919: */
1920: zx_api_pub.calculate_tax(
1921: p_api_version => 1.0,