[Home] [Help]
498: tax_rec get_tax_cur%ROWTYPE;
499: ap_tax_dtl_rec get_ap_tax_dtl%ROWTYPE;
500: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_CCID';
501: BEGIN
502: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
503: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_invoice_id: ' || pn_invoice_id );
504: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_line_number: ' || pn_line_number );
505: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_org_id: ' || pn_org_id );
506: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_location_id: ' || pn_location_id );
499: ap_tax_dtl_rec get_ap_tax_dtl%ROWTYPE;
500: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_CCID';
501: BEGIN
502: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
503: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_invoice_id: ' || pn_invoice_id );
504: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_line_number: ' || pn_line_number );
505: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_org_id: ' || pn_org_id );
506: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_location_id: ' || pn_location_id );
507:
500: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_CCID';
501: BEGIN
502: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
503: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_invoice_id: ' || pn_invoice_id );
504: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_line_number: ' || pn_line_number );
505: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_org_id: ' || pn_org_id );
506: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_location_id: ' || pn_location_id );
507:
508: IF (pn_org_id IS NOT NULL AND pn_location_id IS NOT NULL)
501: BEGIN
502: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
503: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_invoice_id: ' || pn_invoice_id );
504: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_line_number: ' || pn_line_number );
505: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_org_id: ' || pn_org_id );
506: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_location_id: ' || pn_location_id );
507:
508: IF (pn_org_id IS NOT NULL AND pn_location_id IS NOT NULL)
509: THEN
502: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
503: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_invoice_id: ' || pn_invoice_id );
504: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_line_number: ' || pn_line_number );
505: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_org_id: ' || pn_org_id );
506: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'pn_location_id: ' || pn_location_id );
507:
508: IF (pn_org_id IS NOT NULL AND pn_location_id IS NOT NULL)
509: THEN
510: FOR r_jai_cmn_document_taxes IN c_jai_cmn_document_taxes
508: IF (pn_org_id IS NOT NULL AND pn_location_id IS NOT NULL)
509: THEN
510: FOR r_jai_cmn_document_taxes IN c_jai_cmn_document_taxes
511: LOOP
512: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name, 'tax id: ' || r_jai_cmn_document_taxes.tax_id);
513:
514: OPEN get_tax_cur (r_jai_cmn_document_taxes.tax_id);
515: FETCH get_tax_cur INTO tax_rec;
516: CLOSE get_tax_cur;
571:
572: END LOOP;
573: COMMIT;
574: END IF;
575: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
576: END UPDATE_CCID;
577:
578:
579: function check_service_interim_account /* Service */
938: p_jai_ap_invoice_lines_rec IN jai_ap_invoice_lines%ROWTYPE
939: )IS
940: l_api_name CONSTANT VARCHAR2(50) := 'Insert_jai_inv_line()';
941: BEGIN
942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
943:
944: INSERT INTO jai_ap_invoice_lines
945: (JAI_AP_INVOICE_LINES_ID
946: ,ORGANIZATION_ID
981: ,p_jai_ap_invoice_lines_rec.LAST_UPDATE_LOGIN
982: ,p_jai_ap_invoice_lines_rec.LAST_UPDATED_BY
983: );
984:
985: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
986: EXCEPTION
987: WHEN OTHERS THEN
988: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name
989: , G_PKG_NAME || ': '|| l_api_name || '. Other_Exception '
984:
985: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
986: EXCEPTION
987: WHEN OTHERS THEN
988: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name
989: , G_PKG_NAME || ': '|| l_api_name || '. Other_Exception '
990: || SQLCODE || ':' || SQLERRM);
991: RAISE;
992: END Insert_jai_inv_line;
997: p_ap_invoice_lines_all_rec IN ap_invoice_lines_all%ROWTYPE
998: )IS
999: l_api_name CONSTANT VARCHAR2(50) := 'Insert_ap_inv_line()';
1000: BEGIN
1001: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
1002:
1003: INSERT INTO ap_invoice_lines_all
1004: (INVOICE_ID
1005: ,LINE_NUMBER
1408: ,p_ap_invoice_lines_all_rec.AIL_INVOICE_ID4
1409: ,p_ap_invoice_lines_all_rec.PAY_AWT_GROUP_ID
1410: );
1411:
1412: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
1413: EXCEPTION
1414: WHEN OTHERS THEN
1415: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name
1416: , G_PKG_NAME || ': '|| l_api_name || '. Other_Exception '
1411:
1412: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
1413: EXCEPTION
1414: WHEN OTHERS THEN
1415: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name
1416: , G_PKG_NAME || ': '|| l_api_name || '. Other_Exception '
1417: || SQLCODE || ':' || SQLERRM);
1418: RAISE;
1419: END Insert_ap_inv_line;
1424: p_ap_invoice_dist_all_rec IN ap_invoice_distributions_all%ROWTYPE
1425: )IS
1426: l_api_name CONSTANT VARCHAR2(50) := 'Insert_ap_inv_dst_line()';
1427: BEGIN
1428: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
1429:
1430: INSERT INTO ap_invoice_distributions_all
1431: (ACCOUNTING_DATE
1432: ,ACCRUAL_POSTED_FLAG
1919: ,p_ap_invoice_dist_all_rec.RELEASE_INV_DIST_DERIVED_FROM
1920: ,p_ap_invoice_dist_all_rec.PAY_AWT_GROUP_ID
1921: );
1922:
1923: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
1924: EXCEPTION
1925: WHEN OTHERS THEN
1926: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name
1927: , G_PKG_NAME || ': '|| l_api_name || '. Other_Exception '
1922:
1923: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
1924: EXCEPTION
1925: WHEN OTHERS THEN
1926: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name
1927: , G_PKG_NAME || ': '|| l_api_name || '. Other_Exception '
1928: || SQLCODE || ':' || SQLERRM);
1929: RAISE;
1930: END Insert_ap_inv_dst_line;
2693:
2694: --Loop 3,tax level:Loop all tax lines in jai_cmn_document_taxes
2695: --<
2696: -- Get line number
2697: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || lv_proc_name,
2698: '@@Before insert reverse charege service tax liability lines.');
2699:
2700: ln_max_inv_line_num := Get_Max_Invoice_Line_Number(ln_invoice_id);
2701: ln_max_source_line_id := Get_Max_Doc_Source_Line_Id(ln_invoice_id);
3866: cur_amount NUMBER;
3867: cur_quantity_invoiced NUMBER;
3868: begin
3869:
3870: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Start of function apportion_tax_4_price_cor_inv');
3871:
3872: begin
3873: execute immediate 'select /* price_correct_inv_id */, po_distribution_id, amount, quantity_invoiced
3874: from ap_invoice_lines_all
3898: fetch c_get_orig_tax_line into c_get_orig_tax_line_rec;
3899: close c_get_orig_tax_line;
3900:
3901: if c_check_orig_item_line_rec.amount = -1 then --Modified by kunkumar for 5593895
3902: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name
3903: , 'Original item line has -1 amount, cannot apportion tax');--Modified by kunkumar for 5593895
3904: return p_tax_amount;
3905: end if;
3906:
3906:
3907: v_amount := ( c_get_orig_tax_line_rec.tax_amount / c_check_orig_item_line_rec.amount)
3908: * cur_amount;
3909:
3910: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
3911: ' original amount / tax :' || c_check_orig_item_line_rec.amount
3912: || '/' || c_get_orig_tax_line_rec.tax_amount);
3913:
3914: return round(v_amount, 2);
3915:
3916:
3917: exception
3918: when others then
3919: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Exception function apportion_tax_4_price_cor_inv :' || sqlerrm);
3920: return p_tax_amount;
3921: end apportion_tax_4_price_cor_inv;
3922:
3923:
3931: 1. 05-JUL-2012 chong, shiped from jai_ap_match_tax_pkg.process_online procedure.
3932: ship and Update process_online procedure to process reverse charge service tax only
3933:
3934: ------------------------------------------------------------------------------------------------------- */
3935: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
3936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3932: ship and Update process_online procedure to process reverse charge service tax only
3933:
3934: ------------------------------------------------------------------------------------------------------- */
3935: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
3936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3933:
3934: ------------------------------------------------------------------------------------------------------- */
3935: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
3936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3934: ------------------------------------------------------------------------------------------------------- */
3935: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
3936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3935: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
3936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'po_dist_id: ' || po_dist_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'qty_inv: ' || qty_inv );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_shipment_header_id: ' || p_shipment_header_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3947: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_task_id: ' || p_task_id );
3940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_packing_slip_num: ' || p_packing_slip_num );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3947: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_task_id: ' || p_task_id );
3948: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_expenditure_type: ' || p_expenditure_type );
3941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_receipt_code: ' || p_receipt_code );
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3947: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_task_id: ' || p_task_id );
3948: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_expenditure_type: ' || p_expenditure_type );
3949:
3942: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_rematch: ' || p_rematch );
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3947: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_task_id: ' || p_task_id );
3948: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_expenditure_type: ' || p_expenditure_type );
3949:
3950:
3943: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'rcv_tran_id: ' || rcv_tran_id );
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3947: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_task_id: ' || p_task_id );
3948: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_expenditure_type: ' || p_expenditure_type );
3949:
3950:
3951: OPEN get_ven_info(inv_id);
3944: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_dist_amount: ' || v_dist_amount );
3945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'v_org_id: ' || v_org_id );
3946: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_project_id: ' || p_project_id );
3947: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_task_id: ' || p_task_id );
3948: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'p_expenditure_type: ' || p_expenditure_type );
3949:
3950:
3951: OPEN get_ven_info(inv_id);
3952: FETCH get_ven_info INTO get_ven_info_rec;
3951: OPEN get_ven_info(inv_id);
3952: FETCH get_ven_info INTO get_ven_info_rec;
3953: CLOSE get_ven_info;
3954: -- Using pn_invoice_line_number instead of dist_line_no for Bug#4445989
3955: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
3956: 'Input parameters - invoice number(id)/ invoice_line_no/ Matching option :'
3957: || get_ven_info_rec.invoice_num || '(' || inv_id || ')/' || pn_invoice_line_number || '/' || p_rematch);
3958:
3959:
3960:
3961: ln_user_id := fnd_global.user_id;
3962: ln_login_id := fnd_global.login_id;
3963:
3964: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Inside procedure process online');
3965: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Value of invoice_id is '||inv_id);
3966: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Value of line number is '||pn_invoice_line_number);
3967:
3968: open c_functional_currency(get_ven_info_rec.set_of_books_id);
3961: ln_user_id := fnd_global.user_id;
3962: ln_login_id := fnd_global.login_id;
3963:
3964: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Inside procedure process online');
3965: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Value of invoice_id is '||inv_id);
3966: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Value of line number is '||pn_invoice_line_number);
3967:
3968: open c_functional_currency(get_ven_info_rec.set_of_books_id);
3969: fetch c_functional_currency into v_functional_currency;
3962: ln_login_id := fnd_global.login_id;
3963:
3964: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Inside procedure process online');
3965: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Value of invoice_id is '||inv_id);
3966: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Match Tax Code, Value of line number is '||pn_invoice_line_number);
3967:
3968: open c_functional_currency(get_ven_info_rec.set_of_books_id);
3969: fetch c_functional_currency into v_functional_currency;
3970: close c_functional_currency;
4086: (
4087: p_po_distribution_id => Nvl(po_dist_id,ln_po_dist_id)
4088: );
4089:
4090: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_accrue_on_receipt_flag='||lv_accrue_on_receipt_flag);
4091:
4092: --For reverse charege service tax, only service tax regime will come to here.
4093: open c_jai_regimes(jai_constants.service_regime);
4094: fetch c_jai_regimes into r_jai_regimes;
4103: (for_dist_insertion_rec.dist_code_combination_id);
4104:
4105: IF p_rematch = 'PO_MATCHING' THEN
4106:
4107: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inside p_rematch = PO_MATCHING ');
4108:
4109: OPEN get_source_csr;
4110: FETCH get_source_csr INTO lv_source;
4111: CLOSE get_source_csr;
4130: r_service_regime_tax_type := null;
4131:
4132: r_VAT_regime_tax_type := null;
4133:
4134: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' po match i.adhoc_flag = '||i.adhoc_flag);
4135: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' po match qty rate flag i.vat_flag = '||i.vat_flag);
4136: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'po match i.tax_type = '||i.tax_type);
4137: if i.adhoc_flag='Y'
4138: then
4131:
4132: r_VAT_regime_tax_type := null;
4133:
4134: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' po match i.adhoc_flag = '||i.adhoc_flag);
4135: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' po match qty rate flag i.vat_flag = '||i.vat_flag);
4136: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'po match i.tax_type = '||i.tax_type);
4137: if i.adhoc_flag='Y'
4138: then
4139: --start additions of bug#12920070 by anupgupt
4132: r_VAT_regime_tax_type := null;
4133:
4134: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' po match i.adhoc_flag = '||i.adhoc_flag);
4135: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' po match qty rate flag i.vat_flag = '||i.vat_flag);
4136: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'po match i.tax_type = '||i.tax_type);
4137: if i.adhoc_flag='Y'
4138: then
4139: --start additions of bug#12920070 by anupgupt
4140: if i.tax_type in ('Freight','Insurance','Octrai','Other','PURCHASE TAX','ENTRY TAX') and i.vat_flag = 'Q' -- Added IN clause for bug 13363329
4152: else
4153: v_tax_amount := i.tax_amount * v_apportn_factor_for_item_line;
4154: end if;
4155:
4156: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount after apportioning = '|| v_tax_amount);
4157:
4158: if i.currency <> for_org_id_rec.invoice_currency_code then
4159: v_tax_amount := v_tax_amount / for_org_id_rec.exchange_rate;
4160: end if;
4158: if i.currency <> for_org_id_rec.invoice_currency_code then
4159: v_tax_amount := v_tax_amount / for_org_id_rec.exchange_rate;
4160: end if;
4161:
4162: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' Value of tax amount -> '|| v_tax_amount);
4163:
4164: OPEN c_tax(i.tax_id);
4165: FETCH c_tax INTO c_tax_rec;
4166: CLOSE c_tax;
4190: open c_regime_tax_type(r_jai_regimes.regime_id, c_tax_rec.tax_type);
4191: fetch c_regime_tax_type into r_service_regime_tax_type;
4192: close c_regime_tax_type;
4193:
4194: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4195: ' Tax type of Service regime : '||r_service_regime_tax_type.tax_type);
4196:
4197: /* Fetch ship_to_location_id and ship_to_organization_id from po_line_locations */
4198: ln_ship_to_organization_id := null;
4202: ,ln_ship_to_location_id;
4203: close c_get_ship_to_org_loc;
4204:
4205:
4206: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4207: 'ln_ship_to_organization_id='||ln_ship_to_organization_id ||', r_po_lines_all.item_id='||r_po_lines_all.item_id
4208: );
4209: lv_is_item_an_expense := jai_general_pkg.is_item_an_expense
4210: (
4233: p_tax_type => c_tax_rec.tax_type,
4234: p_account_name => GV_INTERIM_LIABILITY
4235: );
4236:
4237: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4238: ' Regime type , CCID ,Liability CCID'
4239: || r_service_regime_tax_type.tax_type
4240: ||', ' || v_dist_code_combination_id ||', ' || v_dist_ccid_liability);
4241: end if;
4256: END IF;
4257: v_tax_amount := nvl(v_tax_amount,-1); --Modified by kunkumar for bug 5593895
4258: -- End bug#4103473
4259: v_tax_amount_liability := v_tax_amount;
4260: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' Value of tax amount after apportion -> '|| v_tax_amount);
4261:
4262:
4263: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before calling JAI_CALC_APMATCH_TAX parameters passed are ');
4264: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' P_MATCH_TYPE -> '||'PO_MATCHING' ||' P_INVOICE_ID -> '||inv_id||
4259: v_tax_amount_liability := v_tax_amount;
4260: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' Value of tax amount after apportion -> '|| v_tax_amount);
4261:
4262:
4263: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before calling JAI_CALC_APMATCH_TAX parameters passed are ');
4264: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' P_MATCH_TYPE -> '||'PO_MATCHING' ||' P_INVOICE_ID -> '||inv_id||
4265: ' P_INVOICE_line_no-> '||pn_invoice_line_number||' P_TAX_ID-> '||i.tax_id||' P_line_locaction_id-> '||ln_po_line_location_id||' P_tax_amount -> '|| v_tax_amount);
4266: jai_aptax_pkg_client_extn.JAI_CALC_APMATCH_TAX (P_MATCH_TYPE => 'PO_MATCHING',
4267: P_INVOICE_ID =>inv_id,
4260: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' Value of tax amount after apportion -> '|| v_tax_amount);
4261:
4262:
4263: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before calling JAI_CALC_APMATCH_TAX parameters passed are ');
4264: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' P_MATCH_TYPE -> '||'PO_MATCHING' ||' P_INVOICE_ID -> '||inv_id||
4265: ' P_INVOICE_line_no-> '||pn_invoice_line_number||' P_TAX_ID-> '||i.tax_id||' P_line_locaction_id-> '||ln_po_line_location_id||' P_tax_amount -> '|| v_tax_amount);
4266: jai_aptax_pkg_client_extn.JAI_CALC_APMATCH_TAX (P_MATCH_TYPE => 'PO_MATCHING',
4267: P_INVOICE_ID =>inv_id,
4268: P_INVOICE_line_no =>pn_invoice_line_number,
4269: P_TAX_ID => i.tax_id ,
4270: P_line_location_id => ln_po_line_location_id,
4271: P_tax_amount => v_tax_amount
4272: );
4273: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'the tax amount after the JAI_CALC_APMATCH_TAX call is '||v_tax_amount);
4274:
4275: ln_rec_tax_amt := null;
4276: ln_nrec_tax_amt := null;
4277: ln_lines_to_insert := 1;
4275: ln_rec_tax_amt := null;
4276: ln_nrec_tax_amt := null;
4277: ln_lines_to_insert := 1;
4278:
4279: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name
4280: , 'i.modvat_flag ='||i.modvat_flag ||',c_tax_rec.mod_cr_percentage='||c_tax_rec.mod_cr_percentage);
4281:
4282: if i.modvat_flag = jai_constants.YES
4283: and nvl(c_tax_rec.mod_cr_percentage, -1) > 0
4294: lv_tax_type := 'PR';
4295: end if;
4296:
4297:
4298: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name
4299: , 'ln_lines_to_insert= '||ln_lines_to_insert
4300: || ',ln_rec_tax_amt= '||ln_rec_tax_amt
4301: || ',ln_nrec_tax_amt= '||ln_nrec_tax_amt
4302: );
4347:
4348: END IF; --line = 1
4349: ELSE
4350: --CONTINUE; --For reverse charge service, should only be exclusive tax
4351: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_ERROR, GV_MODULE_PREFIX || '.' || l_api_name,
4352: 'For reverse charge service, should only be exclusive tax. Tax ID: ' || i.tax_id);
4353: END IF; --(NVL(r_tax_lines_r ec.inc_tax_flag,'N') = 'N')
4354:
4355: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4351: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_ERROR, GV_MODULE_PREFIX || '.' || l_api_name,
4352: 'For reverse charge service, should only be exclusive tax. Tax ID: ' || i.tax_id);
4353: END IF; --(NVL(r_tax_lines_r ec.inc_tax_flag,'N') = 'N')
4354:
4355: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4356: 'Before inserting into ap_invoice_lines_all for line no :' || ln_inv_line_num );
4357: --insert exclusive tax to the ap tables
4358: --or insert recoverable inclusive tax with project information the ap tables
4359:
4422: lv_project_accounting_context := r_ap_dist.project_accounting_context;
4423: lv_pa_addition_flag := r_ap_dist.pa_addition_flag;
4424: END IF;
4425:
4426: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4427: 'Before inserting into ap_invoice_distributions_all for distribution line no :'
4428: ||v_distribution_no );
4429:
4430: open c_get_invoice_distribution;
4430: open c_get_invoice_distribution;
4431: fetch c_get_invoice_distribution into v_invoice_distribution_id;
4432: close c_get_invoice_distribution;
4433:
4434: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4435: ' Invoice distribution id '|| v_invoice_distribution_id);
4436: --Insert distribution line
4437: ap_invoice_dist_all_rec := NULL;
4438: ap_invoice_dist_all_rec.accounting_date := rec_max_ap_lines_all.accounting_date;
4497: ap_invoice_dist_all_rec.distribution_class := lv_dist_class;
4498: ap_invoice_dist_all_rec.dist_match_type := r_ap_dist.dist_match_type;
4499: Insert_ap_inv_dst_line(ap_invoice_dist_all_rec);
4500:
4501: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before inserting into JAI_AP_MATCH_INV_TAXES ');
4502:
4503: INSERT INTO JAI_AP_MATCH_INV_TAXES
4504: (
4505: tax_distribution_id,
4580: END LOOP;-->r_ap_dist IN c_ap_dist(inv_id, pn_invoice_line_number)
4581: end loop ;--> for line in 1 to ln_lines_to_insert
4582:
4583: ln_inv_line_num := ln_inv_line_num + 1;
4584: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, '@@Insert liability invoice line. ln_inv_line_num: ' || ln_inv_line_num);
4585:
4586: ap_invoice_lines_all_rec := NULL;
4587: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
4588: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
4620:
4621: open c_get_invoice_distribution;
4622: fetch c_get_invoice_distribution into v_invoice_distribution_id;
4623: close c_get_invoice_distribution;
4624: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Insert liability distribution line '|| v_invoice_distribution_id);
4625:
4626: ap_invoice_dist_all_rec := NULL;
4627: ap_invoice_dist_all_rec.accounting_date := rec_max_ap_lines_all.accounting_date;
4628: ap_invoice_dist_all_rec.accrual_posted_flag := 'N';
4682: END LOOP;
4683:
4684: ELSIF p_rematch = 'PAY_ON_RECEIPT' THEN
4685:
4686: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inside p_rematch = PAY_ON_RECEIPT ');
4687: --********************************************************************
4688: --Whether need to process reverse charge service tax on this 'PAY_ON_RECEIPT'
4689: --How to deal with it, this need further discuss
4690: --********************************************************************
4690: --********************************************************************
4691:
4692: ELSIF p_rematch = 'RCV_MATCHING' THEN
4693:
4694: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inside p_receipt_code = RCV_MATCHING');
4695:
4696: OPEN for_org_id(inv_id);
4697: FETCH for_org_id INTO for_org_id_rec;
4698: CLOSE for_org_id;
4702: CLOSE get_source_csr;
4703:
4704: FOR r_tax_lines_rec IN r_tax_lines_cur(rcv_tran_id,for_org_id_rec.vendor_id,lv_source) LOOP
4705:
4706: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'in r_tax_line_cur loop ');
4707:
4708: ln_project_id := null;
4709: ln_task_id := null;
4710: lv_exp_type := null;
4746: v_dist_code_combination_id := null;
4747: --initial the tax_type
4748: lv_tax_type := NULL;
4749:
4750: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'c_tax_rec.mod_cr_percentage = '||c_tax_rec.mod_cr_percentage);
4751:
4752: if r_tax_lines_rec.modvat_flag = jai_constants.YES
4753: and nvl(c_tax_rec.mod_cr_percentage, -1) > 0
4754: then
4755: /* recoverable tax */
4756: lv_tax_type := 'RE';
4757: v_assets_tracking_flag := 'N';
4758:
4759: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '||lv_tax_type);
4760:
4761: open c_regime_tax_type(r_jai_regimes.regime_id, c_tax_rec.tax_type);
4762: fetch c_regime_tax_type into r_service_regime_tax_type;
4763: close c_regime_tax_type;
4761: open c_regime_tax_type(r_jai_regimes.regime_id, c_tax_rec.tax_type);
4762: fetch c_regime_tax_type into r_service_regime_tax_type;
4763: close c_regime_tax_type;
4764:
4765: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4766: ' Service regime: '||r_service_regime_tax_type.tax_type);
4767:
4768: ln_ship_to_organization_id := null;
4769: ln_ship_to_location_id := null;
4772: ,ln_ship_to_location_id;
4773: close c_get_ship_to_org_loc;
4774:
4775:
4776: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4777: 'ln_ship_to_organization_id='||ln_ship_to_organization_id ||', r_po_lines_all.item_id='||r_po_lines_all.item_id
4778: );
4779: lv_is_item_an_expense := jai_general_pkg.is_item_an_expense
4780: (
4804: p_account_name => GV_INTERIM_LIABILITY
4805: );
4806:
4807: v_assets_tracking_flag := 'N';
4808: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4809: ' Regime type , CCID ,v_dist_ccid_liability '
4810: || r_service_regime_tax_type.tax_type
4811: ||', ' || v_dist_code_combination_id ||', ' || v_dist_ccid_liability);
4812: end if;
4823: END if;
4824:
4825: --non recoverable
4826: lv_tax_type := 'NR';
4827: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '||lv_tax_type);
4828: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_accrue_on_receipt_flag = '||lv_accrue_on_receipt_flag);
4829: end if; /*nvl(c_tax_rec.mod_cr_percentage, 0) = 100 and c_tax_rec.tax_account_id is not null*/
4830:
4831: if v_dist_code_combination_id is null then
4824:
4825: --non recoverable
4826: lv_tax_type := 'NR';
4827: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '||lv_tax_type);
4828: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_accrue_on_receipt_flag = '||lv_accrue_on_receipt_flag);
4829: end if; /*nvl(c_tax_rec.mod_cr_percentage, 0) = 100 and c_tax_rec.tax_account_id is not null*/
4830:
4831: if v_dist_code_combination_id is null then
4832: v_dist_code_combination_id := for_dist_insertion_rec.dist_code_combination_id;
4831: if v_dist_code_combination_id is null then
4832: v_dist_code_combination_id := for_dist_insertion_rec.dist_code_combination_id;
4833: end if;
4834:
4835: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_dist_code_combination_id : ' || v_dist_code_combination_id ) ;
4836: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_apportn_factor_for_item_line = '||v_apportn_factor_for_item_line);
4837: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '||v_tax_amount);
4838: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.adhoc_flag = '||r_tax_lines_rec.adhoc_flag);
4839: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.vat_flag = '||r_tax_lines_rec.vat_flag);
4832: v_dist_code_combination_id := for_dist_insertion_rec.dist_code_combination_id;
4833: end if;
4834:
4835: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_dist_code_combination_id : ' || v_dist_code_combination_id ) ;
4836: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_apportn_factor_for_item_line = '||v_apportn_factor_for_item_line);
4837: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '||v_tax_amount);
4838: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.adhoc_flag = '||r_tax_lines_rec.adhoc_flag);
4839: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.vat_flag = '||r_tax_lines_rec.vat_flag);
4840: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' r_tax_lines_rec.tax_type = '||r_tax_lines_rec.tax_type);
4833: end if;
4834:
4835: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_dist_code_combination_id : ' || v_dist_code_combination_id ) ;
4836: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_apportn_factor_for_item_line = '||v_apportn_factor_for_item_line);
4837: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '||v_tax_amount);
4838: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.adhoc_flag = '||r_tax_lines_rec.adhoc_flag);
4839: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.vat_flag = '||r_tax_lines_rec.vat_flag);
4840: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' r_tax_lines_rec.tax_type = '||r_tax_lines_rec.tax_type);
4841: if r_tax_lines_rec.adhoc_flag='Y' then
4834:
4835: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_dist_code_combination_id : ' || v_dist_code_combination_id ) ;
4836: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_apportn_factor_for_item_line = '||v_apportn_factor_for_item_line);
4837: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '||v_tax_amount);
4838: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.adhoc_flag = '||r_tax_lines_rec.adhoc_flag);
4839: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.vat_flag = '||r_tax_lines_rec.vat_flag);
4840: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' r_tax_lines_rec.tax_type = '||r_tax_lines_rec.tax_type);
4841: if r_tax_lines_rec.adhoc_flag='Y' then
4842: --start additions of bug#12920070 by anupgupt
4835: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_dist_code_combination_id : ' || v_dist_code_combination_id ) ;
4836: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_apportn_factor_for_item_line = '||v_apportn_factor_for_item_line);
4837: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '||v_tax_amount);
4838: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.adhoc_flag = '||r_tax_lines_rec.adhoc_flag);
4839: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.vat_flag = '||r_tax_lines_rec.vat_flag);
4840: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' r_tax_lines_rec.tax_type = '||r_tax_lines_rec.tax_type);
4841: if r_tax_lines_rec.adhoc_flag='Y' then
4842: --start additions of bug#12920070 by anupgupt
4843: if r_tax_lines_rec.tax_type in ('Freight','Insurance','Octrai','Other','PURCHASE TAX','ENTRY TAX') and r_tax_lines_rec.vat_flag = 'Q' --Added IN Clause for bug # 13363329
4836: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_apportn_factor_for_item_line = '||v_apportn_factor_for_item_line);
4837: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '||v_tax_amount);
4838: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.adhoc_flag = '||r_tax_lines_rec.adhoc_flag);
4839: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'r_tax_lines_rec.vat_flag = '||r_tax_lines_rec.vat_flag);
4840: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' r_tax_lines_rec.tax_type = '||r_tax_lines_rec.tax_type);
4841: if r_tax_lines_rec.adhoc_flag='Y' then
4842: --start additions of bug#12920070 by anupgupt
4843: if r_tax_lines_rec.tax_type in ('Freight','Insurance','Octrai','Other','PURCHASE TAX','ENTRY TAX') and r_tax_lines_rec.vat_flag = 'Q' --Added IN Clause for bug # 13363329
4844: then
4854: end if;
4855: else
4856: v_tax_amount := r_tax_lines_rec.tax_amount * v_apportn_factor_for_item_line;
4857: end if;
4858: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount after apportioning = '||v_tax_amount);
4859:
4860: if for_org_id_rec.invoice_currency_code <> r_tax_lines_rec.currency then
4861: v_tax_amount := v_tax_amount / for_org_id_rec.exchange_rate;
4862: end if;
4881: v_tax_amount := apportion_tax_4_price_cor_inv(v_tax_amount, r_tax_lines_rec.tax_id);
4882: END IF;
4883: v_tax_amount := nvl(v_tax_amount, -1);
4884:
4885: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before calling JAI_CALC_APMATCH_TAX parameters passed are ');
4886: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' P_MATCH_TYPE -> '||'RCV_MATCHING'||' P_INVOICE_ID -> '||inv_id||
4887: ' P_INVOICE_line_no-> '||pn_invoice_line_number||' P_TAX_ID-> '||r_tax_lines_rec.tax_id||'p_rcv_transaction_id -> '|| rcv_tran_id||' P_tax_amount -> '|| v_tax_amount);
4888: JAI_APTAX_PKG_CLIENT_EXTN.JAI_CALC_APMATCH_TAX (P_MATCH_TYPE => 'RCV_MATCHING',
4889: P_INVOICE_ID =>inv_id,
4882: END IF;
4883: v_tax_amount := nvl(v_tax_amount, -1);
4884:
4885: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before calling JAI_CALC_APMATCH_TAX parameters passed are ');
4886: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' P_MATCH_TYPE -> '||'RCV_MATCHING'||' P_INVOICE_ID -> '||inv_id||
4887: ' P_INVOICE_line_no-> '||pn_invoice_line_number||' P_TAX_ID-> '||r_tax_lines_rec.tax_id||'p_rcv_transaction_id -> '|| rcv_tran_id||' P_tax_amount -> '|| v_tax_amount);
4888: JAI_APTAX_PKG_CLIENT_EXTN.JAI_CALC_APMATCH_TAX (P_MATCH_TYPE => 'RCV_MATCHING',
4889: P_INVOICE_ID =>inv_id,
4890: P_INVOICE_line_no =>pn_invoice_line_number,
4892: p_rcv_transaction_id => rcv_tran_id,
4893: P_tax_amount => v_tax_amount
4894: );
4895: v_tax_amount_liability := v_tax_amount;
4896: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'the tax amount after the JAI_CALC_APMATCH_TAX call is '||v_tax_amount);
4897:
4898: ln_rec_tax_amt := null;
4899: ln_nrec_tax_amt := null;
4900: ln_lines_to_insert := 1; -- Loop controller to insert more than one lines for partially recoverable tax lines in PO
4898: ln_rec_tax_amt := null;
4899: ln_nrec_tax_amt := null;
4900: ln_lines_to_insert := 1; -- Loop controller to insert more than one lines for partially recoverable tax lines in PO
4901:
4902: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
4903: 'r_tax_lines_rec.modvat_flag ='||r_tax_lines_rec.modvat_flag ||',c_tax_rec.mod_cr_percentage='||c_tax_rec.mod_cr_percentage);
4904:
4905: if r_tax_lines_rec.modvat_flag = jai_constants.YES
4906: and nvl(c_tax_rec.mod_cr_percentage, -1) > 0
4917:
4918: lv_tax_type := 'PR';
4919: end if;
4920:
4921: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_lines_to_insert='||ln_lines_to_insert||
4922: ',ln_rec_tax_amt='||ln_rec_tax_amt ||
4923: ',ln_nrec_tax_amt='||ln_nrec_tax_amt
4924: );
4925: --
4928: -- For ordinary lines (with modvat_flag = 'N' or with mod_cr_percentage = 100 fully recoverable) the variable
4929: -- ln_lines_to_insert will have value of 1 and hence only one line will be inserted with full tax amount
4930: --
4931:
4932: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_lines_to_insert ='|| ln_lines_to_insert);
4933: for line in 1..ln_lines_to_insert
4934: loop
4935:
4936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'line = '|| line);
4932: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_lines_to_insert ='|| ln_lines_to_insert);
4933: for line in 1..ln_lines_to_insert
4934: loop
4935:
4936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'line = '|| line);
4937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inc_tax_flag = '|| NVL(r_tax_lines_rec.inc_tax_flag,'N'));
4938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '|| lv_tax_type);
4939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '|| v_tax_amount);
4940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_nrec_tax_amt = '|| ln_nrec_tax_amt);
4933: for line in 1..ln_lines_to_insert
4934: loop
4935:
4936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'line = '|| line);
4937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inc_tax_flag = '|| NVL(r_tax_lines_rec.inc_tax_flag,'N'));
4938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '|| lv_tax_type);
4939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '|| v_tax_amount);
4940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_nrec_tax_amt = '|| ln_nrec_tax_amt);
4941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_rec_tax_amt = '|| ln_rec_tax_amt );
4934: loop
4935:
4936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'line = '|| line);
4937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inc_tax_flag = '|| NVL(r_tax_lines_rec.inc_tax_flag,'N'));
4938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '|| lv_tax_type);
4939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '|| v_tax_amount);
4940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_nrec_tax_amt = '|| ln_nrec_tax_amt);
4941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_rec_tax_amt = '|| ln_rec_tax_amt );
4942:
4935:
4936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'line = '|| line);
4937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inc_tax_flag = '|| NVL(r_tax_lines_rec.inc_tax_flag,'N'));
4938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '|| lv_tax_type);
4939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '|| v_tax_amount);
4940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_nrec_tax_amt = '|| ln_nrec_tax_amt);
4941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_rec_tax_amt = '|| ln_rec_tax_amt );
4942:
4943: IF (NVL(r_tax_lines_rec.inc_tax_flag,'N') = 'N')--exclusive case
4936: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'line = '|| line);
4937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inc_tax_flag = '|| NVL(r_tax_lines_rec.inc_tax_flag,'N'));
4938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '|| lv_tax_type);
4939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '|| v_tax_amount);
4940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_nrec_tax_amt = '|| ln_nrec_tax_amt);
4941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_rec_tax_amt = '|| ln_rec_tax_amt );
4942:
4943: IF (NVL(r_tax_lines_rec.inc_tax_flag,'N') = 'N')--exclusive case
4944: THEN
4937: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'inc_tax_flag = '|| NVL(r_tax_lines_rec.inc_tax_flag,'N'));
4938: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'lv_tax_type = '|| lv_tax_type);
4939: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'v_tax_amount = '|| v_tax_amount);
4940: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_nrec_tax_amt = '|| ln_nrec_tax_amt);
4941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_rec_tax_amt = '|| ln_rec_tax_amt );
4942:
4943: IF (NVL(r_tax_lines_rec.inc_tax_flag,'N') = 'N')--exclusive case
4944: THEN
4945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Exclusive Branch');
4941: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'ln_rec_tax_amt = '|| ln_rec_tax_amt );
4942:
4943: IF (NVL(r_tax_lines_rec.inc_tax_flag,'N') = 'N')--exclusive case
4944: THEN
4945: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Exclusive Branch');
4946: IF line = 1 then
4947:
4948: v_tax_amount := nvl(ln_rec_tax_amt, v_tax_amount);
4949: lv_tax_line_amount:= v_tax_amount;
4979:
4980: END IF; --line = 1
4981: ELSE
4982: --CONTINUE;
4983: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_ERROR, GV_MODULE_PREFIX || '.' || l_api_name,
4984: 'For reverse charge service, should only be exclusive tax. Tax ID: ' || r_tax_lines_rec.tax_id);
4985: END IF; --(NVL(r_tax_lines_rec.inc_tax_flag,'N') = 'N')
4986:
4987: --insert exclusive tax to the ap tables
4985: END IF; --(NVL(r_tax_lines_rec.inc_tax_flag,'N') = 'N')
4986:
4987: --insert exclusive tax to the ap tables
4988: --or insert recoverable inclusive tax with project information the ap tables
4989: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'r_tax_lines_rec.tax_id :'|| r_tax_lines_rec.tax_id );
4990: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'line :'|| line );
4991: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_ap_line_to_inst_flag :'|| lv_ap_line_to_inst_flag );
4992: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_tax_line_to_inst_flag :'|| lv_tax_line_to_inst_flag );
4993:
4986:
4987: --insert exclusive tax to the ap tables
4988: --or insert recoverable inclusive tax with project information the ap tables
4989: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'r_tax_lines_rec.tax_id :'|| r_tax_lines_rec.tax_id );
4990: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'line :'|| line );
4991: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_ap_line_to_inst_flag :'|| lv_ap_line_to_inst_flag );
4992: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_tax_line_to_inst_flag :'|| lv_tax_line_to_inst_flag );
4993:
4994: --1.Only exlusive taxes or inclusive recoverable taxes with project information
4987: --insert exclusive tax to the ap tables
4988: --or insert recoverable inclusive tax with project information the ap tables
4989: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'r_tax_lines_rec.tax_id :'|| r_tax_lines_rec.tax_id );
4990: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'line :'|| line );
4991: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_ap_line_to_inst_flag :'|| lv_ap_line_to_inst_flag );
4992: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_tax_line_to_inst_flag :'|| lv_tax_line_to_inst_flag );
4993:
4994: --1.Only exlusive taxes or inclusive recoverable taxes with project information
4995: -- are inserted into Ap Lines and Dist Lines
4988: --or insert recoverable inclusive tax with project information the ap tables
4989: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'r_tax_lines_rec.tax_id :'|| r_tax_lines_rec.tax_id );
4990: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'line :'|| line );
4991: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_ap_line_to_inst_flag :'|| lv_ap_line_to_inst_flag );
4992: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'lv_tax_line_to_inst_flag :'|| lv_tax_line_to_inst_flag );
4993:
4994: --1.Only exlusive taxes or inclusive recoverable taxes with project information
4995: -- are inserted into Ap Lines and Dist Lines
4996:
4997: --2.All taxes need to be inserted into jai tax tables. Futher the
4998: -- partially recoverable tax need to be splitted into 2 lines
4999:
5000: ln_inv_line_num := ln_inv_line_num + 1;
5001: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Before inserting into ap_invoice_lines_all for line no :'|| ln_inv_line_num );
5002:
5003: ap_invoice_lines_all_rec := NULL;
5004: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
5005: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
5034: ap_invoice_lines_all_rec.reference_key1 := r_tax_lines_rec.tax_id;
5035: ap_invoice_lines_all_rec.reference_key2 := pn_invoice_line_number;
5036: Insert_ap_inv_line( ap_invoice_lines_all_rec);
5037:
5038: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
5039: 'Before inserting into ap_invoice_distributions_all for distribution line no :' || v_distribution_no);
5040:
5041: open c_get_invoice_distribution;
5042: fetch c_get_invoice_distribution into v_invoice_distribution_id;
5041: open c_get_invoice_distribution;
5042: fetch c_get_invoice_distribution into v_invoice_distribution_id;
5043: close c_get_invoice_distribution;
5044:
5045: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, ' Invoice distribution id '|| v_invoice_distribution_id);
5046: ap_invoice_dist_all_rec := NULL;
5047: ap_invoice_dist_all_rec.accounting_date := for_dist_insertion_rec.accounting_date;
5048: ap_invoice_dist_all_rec.accrual_posted_flag := 'N';
5049: ap_invoice_dist_all_rec.assets_addition_flag := for_dist_insertion_rec.assets_addition_flag;
5102: ap_invoice_dist_all_rec.distribution_class := lv_dist_class;
5103: ap_invoice_dist_all_rec.dist_match_type := for_dist_insertion_rec.dist_match_type;
5104: Insert_ap_inv_dst_line(ap_invoice_dist_all_rec);
5105:
5106: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Before inserting into JAI_AP_MATCH_INV_TAXES ');
5107: INSERT INTO JAI_AP_MATCH_INV_TAXES
5108: (
5109: tax_distribution_id,
5110: exchange_rate_variance,
5187: end loop ; --> for line in 1 to ln_lines_to_insert Brathod, 5763527
5188:
5189:
5190: ln_inv_line_num := ln_inv_line_num + 1;
5191: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'@@Before inserting liability lines into ap_invoice_lines_all for line no :'|| ln_inv_line_num ||' tax amount = '||lv_tax_line_amount);
5192: ap_invoice_lines_all_rec := NULL;
5193: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
5194: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
5195: ap_invoice_lines_all_rec.LINE_TYPE_LOOKUP_CODE := lv_misc;
5224: ap_invoice_lines_all_rec.reference_key2 := pn_invoice_line_number;
5225: Insert_ap_inv_line( ap_invoice_lines_all_rec);
5226:
5227:
5228: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
5229: 'Before inserting liability line into ap_invoice_distributions_all for distribution line no :' || v_distribution_no);
5230:
5231:
5232: open c_get_invoice_distribution;
5233: fetch c_get_invoice_distribution into v_invoice_distribution_id;
5234: close c_get_invoice_distribution;
5235:
5236:
5237: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
5238: 'liability lines Invoice distribution id '|| v_invoice_distribution_id);
5239: ap_invoice_dist_all_rec := NULL;
5240: ap_invoice_dist_all_rec.accounting_date := for_dist_insertion_rec.accounting_date;
5241: ap_invoice_dist_all_rec.accrual_posted_flag := 'N';
5300:
5301: END IF; -- p_rematch = 'RCV_MATCHING'
5302:
5303: <
5304: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '||l_api_name||'()-');
5305: EXCEPTION
5306: WHEN OTHERS THEN
5307: ERRBUF := SQLERRM;
5308: RETCODE := 2;
5305: EXCEPTION
5306: WHEN OTHERS THEN
5307: ERRBUF := SQLERRM;
5308: RETCODE := 2;
5309: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'EXCEPTION END PROCEDURE - jai_ap_match_tax_pkg.process_online');
5310: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Error : ' || ERRBUF);
5311: NULL;
5312: END Populate_MTCH_ST_RVRS_Dist;
5313:
5306: WHEN OTHERS THEN
5307: ERRBUF := SQLERRM;
5308: RETCODE := 2;
5309: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'EXCEPTION END PROCEDURE - jai_ap_match_tax_pkg.process_online');
5310: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Error : ' || ERRBUF);
5311: NULL;
5312: END Populate_MTCH_ST_RVRS_Dist;
5313:
5314: /*
5871: 1. 24/07/2012 This procedure is extracted from jai_ap_match_tax_pkg.process_batch_record.
5872: Process similar logic for ERS invoice while only pick up reverse charge service tax.
5873:
5874: ------------------------------------------------------------------------------------------------------*/
5875: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
5876: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
5877: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || pn_invoice_line_number );
5878:
5879: ln_user_id := fnd_global.user_id;
5872: Process similar logic for ERS invoice while only pick up reverse charge service tax.
5873:
5874: ------------------------------------------------------------------------------------------------------*/
5875: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
5876: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
5877: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || pn_invoice_line_number );
5878:
5879: ln_user_id := fnd_global.user_id;
5880: ln_login_id := fnd_global.login_id;
5873:
5874: ------------------------------------------------------------------------------------------------------*/
5875: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.BEGIN', G_PKG_NAME || ': '|| l_api_name || '()+');
5876: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || inv_id );
5877: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name || '.parameters', 'inv_id: ' || pn_invoice_line_number );
5878:
5879: ln_user_id := fnd_global.user_id;
5880: ln_login_id := fnd_global.login_id;
5881:
5981:
5982: /* service End */
5983:
5984: IF p_rematch = 'PAY_ON_RECEIPT' THEN
5985: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'p_rematch: ' || p_rematch );
5986:
5987: IF rcv_tran_id IS NOT NULL THEN
5988: IF p_receipt_code = 'RECEIPT' OR p_receipt_code = 'PACKING_SLIP' THEN -- RECEIPT and PACKING_SLIP
5989: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'branch p_receipt_code: ' || p_receipt_code );
5985: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'p_rematch: ' || p_rematch );
5986:
5987: IF rcv_tran_id IS NOT NULL THEN
5988: IF p_receipt_code = 'RECEIPT' OR p_receipt_code = 'PACKING_SLIP' THEN -- RECEIPT and PACKING_SLIP
5989: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'branch p_receipt_code: ' || p_receipt_code );
5990:
5991: FOR tax_lines1_rec IN tax_lines1_cur(rcv_tran_id,for_org_id_rec.vendor_id) LOOP
5992:
5993: v_distribution_no :=1;
6030: open c_regime_tax_type(r_jai_regimes.regime_id, c_tax_rec.tax_type);
6031: fetch c_regime_tax_type into r_service_regime_tax_type;
6032: close c_regime_tax_type;
6033:
6034: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6035: ' Service regime: '||r_service_regime_tax_type.tax_type);
6036:
6037: /* Fetch ship_to_location_id and ship_to_organization_id from po_line_locations */
6038: ln_ship_to_organization_id := null;
6062: p_tax_type => c_tax_rec.tax_type,
6063: p_account_name => GV_INTERIM_LIABILITY
6064: );
6065:
6066: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6067: ' Regime type , CCID ,v_dist_ccid_liability'
6068: || r_service_regime_tax_type.tax_type
6069: ||', ' || v_dist_code_combination_id || ', ' || v_dist_ccid_liability);
6070: end if;
6102: ln_nrec_tax_amt := null;
6103: --reverse charge service tax only exclusive tax.
6104: ln_lines_to_insert := 1; -- Loop controller to insert more than one lines for partially recoverable tax lines in PO
6105:
6106: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6107: 'tax_lines1_rec.modvat_flag ='||tax_lines1_rec.modvat_flag ||',c_tax_rec.mod_cr_percentage='||c_tax_rec.mod_cr_percentage);
6108:
6109: if tax_lines1_rec.modvat_flag = jai_constants.YES
6110: and nvl(c_tax_rec.mod_cr_percentage, -1) > 0
6120: ln_nrec_tax_amt := round ( nvl(v_tax_amount,0) - nvl(ln_rec_tax_amt,0) , c_tax_rec.rounding_factor) ;
6121: lv_tax_type := 'PR';
6122: end if;
6123:
6124: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6125: 'ln_lines_to_insert='||ln_lines_to_insert||
6126: ',ln_rec_tax_amt='||ln_rec_tax_amt ||
6127: ',ln_nrec_tax_amt='||ln_nrec_tax_amt
6128: );
6174: END IF; --line = 1
6175: ELSE
6176: --reverse charge service tax should no inclusive tax.
6177: --CONTINUE;
6178: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_ERROR, GV_MODULE_PREFIX || '.' || l_api_name,
6179: 'For reverse charge service, should only be exclusive tax. Tax ID: ' || tax_lines1_rec.tax_id);
6180: END IF; --(NVL(r_tax_lines_r ec.inc_tax_flag,'N') = 'N')
6181:
6182:
6186: -- are allowed to be inserted into Ap Lines and Dist Lines
6187: --2.All taxes need to be inserted into jai tax tables. Futher the
6188: -- partially recoverable tax need to be splitted into 2 lines
6189: ln_inv_line_num := ln_inv_line_num + 1;
6190: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Before inserting into ap_invoice_lines_all for line no :'|| ln_inv_line_num );
6191:
6192: ap_invoice_lines_all_rec := NULL;
6193: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
6194: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
6226:
6227: open c_get_invoice_distribution;
6228: fetch c_get_invoice_distribution into v_invoice_distribution_id;
6229: close c_get_invoice_distribution;
6230: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Before inserting into ap_invoice_distributions_all for Invoice distribution id:'|| v_invoice_distribution_id );
6231:
6232: ap_invoice_dist_all_rec := NULL;
6233: ap_invoice_dist_all_rec.accounting_date := rec_max_ap_lines_all.accounting_date;
6234: ap_invoice_dist_all_rec.accrual_posted_flag := 'N';
6295: END IF;
6296: Insert_ap_inv_dst_line(ap_invoice_dist_all_rec);
6297:
6298:
6299: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Before inserting into JAI_AP_MATCH_INV_TAXES');
6300: INSERT INTO JAI_AP_MATCH_INV_TAXES
6301: (
6302: tax_distribution_id,
6303: exchange_rate_variance,
6376:
6377: END LOOP; --> line in 1..ln_lines_to_insert
6378:
6379: ln_inv_line_num := ln_inv_line_num + 1;
6380: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'@@Before inserting liability lines into ap_invoice_lines_all for line no :'|| ln_inv_line_num ||' tax amount = '||v_tax_amount_liability);
6381:
6382: ap_invoice_lines_all_rec := NULL;
6383: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
6384: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
6417:
6418: open c_get_invoice_distribution;
6419: fetch c_get_invoice_distribution into v_invoice_distribution_id;
6420: close c_get_invoice_distribution;
6421: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6422: '@Before inserting liability line into ap_invoice_distributions_all for distribution no :' || v_invoice_distribution_id);
6423:
6424: ap_invoice_dist_all_rec := NULL;
6425: ap_invoice_dist_all_rec.accounting_date := rec_max_ap_lines_all.accounting_date;
6501:
6502: --IF rcv_tran_id IS NOT NULL THEN
6503: -- to be fired when po_line_locations_all.match_option = 'P'
6504:
6505: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Fired when rcv_tran_id IS NULL, match_option is P');
6506:
6507: -- fetch shipment_num from rcv_headers_interface based on invoice_num
6508: -- pramasub start for isupplier IL FP
6509: -- local cursor to fetch shipment number
6574: open c_regime_tax_type(r_jai_regimes.regime_id, c_tax_rec.tax_type);
6575: fetch c_regime_tax_type into r_service_regime_tax_type;
6576: close c_regime_tax_type;
6577:
6578: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6579: ' Service regime: '||r_service_regime_tax_type.tax_type);
6580:
6581: /* Fetch ship_to_location_id and ship_to_organization_id from po_line_locations */
6582: ln_ship_to_organization_id := null;
6606: p_tax_type => c_tax_rec.tax_type,
6607: p_account_name => GV_INTERIM_LIABILITY
6608: );
6609:
6610: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6611: ' Regime type , CCID ,v_dist_ccid_liability'
6612: || r_service_regime_tax_type.tax_type
6613: ||', ' || v_dist_code_combination_id || ', ' || v_dist_ccid_liability);
6614: end if;
6635: ln_rec_tax_amt := null;
6636: ln_nrec_tax_amt := null;
6637: ln_lines_to_insert := 1; -- Loop controller to insert more than one lines for partially recoverable tax lines in PO
6638:
6639: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6640: 'i.modvat_flag ='||i.modvat_flag ||',c_tax_rec.mod_cr_percentage='||c_tax_rec.mod_cr_percentage);
6641:
6642: if i.modvat_flag = jai_constants.YES
6643: and nvl(c_tax_rec.mod_cr_percentage, -1) > 0
6653:
6654: lv_tax_type := 'PR';
6655: end if;
6656:
6657: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6658: 'ln_lines_to_insert='||ln_lines_to_insert||
6659: ',ln_rec_tax_amt='||ln_rec_tax_amt ||
6660: ',ln_nrec_tax_amt='||ln_nrec_tax_amt
6661: );
6705:
6706: END IF; --line = 1
6707: ELSE --inclusive
6708: --CONTINUE;
6709: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_ERROR, GV_MODULE_PREFIX || '.' || l_api_name,
6710: 'For reverse charge service, should only be exclusive tax. Tax ID: ' || i.tax_id);
6711: END IF; --(NVL(r_tax_lines_r ec.inc_tax_flag,'N') = 'N')
6712:
6713: --insert exclusive tax to the ap tables
6716: -- are inserted into Ap Lines and Dist Lines
6717: --2.All taxes need to be inserted into jai tax tables. Futher the
6718: -- partially recoverable tax need to be splitted into 2 lines
6719: ln_inv_line_num := ln_inv_line_num + 1;
6720: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Before inserting into ap_invoice_lines_all for line no :'|| ln_inv_line_num );
6721:
6722: ap_invoice_lines_all_rec := NULL;
6723: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
6724: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
6756:
6757: open c_get_invoice_distribution;
6758: fetch c_get_invoice_distribution into v_invoice_distribution_id;
6759: close c_get_invoice_distribution;
6760: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'Before inserting into ap_invoice_distributions_all for Invoice distribution id:'|| v_invoice_distribution_id );
6761:
6762: ap_invoice_dist_all_rec := NULL;
6763: ap_invoice_dist_all_rec.accounting_date := rec_max_ap_lines_all.accounting_date;
6764: ap_invoice_dist_all_rec.accrual_posted_flag := 'N';
6825: END IF;
6826: Insert_ap_inv_dst_line(ap_invoice_dist_all_rec);
6827:
6828:
6829: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6830: 'Before inserting into JAI_AP_MATCH_INV_TAXES tax id ' || i.tax_id );
6831: INSERT INTO JAI_AP_MATCH_INV_TAXES
6832: (
6833: tax_distribution_id,
6908: , i.tax_line_no
6909: );
6910: END LOOP; --> for line in
6911: ln_inv_line_num := ln_inv_line_num + 1;
6912: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,'@@Before inserting liability lines into ap_invoice_lines_all for line no :'|| ln_inv_line_num ||' tax amount = '||lv_tax_line_amount);
6913:
6914: ap_invoice_lines_all_rec := NULL;
6915: ap_invoice_lines_all_rec.INVOICE_ID := inv_id;
6916: ap_invoice_lines_all_rec.LINE_NUMBER := ln_inv_line_num;
6949:
6950: open c_get_invoice_distribution;
6951: fetch c_get_invoice_distribution into v_invoice_distribution_id;
6952: close c_get_invoice_distribution;
6953: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
6954: '@Before inserting liability line into ap_invoice_distributions_all for distribution no :' || v_invoice_distribution_id);
6955:
6956: ap_invoice_dist_all_rec := NULL;
6957: ap_invoice_dist_all_rec.accounting_date := rec_max_ap_lines_all.accounting_date;
7037:
7038: if v_dist_reversal_cnt = 0 then
7039: v_statement_no := '66';
7040:
7041: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name,
7042: 'update_payment_schedule(cum_tax_amt): amount add' || cum_tax_amt);
7043:
7044: v_update_payment_schedule:=update_payment_schedule(cum_tax_amt);
7045:
7064:
7065: err_mesg :=
7066: 'This procedure should be called for RCV_MATCHING only, the input parameter is : '
7067: || p_rematch;
7068: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name,
7069: 'This procedure should be called for RCV_MATCHING only, the input parameter is : ' || p_rematch);
7070: RETURN;
7071:
7072: END IF; -- if rcv_tran_id is not null
7072: END IF; -- if rcv_tran_id is not null
7073:
7074: END IF; -- 'PAY_ON_RECEIPT'
7075:
7076: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
7077: EXCEPTION
7078: WHEN OTHERS THEN
7079: err_mesg := SQLERRM;
7080: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'SQLERRM -> '|| SQLERRM ||', SQLCODE -> '||SQLCODE);
7076: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_PROCEDURE, GV_MODULE_PREFIX || '.' || l_api_name ||'.END', G_PKG_NAME || ': '|| l_api_name || '()-');
7077: EXCEPTION
7078: WHEN OTHERS THEN
7079: err_mesg := SQLERRM;
7080: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'SQLERRM -> '|| SQLERRM ||', SQLCODE -> '||SQLCODE);
7081: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Statement -> '|| v_statement_no);
7082: RETURN;
7083: END process_batch_record;
7084:
7077: EXCEPTION
7078: WHEN OTHERS THEN
7079: err_mesg := SQLERRM;
7080: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'SQLERRM -> '|| SQLERRM ||', SQLCODE -> '||SQLCODE);
7081: jai_cmn_utils_pkg.WRITE_FND_LOG(G_LEVEL_STATEMENT, GV_MODULE_PREFIX || '.' || l_api_name, 'Statement -> '|| v_statement_no);
7082: RETURN;
7083: END process_batch_record;
7084:
7085: END JAI_AP_ST_REVERSE_PROCESS;