780: DBMS_SQL.COLUMN_VALUE(v_CursorID_main, 68, v_transaction_batch_source);
781: DBMS_SQL.COLUMN_VALUE(v_CursorID_main, 69, v_ps_exchange_rate);
782:
783: -- Calculate correct Orignal Entered Funcional Amount
784: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
785: -- arp_util.calc_accounted_amount.
786: arp_util.calc_accounted_amount(l_currency_code,
787: NULL,
788: NULL,
781: DBMS_SQL.COLUMN_VALUE(v_CursorID_main, 69, v_ps_exchange_rate);
782:
783: -- Calculate correct Orignal Entered Funcional Amount
784: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
785: -- arp_util.calc_accounted_amount.
786: arp_util.calc_accounted_amount(l_currency_code,
787: NULL,
788: NULL,
789: v_ps_exchange_rate,
782:
783: -- Calculate correct Orignal Entered Funcional Amount
784: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
785: -- arp_util.calc_accounted_amount.
786: arp_util.calc_accounted_amount(l_currency_code,
787: NULL,
788: NULL,
789: v_ps_exchange_rate,
790: '-',
1090: IF v_amount_applied IS NOT NULL THEN
1091: v_open_entered_amount := v_amount_applied + v_open_entered_amount;
1092:
1093: -- Ensure we calculate Functional Acctd Amount correctly
1094: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
1095: -- arp_util.calc_accounted_amount.
1096:
1097: arp_util.calc_accounted_amount(l_currency_code,
1098: NULL,
1091: v_open_entered_amount := v_amount_applied + v_open_entered_amount;
1092:
1093: -- Ensure we calculate Functional Acctd Amount correctly
1094: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
1095: -- arp_util.calc_accounted_amount.
1096:
1097: arp_util.calc_accounted_amount(l_currency_code,
1098: NULL,
1099: NULL,
1093: -- Ensure we calculate Functional Acctd Amount correctly
1094: --Bug 5041260 replaced the call arp_util.calc_acctd_amount with
1095: -- arp_util.calc_accounted_amount.
1096:
1097: arp_util.calc_accounted_amount(l_currency_code,
1098: NULL,
1099: NULL,
1100: v_ps_exchange_rate,
1101: '-',