[Home] [Help]
282: original_tax_amount --eric added for bug 6957519/6958938/6968839
283: , modified_tax_amount
284: , tax_id
285: FROM
286: jai_retro_tax_changes
287: WHERE line_change_id = pn_line_change_id;
288:
289: ln_tot_org_nr_tax_amt NUMBER :=0; --eric added for bug 6957519/6958938/6968839 on Apr 10,2008
290: ln_tot_modif_nr_tax_amt NUMBER :=0; --eric added for bug 6957519/6958938/6968839 on Apr 10,2008
417: original_tax_amount
418: , modified_tax_amount
419: , tax_id
420: FROM
421: jai_retro_tax_changes
422: WHERE line_change_id = pn_line_change_id
423: AND tax_type IN ( JAI_CONSTANTS.tax_type_excise
424: , JAI_CONSTANTS.tax_type_exc_additional
425: , JAI_CONSTANTS.tax_type_exc_other
434: original_tax_amount
435: , modified_tax_amount
436: , tax_id
437: FROM
438: jai_retro_tax_changes jrtc
439: WHERE EXISTS( SELECT
440: 'X'
441: FROM
442: JAI_RGM_DEFINITIONS jr
566: , nvl(jrtc.currency_code, jai_rcv_trx_processing_pkg.gv_func_curr) currency
567: , nvl(decode(pv_breakup_type, 'RG23D', 100, jtc.mod_cr_percentage), 0) mod_cr_percentage
568: , nvl(jtc.rounding_factor, 0) rnd
569: FROM
570: jai_retro_tax_changes jrtc
571: , jai_cmn_taxes_all jtc
572: , jai_retro_line_changes jrlc
573: WHERE jrlc.doc_line_id = pn_shipment_line_id
574: AND jrtc.line_change_id = jrlc.line_change_id
1425: WHERE shipment_line_id = pn_shipment_line_id
1426: AND transaction_type = 'DELIVER';
1427:
1428: ln_tax_diff_tot NUMBER;
1429: lv_currency Jai_Retro_Tax_Changes.Currency_Code%TYPE;
1430: ln_curr_conv_rate Rcv_Transactions.Currency_Conversion_Rate%TYPE;
1431: ln_organization_id Rcv_Transactions.Organization_Id%TYPE;
1432: ln_recv_acct_id Rcv_Parameters.Receiving_Account_Id%TYPE;
1433: ln_ap_accrual_acc Mtl_Parameters.Ap_Accrual_Account%TYPE;
1471: FND_FILE.PUT_LINE(fnd_file.log,'ln_curr_conv_rate '|| ln_curr_conv_rate);
1472: FND_FILE.PUT_LINE(fnd_file.log,'ln_organization_id '|| ln_organization_id);
1473: END IF; --l_proc_level>=l_dbg_level
1474:
1475: --Get the total tax difference from jai_retro_tax_changes for the shipment_line_id
1476: -- Get the difference in INR. Multiply with currency_conversion_rate of rcv_transactions
1477: -- if the tax is in Non INR currency
1478: SELECT
1479: SUM((modified_tax_amount - original_tax_amount) * DECODE(currency_code,'INR',1, ln_curr_conv_rate)) tax_diff_tot
1479: SUM((modified_tax_amount - original_tax_amount) * DECODE(currency_code,'INR',1, ln_curr_conv_rate)) tax_diff_tot
1480: INTO
1481: ln_tax_diff_tot
1482: FROM
1483: Jai_Retro_Tax_Changes
1484: WHERE line_change_id = pn_line_change_id ;/*rchandan. removed sub query and replaced with pn_line_change_id*/
1485:
1486: IF (ln_proc_level >= ln_dbg_level)
1487: THEN
1822: WHERE rcv_rgm_line_id = pn_rcv_rgm_line_id
1823: AND tax_id = NVL(pn_tax_id,tax_id)
1824: AND claimed_amount IS NOT NULL;
1825:
1826: CURSOR jai_retro_tax_changes_cur
1827: IS
1828: SELECT
1829: *
1830: FROM
1827: IS
1828: SELECT
1829: *
1830: FROM
1831: jai_retro_tax_changes jrtc
1832: WHERE EXISTS ( SELECT
1833: 'X'
1834: FROM
1835: JAI_RGM_DEFINITIONS jr
1923: --Initialise ln_tot_instl_amt to zero. This is used to calculate the total installment amount difference
1924: ln_tot_clm_instl_amt :=0 ;
1925: ln_tot_instl_amt :=0 ;
1926:
1927: --LOOP through jai_retro_tax_changes where recoverable_flag is 'Y' and tax_type is one of tax types attached to VAT regime
1928: FOR jai_retor_tax_changes_rec IN jai_retro_tax_changes_cur
1929: LOOP
1930: -- calculate the recoverable portion of the difference in modified and original tax_amount
1931: -- Use mod_cr_percentage from jai_cmn_taxes_all
1924: ln_tot_clm_instl_amt :=0 ;
1925: ln_tot_instl_amt :=0 ;
1926:
1927: --LOOP through jai_retro_tax_changes where recoverable_flag is 'Y' and tax_type is one of tax types attached to VAT regime
1928: FOR jai_retor_tax_changes_rec IN jai_retro_tax_changes_cur
1929: LOOP
1930: -- calculate the recoverable portion of the difference in modified and original tax_amount
1931: -- Use mod_cr_percentage from jai_cmn_taxes_all
1932: ln_new_re_tax_amt := Get_Recoverable_Amount ( pn_tax_id => jai_retor_tax_changes_rec.tax_id
1983:
1984: ln_tot_clm_instl_amt := ln_tot_clm_instl_amt + ln_tax_claimed_diff_amount; -- Total change amount claimed for this receipt
1985:
1986: ln_tot_instl_amt := ln_tot_instl_amt + ln_diff_re_tax_amt; -- Total change in installment amounts
1987: END LOOP; -- (jai_retor_tax_changes_rec IN jai_retro_tax_changes_cur)
1988:
1989: IF ln_tot_instl_amt <> 0
1990: THEN
1991: --Update jai_rcv_rgm_lines to increment recoverable_amount
2094: END IF;
2095:
2096: lv_reference_10 := 'India Local Retroactive VAT Claim Entries For Receipt:'||lv_receipt_number;
2097: lv_reference_23 := 'JAI_RETRO_PRC_PKG.DO_VAT_CLAIM';
2098: lv_reference_24 := 'JAI_RETRO_TAX_CHANGES';
2099: lv_reference_25 := 'transaction_id';
2100: lv_reference_26 := pn_transaction_id;
2101:
2102: --Call the following procedure to debit the recovery account
2944: END IF; --l_proc_level>=l_dbg_level
2945:
2946: FOR jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur (rcv_transactions_rec.transaction_id)
2947: LOOP
2948: -- Insert into jai_retro_tax_changes
2949: INSERT INTO jai_retro_tax_changes
2950: ( tax_change_id
2951: , line_change_id
2952: , tax_line_no
2945:
2946: FOR jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur (rcv_transactions_rec.transaction_id)
2947: LOOP
2948: -- Insert into jai_retro_tax_changes
2949: INSERT INTO jai_retro_tax_changes
2950: ( tax_change_id
2951: , line_change_id
2952: , tax_line_no
2953: , tax_id
2966: , last_updated_by
2967: , object_version_number
2968: )
2969: VALUES
2970: ( jai_retro_tax_changes_s.nextval --=> jai_retro_tax_changes_s.nextval
2971: , ln_retro_line_changes_id --=> from jai_retro_line_changes
2972: , jai_rcv_line_taxes_rec.tax_line_no --=> from jai_rcv_line_taxes
2973: , jai_rcv_line_taxes_rec.tax_id --=> from jai_rcv_line_taxes
2974: , jai_rcv_line_taxes_rec.tax_name --=> from jai_rcv_line_taxes
2989: END LOOP;-- (jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur)
2990:
2991: IF (ln_proc_level >= ln_dbg_level)
2992: THEN
2993: FND_FILE.PUT_LINE(fnd_file.log, ' Table jai_retro_tax_changes inserted ');
2994: END IF; --l_proc_level>=l_dbg_level
2995:
2996: --calc_new_line_amount
2997: ln_recv_line_amount := jai_retro_line_change_rec.modified_unit_price
3073:
3074: -- print the new total tax amount of the receipt
3075: Fnd_File.Put_Line(FND_FILE.LOG,' New total tax amount of the receipt '||jai_rcv_lines_rec.receipt_num||' IS :' ||ln_recv_tax_amount);
3076:
3077: -- After recalculating the tax ,updat the modified_tax_amount of jai_retro_tax_changes table
3078: FOR jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur (rcv_transactions_rec.transaction_id)
3079: LOOP
3080: -- Update the new tax amount in modified_tax_amount column of jai_retro_tax_changes
3081: UPDATE
3076:
3077: -- After recalculating the tax ,updat the modified_tax_amount of jai_retro_tax_changes table
3078: FOR jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur (rcv_transactions_rec.transaction_id)
3079: LOOP
3080: -- Update the new tax amount in modified_tax_amount column of jai_retro_tax_changes
3081: UPDATE
3082: jai_retro_tax_changes jrtc
3083: SET
3084: modified_tax_amount = ( SELECT tax_amount
3078: FOR jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur (rcv_transactions_rec.transaction_id)
3079: LOOP
3080: -- Update the new tax amount in modified_tax_amount column of jai_retro_tax_changes
3081: UPDATE
3082: jai_retro_tax_changes jrtc
3083: SET
3084: modified_tax_amount = ( SELECT tax_amount
3085: FROM jai_rcv_line_taxes jrlt
3086: WHERE jrlt.shipment_header_id = jai_rcv_lines_rec.shipment_header_id
3091: AND tax_line_no = jai_rcv_line_taxes_rec.tax_line_no
3092: AND tax_id = jai_rcv_line_taxes_rec.tax_id ;
3093: END LOOP; --jai_rcv_line_taxes_rec IN get_jai_rcv_line_taxes_cur
3094:
3095: Fnd_File.Put_Line(FND_FILE.LOG,' New tax has been updated to the table jai_retro_tax_changes ');
3096:
3097: Get_Vat_CenVat_Amount
3098: ( pn_line_change_id => ln_retro_line_changes_id
3099: , xn_re_vat_amount => ln_re_vat_amount
3581: FOR tax_rec IN cur_loc_line_taxes
3582: LOOP
3583: BEGIN
3584: SELECT
3585: JAI_RETRO_TAX_CHANGES_S.NEXTVAL
3586: INTO
3587: ln_retro_tax_changes_id
3588: FROM dual;
3589: EXCEPTION
3604: lv_third_party_flag := 'Y';
3605: END IF;
3606:
3607: BEGIN
3608: INSERT INTO JAI_RETRO_TAX_CHANGES
3609: ( TAX_CHANGE_ID
3610: , LINE_CHANGE_ID
3611: , TAX_LINE_NO
3612: , TAX_ID
3691: pv_process_flag := 'SS';
3692: pv_process_message := '';
3693:
3694: UPDATE
3695: JAI_RETRO_TAX_CHANGES
3696: SET
3697: modified_tax_amount = pn_tax_amt
3698: , last_update_date = SYSDATE
3699: , last_updated_by = fnd_global.user_id