APPS.IGIRCBAP dependencies on ARPCURR

Line 466: l_Amount := arpcurr.CurrRound( GlDistRecord.amount * l_term_fraction, l_currency_code );

462: FOR GlDistRecord IN gl_dist_cursor( l_customer_trx_id, p_type ) LOOP
463: IF l_FirstInstallmentFlag = 'Y' AND l_FirstInstallmentCode = 'INCLUDE' AND p_Type IN ('TAX','FREIGHT') THEN
464: l_Amount := GlDistRecord.Amount;
465: ELSE
466: l_Amount := arpcurr.CurrRound( GlDistRecord.amount * l_term_fraction, l_currency_code );
467: END IF;
468: l_Amount := nvl(l_Amount,0);
469: Amount( l_NextElement ) := l_Amount;
470: Source( l_NextElement ) := 'GL';

Line 878: NewAppToLine := arpcurr.CurrRound( CRD_Amount( CRD_i ) * GrandTotalApplied/

874: IF CRD_TotalAmount = 0
875: THEN
876: NewAppToLine := 0;
877: ELSE
878: NewAppToLine := arpcurr.CurrRound( CRD_Amount( CRD_i ) * GrandTotalApplied/
879: CRD_TotalAmount, p_Receipt.CurrencyCode );
880: -- if pro-rating formula comes up with an amount greater that the grandtotalapplied
881: -- just make the 2 amounts equal
882: -- Bug 1829871

Line 913: AcctdAppToLineThisTime := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

909: -- amount to apply this time is equal to what the total amount should
910: -- be, because there is not an existing appliation to the line
911: AppToLineThisTime := NewAppToLine;
912: END IF;
913: AcctdAppToLineThisTime := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
914: p_Amount, -- total of distributions reconciles to the applied amount
915: p_AcctdAmount,
916: AppToLineThisTime,
917: RunningAppToLineThisTime,

Line 949: AcctdAppToLineThisTime := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

945: THEN
946: NewAppToLine := GrandTotalApplied - RunningNewAppToLine;
947: RunningNewAppToLine := RunningNewAppToLine + NewAppToLine;
948: AppToLineThisTime := NewAppToLine - CBD_TotalUnallocatedAmt;
949: AcctdAppToLineThisTime := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
950: p_Amount, -- total of distributions reconciles to the applied amount
951: p_AcctdAmount,
952: AppToLineThisTime,
953: RunningAppToLineThisTime,

Line 1011: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

1007: AcctdAmount NUMBER;
1008: SurplusAmount NUMBER;
1009: BEGIN
1010: IF p_AppAmount.ChargesApplied <> 0 THEN
1011: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
1012: p_AppAmount.Amount,
1013: p_AppAmount.AcctdAmount,
1014: p_AppAmount.ChargesApplied,
1015: RunningTotalAmount,

Line 1022: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

1018: p_AppAmount.AmountAppFrom);
1019: END IF;
1020: --
1021: IF p_AppAmount.FreightApplied <> 0 THEN
1022: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
1023: p_AppAmount.Amount,
1024: p_AppAmount.AcctdAmount,
1025: p_AppAmount.FreightApplied,
1026: RunningTotalAmount,

Line 1033: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

1029: p_AppAmount.AmountAppFrom);
1030: END IF;
1031: --
1032: IF p_AppAmount.TaxApplied <> 0 THEN
1033: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
1034: p_AppAmount.Amount,
1035: p_AppAmount.AcctdAmount,
1036: p_AppAmount.TaxApplied,
1037: RunningTotalAmount,

Line 1044: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

1040: p_AppAmount.AmountAppFrom);
1041: END IF;
1042: --
1043: IF p_AppAmount.LineApplied <> 0 THEN
1044: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
1045: p_AppAmount.Amount,
1046: p_AppAmount.AcctdAmount,
1047: p_AppAmount.LineApplied,
1048: RunningTotalAmount,

Line 1064: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,

1060: IF SurplusAmount <> 0 THEN
1061: WritetoLog( l_state_level, 'DistributeLTFApplication','DistributeLTFApplication' );
1062: WritetoLog( l_excep_level, 'DistributeLTFApplication','LTF Charges doesn''t equal application amount for ra_id:'||p_App.ReceivableApplicationId );
1063: WritetoLog( l_state_level, 'DistributeLTFApplication','----------------------------------------' );
1064: AcctdAmount := arpcurr.ReconcileAcctdAmounts( p_Receipt.ExchangeRate,
1065: p_AppAmount.Amount,
1066: p_AppAmount.AcctdAmount,
1067: SurplusAmount,
1068: RunningTotalAmount,