785: DBMS_SQL.COLUMN_VALUE(v_CursorID_main, 68, v_transaction_batch_source);
786: DBMS_SQL.COLUMN_VALUE(v_CursorID_main, 69, v_ps_exchange_rate);
787:
788: -- Calculate correct Orignal Entered Funcional Amount
789: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
790: -- arp_util.calc_accounted_amount.
791: arp_util.calc_accounted_amount(l_currency_code,
792: NULL,
793: NULL,
786: DBMS_SQL.COLUMN_VALUE(v_CursorID_main, 69, v_ps_exchange_rate);
787:
788: -- Calculate correct Orignal Entered Funcional Amount
789: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
790: -- arp_util.calc_accounted_amount.
791: arp_util.calc_accounted_amount(l_currency_code,
792: NULL,
793: NULL,
794: v_ps_exchange_rate,
787:
788: -- Calculate correct Orignal Entered Funcional Amount
789: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
790: -- arp_util.calc_accounted_amount.
791: arp_util.calc_accounted_amount(l_currency_code,
792: NULL,
793: NULL,
794: v_ps_exchange_rate,
795: '-',
1095: IF v_amount_applied IS NOT NULL THEN
1096: v_open_entered_amount := v_amount_applied + v_open_entered_amount;
1097:
1098: -- Ensure we calculate Functional Acctd Amount correctly
1099: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
1100: -- arp_util.calc_accounted_amount.
1101:
1102: arp_util.calc_accounted_amount(l_currency_code,
1103: NULL,
1096: v_open_entered_amount := v_amount_applied + v_open_entered_amount;
1097:
1098: -- Ensure we calculate Functional Acctd Amount correctly
1099: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
1100: -- arp_util.calc_accounted_amount.
1101:
1102: arp_util.calc_accounted_amount(l_currency_code,
1103: NULL,
1104: NULL,
1098: -- Ensure we calculate Functional Acctd Amount correctly
1099: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
1100: -- arp_util.calc_accounted_amount.
1101:
1102: arp_util.calc_accounted_amount(l_currency_code,
1103: NULL,
1104: NULL,
1105: v_ps_exchange_rate,
1106: '-',