[Home] [Help]
536: END IF;
537: --Print(l_api_name,l_debug_info);
538: -----------------------------------------------------------------
539: DELETE FROM ZX_TRANSACTION_LINES_GT;
540: DELETE FROM ZX_IMPORT_TAX_LINES_GT;
541: DELETE FROM ZX_TRX_TAX_LINK_GT;
542:
543: AP_ETAX_SERVICES_PKG.G_SITE_ATTRIBUTES.DELETE;
544: AP_ETAX_SERVICES_PKG.G_ORG_ATTRIBUTES.DELETE;
1216: END IF;
1217: -----------------------------------------------------------------
1218: DELETE FROM ZX_TRX_HEADERS_GT;
1219: DELETE FROM ZX_TRANSACTION_LINES_GT;
1220: DELETE FROM ZX_IMPORT_TAX_LINES_GT;
1221: DELETE FROM ZX_TRX_TAX_LINK_GT;
1222:
1223: /*
1224: -----------------------------------------------------------------
2455: END IF;
2456: -----------------------------------------------------------------
2457: DELETE FROM ZX_TRX_HEADERS_GT;
2458: DELETE FROM ZX_TRANSACTION_LINES_GT;
2459: DELETE FROM ZX_IMPORT_TAX_LINES_GT;
2460: DELETE FROM ZX_TRX_TAX_LINK_GT;
2461:
2462: -----------------------------------------------------------------
2463: --bug 16656238 ends
2583: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2584: END IF;
2585: -----------------------------------------------------------------
2586: BEGIN
2587: UPDATE zx_import_tax_lines_gt
2588: SET trx_id = P_Invoice_Id
2589: WHERE trx_id = P_Interface_Invoice_Id;
2590: EXCEPTION WHEN NO_DATA_FOUND THEN NULL;
2591: END;
8176: l_debug_info VARCHAR2(240);
8177: l_curr_calling_sequence VARCHAR2(4000);
8178:
8179: TYPE Trx_Lines_Tab_Type IS TABLE OF zx_transaction_lines_gt%ROWTYPE;
8180: TYPE Tax_Lines_Tab_Type IS TABLE OF zx_import_tax_lines_gt%ROWTYPE;
8181: TYPE Link_Lines_Tab_Type IS TABLE OF zx_trx_tax_link_gt%ROWTYPE;
8182:
8183: trans_lines Trx_Lines_Tab_Type := Trx_Lines_Tab_Type();
8184: tax_lines Tax_Lines_Tab_Type := Tax_Lines_Tab_Type();
8299:
8300: FOR i IN P_Inv_Line_List.FIRST..P_Inv_Line_List.LAST LOOP
8301:
8302: -- Invoice is not tax-only. TRX lines will be populated in the
8303: -- ZX_TRANSAXTION_LINES_GT and TAX lines in ZX_IMPORT_TAX_LINES_GT
8304: -- allocation structure will be store in ZX_TRX_TAX_LINK_GT
8305:
8306: IF ( NVL(P_Invoice_Header_Rec.tax_only_flag, 'N') = 'N' ) THEN
8307:
9028: tax_lines(k).tax_line_allocation_flag := 'N';
9029: END IF;
9030: -- Debug messages added for 6321366
9031: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9032: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'zx_import_tax_lines_gt values ');
9033: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'summary_tax_line_number: ' || tax_lines(k).summary_tax_line_number);
9034: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'application_id: ' || tax_lines(k).application_id);
9035: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'event_class_code: ' || tax_lines(k).event_class_code);
9036: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'trx_id: ' || tax_lines(k).trx_id);
9813: link_lines(k).line_amt := p_inv_line_list(i).amount;
9814:
9815: -- Debug messages added for 6321366
9816: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9817: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'zx_import_tax_lines_gt values ');
9818: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'summary_tax_line_number: ' || tax_lines(k).summary_tax_line_number);
9819: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'application_id: ' || tax_lines(k).application_id);
9820: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'event_class_code: ' || tax_lines(k).event_class_code);
9821: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'trx_id: ' || tax_lines(k).trx_id);
9871: END IF;
9872:
9873: IF (tax_lines.COUNT > 0) THEN
9874: FORALL m IN tax_lines.FIRST..tax_lines.LAST
9875: INSERT INTO zx_import_tax_lines_gt
9876: VALUES tax_lines(m);
9877:
9878:
9879: --Bug10082937
9885: -------------------------------------------------------------------
9886: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
9887: IF l_copy_line_dff_flag = 'Y' THEN
9888: FOR i IN (SELECT *
9889: FROM zx_import_tax_lines_gt
9890: WHERE trx_id = P_Invoice_Header_Rec.invoice_id
9891: AND application_id = 200
9892: AND entity_code ='AP_INVOICES'
9893: AND event_class_code IN ('STANDARD INVOICES','PREPAYMENT INVOICES','EXPENSE REPORTS')) LOOP
9967: | FUNCTION - Populate_Tax_Lines_GT()
9968: |
9969: | DESCRIPTION
9970: | This function will get additional information required to populate the
9971: | ZX_TRANSACTION_LINES_GT, and ZX_IMPORT_TAX_LINES_GT.
9972: | There is no need to populate ZX_TRX_TAX_LINK_GT since any tax line
9973: | manually created is assume to be allocated to all the ITEM lines in the
9974: | invoice.
9975: | This function returns TRUE if the population of the temp table goes
10003: l_debug_info VARCHAR2(240);
10004: l_curr_calling_sequence VARCHAR2(4000);
10005:
10006: TYPE Trx_Lines_Tab_Type IS TABLE OF zx_transaction_lines_gt%ROWTYPE;
10007: TYPE Tax_Lines_Tab_Type IS TABLE OF zx_import_tax_lines_gt%ROWTYPE;
10008: TYPE Link_Lines_Tab_Type IS TABLE OF zx_trx_tax_link_gt%ROWTYPE;
10009:
10010: trans_lines Trx_Lines_Tab_Type := Trx_Lines_Tab_Type();
10011: tax_lines Tax_Lines_Tab_Type := Tax_Lines_Tab_Type();
10132: --for the manual tax line then We need to populate zx_trx_tax_link_gt.
10133: --ie if line_group_number is provided on the tax line and
10134: --ITEM line then we need to populate the zx_trx_tax_link_gt
10135: --with the allocation info.And we need to pass tax_line_allocation_flag
10136: --as 'Y' in zx_import_tax_lines_gt for the tax line.
10137:
10138: IF (l_inv_tax_list(i).prorate_across_all_items = 'Y'AND
10139: l_inv_tax_list(i).line_group_number IS NOT NULL) THEN
10140: tax_lines(i).tax_line_allocation_flag := 'Y';
10142: tax_lines(i).tax_line_allocation_flag := 'N';
10143: END IF;
10144: -- Debug messages added for 6321366
10145: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10146: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'zx_import_tax_lines_gt values ');
10147: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'summary_tax_line_number: ' || tax_lines(i).summary_tax_line_number);
10148: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'application_id: ' || tax_lines(i).application_id);
10149: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'event_class_code: ' || tax_lines(i).event_class_code);
10150: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'trx_id: ' || tax_lines(i).trx_id);
10431: -- the control amount to be populated so that eTax will know how much the
10432: -- tax should be. In this case we will populate the
10433: -- zx_transaction_lines_gt GT table.
10434: -- For the second case, where the tax lines are manually created we will
10435: -- populate both zx_transaction_lines_gt and zx_import_tax_lines_gt. It
10436: -- is also required to populate the zx_trx_tax_link_gt with a one to one
10437: -- allocation.
10438:
10439:
10452: -- since for the 2 cases we need to populate the trans_lines pl/sql
10453: -- table, we populate it and if the rcv_transaction_id is not null
10454: -- we set the flag P_Inv_Rcv_Matched to Y. If it is not RCV matched, we
10455: -- will not modified the flag since N is the initial value and will
10456: -- populate the zx_import_tax_lines_gt and zx_trx_tax_link_gt GT tables
10457:
10458: -------------------------------------------------------------------
10459: l_debug_info := 'Step 5: Get line_level_action for TAX ONLY line '||
10460: 'number:'||l_inv_tax_list(i).line_number;
10814: --Bug9819170
10815:
10816: -- Debug messages added for 6321366
10817: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10818: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'zx_import_tax_lines_gt values ');
10819: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'summary_tax_line_number: ' || tax_lines(k).summary_tax_line_number);
10820: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'application_id: ' || tax_lines(k).application_id);
10821: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'event_class_code: ' || tax_lines(k).event_class_code);
10822: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, 'trx_id: ' || tax_lines(k).trx_id);
10883: END IF;
10884: -------------------------------------------------------------------
10885:
10886: FORALL m IN tax_lines.FIRST..tax_lines.LAST
10887: INSERT INTO zx_import_tax_lines_gt
10888: VALUES tax_lines(m);
10889:
10890: --Bug9819170
10891: -------------------------------------------------------------------
10896: -------------------------------------------------------------------
10897: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
10898: IF l_copy_line_dff_flag = 'Y' THEN
10899: FOR i IN (SELECT *
10900: FROM zx_import_tax_lines_gt
10901: WHERE trx_id = P_Invoice_Header_Rec.invoice_id
10902: AND application_id = 200
10903: AND entity_code ='AP_INVOICES'
10904: AND event_class_code IN ('STANDARD INVOICES','PREPAYMENT INVOICES','EXPENSE REPORTS')) LOOP
13457: END IF;
13458:
13459:
13460: DELETE zx_transaction_lines_gt;
13461: DELETE zx_import_tax_lines_gt;
13462: DELETE zx_trx_tax_link_gt;
13463: DELETE zx_reverse_dist_gt;
13464:
13465: AP_ETAX_SERVICES_PKG.G_SITE_ATTRIBUTES.DELETE;
14031: P_Calling_Sequence => l_curr_calling_sequence)) THEN
14032: NULL;
14033: END IF;
14034: DELETE zx_transaction_lines_gt;
14035: DELETE zx_import_tax_lines_gt;
14036: DELETE zx_trx_tax_link_gt;
14037: DELETE zx_reverse_dist_gt;
14038: RETURN l_return_status;
14039: ELSE -- update the tax only line amount to 0