[Home] [Help]
193: sl.txn_unit_price sl_txn_unit_price,
194: tl.tax_line_id inl_tax_line_id,
195: tl.tax_line_num inl_tax_line_num
196: FROM inl_ship_lines sl,
197: zx_lines zl,
198: inl_tax_lines tl
199: WHERE sl.ship_header_id = p_ship_header_id
200: AND sl.ship_line_src_type_code = 'PO'
201: AND sl.ship_line_source_id = zl.trx_line_id
200: AND sl.ship_line_src_type_code = 'PO'
201: AND sl.ship_line_source_id = zl.trx_line_id
202: AND zl.application_id = 201
203: AND tl.ship_header_id(+) = p_ship_header_id
204: AND tl.source_parent_table_name(+) = 'ZX_LINES'
205: AND tl.source_parent_table_id(+) = zl.tax_line_id
206: ORDER BY sl.ship_line_group_id,sl.ship_line_num
207: ;
208: zlines_rec zlines%ROWTYPE;
235:
236: IF ( NVL(zlines_tbl.COUNT,0) > 0) THEN
237: -- loop in all taxes of current shipment
238: FOR i IN zlines_tbl.FIRST..zlines_tbl.LAST LOOP
239: -- when eBTax recalculates the taxes the tax_line_id in zx_lines remains the same
240:
241: IF zlines_tbl(i).inl_tax_line_id IS NOT NULL THEN
242: p_tax_ln_tbl(i).tax_line_id := zlines_tbl(i).inl_tax_line_id; -- NULL ON INSERTS
243: p_tax_ln_tbl(i).tax_line_num := zlines_tbl(i).inl_tax_line_num;
245: p_tax_ln_tbl(i).tax_code := zlines_tbl(i).tax;
246: p_tax_ln_tbl(i).ship_header_id := p_ship_header_id;
247: p_tax_ln_tbl(i).adjustment_num := 0; -- this proc is about estimated taxes only
248: p_tax_ln_tbl(i).parent_tax_line_id := null;
249: p_tax_ln_tbl(i).source_parent_table_name := 'ZX_LINES';
250: p_tax_ln_tbl(i).source_parent_table_id := zlines_tbl(i).tax_line_id;
251: p_tax_ln_tbl(i).to_parent_table_name := 'INL_SHIP_LINES';
252: p_tax_ln_tbl(i).to_parent_table_id := zlines_tbl(i).ship_line_id;
253: p_tax_ln_tbl(i).currency_code := zlines_tbl(i).tax_currency_code;
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: --
1045: -- Parameters :
1427: --
1428: -- Function : It makes adjusts (Insert, Delete or Both) in tax_line table.
1429: -- For a given Ship_Header_Id DEL will remove all rows from this shipment of the
1430: -- INL_tax_lines and from INL_associations
1431: -- INS will insert in INL_tax_lines all lines from zx_lines
1432: -- If the zx_line has recover amount two lines will be generated in INL_tax_lines.
1433: --
1434: -- Pre-reqs : None
1435: --
1474: DELETE FROM inl_tax_lines tl
1475: WHERE ship_header_id = P_ship_Header_Id
1476: AND EXISTS (SELECT 1
1477: FROM inl_ebtax_lines_v ebV
1478: ,zx_lines zl
1479: WHERE ship_header_id = P_ship_Header_Id
1480: AND tl.source_parent_table_name = 'ZX_LINES'
1481: AND tl.source_parent_table_id = zl.tax_line_id
1482: AND ebv.ship_line_id = zl.trx_line_id );
1476: AND EXISTS (SELECT 1
1477: FROM inl_ebtax_lines_v ebV
1478: ,zx_lines zl
1479: WHERE ship_header_id = P_ship_Header_Id
1480: AND tl.source_parent_table_name = 'ZX_LINES'
1481: AND tl.source_parent_table_id = zl.tax_line_id
1482: AND ebv.ship_line_id = zl.trx_line_id );
1483: END IF;
1484: -- if action needed is in ('INS','ALL') Insert in INL_tax_lines lines from zx_lines
1480: AND tl.source_parent_table_name = 'ZX_LINES'
1481: AND tl.source_parent_table_id = zl.tax_line_id
1482: AND ebv.ship_line_id = zl.trx_line_id );
1483: END IF;
1484: -- if action needed is in ('INS','ALL') Insert in INL_tax_lines lines from zx_lines
1485: IF p_oper IN ('INS','ALL') THEN
1486: FOR curTax in (SELECT zl.tax_line_id
1487: ,zl.tax_line_number
1488: ,zl.tax_code
1503: ,DECODE(lv.source, 'SHIP_LINE' ,'INL_SHIP_LINES'
1504: , 'CHARGE' ,'INL_CHARGE_LINES') source
1505: ,oh.ship_TYPE_ID
1506: ,inl_tax_lines_s.NEXTVAL tax_line_id_s
1507: FROM zx_lines zl
1508: ,inl_ebtax_lines_v lv
1509: ,inl_ship_headers oh
1510: WHERE zl.application_id = 9004
1511: AND zl.trx_id = P_ship_Header_Id
1566: ,curTax.tax_code
1567: ,curTax.trx_id
1568: ,0
1569: ,NULL
1570: ,'ZX_LINES'
1571: ,curTax.tax_line_id
1572: ,curTax.tax_amt
1573: ,curTax.nrec_tax_amt
1574: ,curTax.tax_currency_code
1843: -----------------------------------------------------------------
1844: BEGIN
1845: SELECT 'Y'
1846: INTO l_tax_already_calculated
1847: FROM zx_lines_det_factors
1848: WHERE trx_id = l_ship_header_rec.ship_header_id
1849: AND application_id = 9004
1850: AND entity_code = G_ENTITY_CODE
1851: AND event_class_code = l_event_class_code
1910: p_in_param_name4 => 'p_validation_level',
1911: p_in_param_value4 => FND_API.G_VALID_LEVEL_FULL);
1912: -- It will run the calculate_tax procedure from eBTax
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
1950: INL_LOGGING_PVT.Log_Statement (p_module_name => g_module_name,
1951: p_procedure_name => l_api_name,
1952: p_debug_info => l_debug_info);
1953: -----------------------------------------------------------------
1954: -- It will answer the updates done in zx_lines in INL_tax_lines
1955: Adjust_Tax_Lines('INS', p_ship_header_id, l_return_status);
1956: -- If any errors happen abort API.
1957: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1958: RAISE FND_API.G_EXC_ERROR;
2122: x_prod_fisc_class_code,
2123: x_prod_category,
2124: x_intended_use,
2125: x_product_type
2126: FROM zx_lines_det_factors zx,
2127: po_line_locations pll
2128: WHERE zx.application_id = 201
2129: AND zx.event_class_code = 'PO_PA'
2130: AND zx.entity_code = 'PURCHASE_ORDER'