557: --If p_breakup_type is RG23D, then total tax amount should be added to excise amount instead of taking
558: --mod_cr_percentage into consideration
559: ln_mod_problem_amt := 0;
560: ln_nonmod_problem_amt := 0;
561: ln_apportion_factor := jai_rcv_trx_processing_pkg.get_apportion_factor(pn_transaction_id);
562: FOR tax_rec IN (SELECT
563: jrtc.tax_type
564: , (jrtc.modified_tax_amount - jrtc.original_tax_amount) tax_amount
565: , nvl(jrtc.recoverable_flag, 'N') modvat_flag
562: FOR tax_rec IN (SELECT
563: jrtc.tax_type
564: , (jrtc.modified_tax_amount - jrtc.original_tax_amount) tax_amount
565: , nvl(jrtc.recoverable_flag, 'N') modvat_flag
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
576: AND jtc.tax_id = jrtc.tax_id
577: AND jrlc.line_change_id = pn_line_change_id
578: )
579: LOOP
580: IF tax_rec.currency <> jai_rcv_trx_processing_pkg.gv_func_curr
581: THEN
582: ln_curr_conv := NVL(pn_curr_conv_rate, 1);
583: ELSE
584: ln_curr_conv := 1;