428: x_curr_amount := 0 ;
429:
430:
431: -- Bug 1980810 : Added to set currency related global variables
432: -- Call to pa_currency.round_currency_amt function will use
433: -- global variables and thus improves performance
434:
435: pa_currency.set_currency_info;
436:
431: -- Bug 1980810 : Added to set currency related global variables
432: -- Call to pa_currency.round_currency_amt function will use
433: -- global variables and thus improves performance
434:
435: pa_currency.set_currency_info;
436:
437:
438: l_tab_ndx := 0 ;
439: valid_fp_tab.delete;
485: valid_fp_tab(l_tab_ndx).quantity := ROUND( ( recs.quantity * x_dist_percent)/100, 3 ) ;
486:
487: -- Bug 1980810 PA Rounding function added
488:
489: valid_fp_tab(l_tab_ndx).award_amount := pa_currency.round_currency_amt( ( recs.amount * x_dist_percent)/100);
490:
491: valid_fp_tab(l_tab_ndx).burdened_cost := pa_currency.round_currency_amt( (recs.burdened_cost * x_dist_percent)/100);
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
487: -- Bug 1980810 PA Rounding function added
488:
489: valid_fp_tab(l_tab_ndx).award_amount := pa_currency.round_currency_amt( ( recs.amount * x_dist_percent)/100);
490:
491: valid_fp_tab(l_tab_ndx).burdened_cost := pa_currency.round_currency_amt( (recs.burdened_cost * x_dist_percent)/100);
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
494: valid_fp_tab(l_tab_ndx).acct_raw_cost := pa_currency.round_currency_amt( (recs.acct_raw_cost * x_dist_percent)/100);
495: valid_fp_tab(l_tab_ndx).denom_raw_cost := pa_currency.round_currency_amt( (recs.denom_raw_cost * x_dist_percent)/100);
488:
489: valid_fp_tab(l_tab_ndx).award_amount := pa_currency.round_currency_amt( ( recs.amount * x_dist_percent)/100);
490:
491: valid_fp_tab(l_tab_ndx).burdened_cost := pa_currency.round_currency_amt( (recs.burdened_cost * x_dist_percent)/100);
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
494: valid_fp_tab(l_tab_ndx).acct_raw_cost := pa_currency.round_currency_amt( (recs.acct_raw_cost * x_dist_percent)/100);
495: valid_fp_tab(l_tab_ndx).denom_raw_cost := pa_currency.round_currency_amt( (recs.denom_raw_cost * x_dist_percent)/100);
496: valid_fp_tab(l_tab_ndx).receipt_currency_amount := pa_currency.round_currency_amt( (recs.receipt_currency_amount * x_dist_percent)/100) ;
489: valid_fp_tab(l_tab_ndx).award_amount := pa_currency.round_currency_amt( ( recs.amount * x_dist_percent)/100);
490:
491: valid_fp_tab(l_tab_ndx).burdened_cost := pa_currency.round_currency_amt( (recs.burdened_cost * x_dist_percent)/100);
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
494: valid_fp_tab(l_tab_ndx).acct_raw_cost := pa_currency.round_currency_amt( (recs.acct_raw_cost * x_dist_percent)/100);
495: valid_fp_tab(l_tab_ndx).denom_raw_cost := pa_currency.round_currency_amt( (recs.denom_raw_cost * x_dist_percent)/100);
496: valid_fp_tab(l_tab_ndx).receipt_currency_amount := pa_currency.round_currency_amt( (recs.receipt_currency_amount * x_dist_percent)/100) ;
497: ELSE --Bug 6754773
490:
491: valid_fp_tab(l_tab_ndx).burdened_cost := pa_currency.round_currency_amt( (recs.burdened_cost * x_dist_percent)/100);
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
494: valid_fp_tab(l_tab_ndx).acct_raw_cost := pa_currency.round_currency_amt( (recs.acct_raw_cost * x_dist_percent)/100);
495: valid_fp_tab(l_tab_ndx).denom_raw_cost := pa_currency.round_currency_amt( (recs.denom_raw_cost * x_dist_percent)/100);
496: valid_fp_tab(l_tab_ndx).receipt_currency_amount := pa_currency.round_currency_amt( (recs.receipt_currency_amount * x_dist_percent)/100) ;
497: ELSE --Bug 6754773
498: valid_fp_tab(l_tab_ndx).quantity := recs.quantity * x_dist_percent/100;
491: valid_fp_tab(l_tab_ndx).burdened_cost := pa_currency.round_currency_amt( (recs.burdened_cost * x_dist_percent)/100);
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
494: valid_fp_tab(l_tab_ndx).acct_raw_cost := pa_currency.round_currency_amt( (recs.acct_raw_cost * x_dist_percent)/100);
495: valid_fp_tab(l_tab_ndx).denom_raw_cost := pa_currency.round_currency_amt( (recs.denom_raw_cost * x_dist_percent)/100);
496: valid_fp_tab(l_tab_ndx).receipt_currency_amount := pa_currency.round_currency_amt( (recs.receipt_currency_amount * x_dist_percent)/100) ;
497: ELSE --Bug 6754773
498: valid_fp_tab(l_tab_ndx).quantity := recs.quantity * x_dist_percent/100;
499: /* Starts - Modified following columns derivation for bug#6822240 */
492: valid_fp_tab(l_tab_ndx).denom_burdened_cost := pa_currency.round_currency_amt( (recs.denom_burdened_cost * x_dist_percent)/100 );
493: valid_fp_tab(l_tab_ndx).acct_burdened_cost := pa_currency.round_currency_amt( (recs.acct_burdened_cost * x_dist_percent)/100);
494: valid_fp_tab(l_tab_ndx).acct_raw_cost := pa_currency.round_currency_amt( (recs.acct_raw_cost * x_dist_percent)/100);
495: valid_fp_tab(l_tab_ndx).denom_raw_cost := pa_currency.round_currency_amt( (recs.denom_raw_cost * x_dist_percent)/100);
496: valid_fp_tab(l_tab_ndx).receipt_currency_amount := pa_currency.round_currency_amt( (recs.receipt_currency_amount * x_dist_percent)/100) ;
497: ELSE --Bug 6754773
498: valid_fp_tab(l_tab_ndx).quantity := recs.quantity * x_dist_percent/100;
499: /* Starts - Modified following columns derivation for bug#6822240 */
500: valid_fp_tab(l_tab_ndx).award_amount :=
497: ELSE --Bug 6754773
498: valid_fp_tab(l_tab_ndx).quantity := recs.quantity * x_dist_percent/100;
499: /* Starts - Modified following columns derivation for bug#6822240 */
500: valid_fp_tab(l_tab_ndx).award_amount :=
501: pa_currency.round_currency_amt(recs.amount * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
502: valid_fp_tab(l_tab_ndx).burdened_cost :=
503: pa_currency.round_currency_amt(recs.burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
504: valid_fp_tab(l_tab_ndx).denom_burdened_cost :=
505: pa_currency.round_currency_amt( recs.denom_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
499: /* Starts - Modified following columns derivation for bug#6822240 */
500: valid_fp_tab(l_tab_ndx).award_amount :=
501: pa_currency.round_currency_amt(recs.amount * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
502: valid_fp_tab(l_tab_ndx).burdened_cost :=
503: pa_currency.round_currency_amt(recs.burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
504: valid_fp_tab(l_tab_ndx).denom_burdened_cost :=
505: pa_currency.round_currency_amt( recs.denom_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
506: valid_fp_tab(l_tab_ndx).acct_burdened_cost :=
507: pa_currency.round_currency_amt( recs.acct_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
501: pa_currency.round_currency_amt(recs.amount * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
502: valid_fp_tab(l_tab_ndx).burdened_cost :=
503: pa_currency.round_currency_amt(recs.burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
504: valid_fp_tab(l_tab_ndx).denom_burdened_cost :=
505: pa_currency.round_currency_amt( recs.denom_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
506: valid_fp_tab(l_tab_ndx).acct_burdened_cost :=
507: pa_currency.round_currency_amt( recs.acct_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
508: valid_fp_tab(l_tab_ndx).acct_raw_cost :=
509: pa_currency.round_currency_amt( recs.acct_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
503: pa_currency.round_currency_amt(recs.burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
504: valid_fp_tab(l_tab_ndx).denom_burdened_cost :=
505: pa_currency.round_currency_amt( recs.denom_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
506: valid_fp_tab(l_tab_ndx).acct_burdened_cost :=
507: pa_currency.round_currency_amt( recs.acct_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
508: valid_fp_tab(l_tab_ndx).acct_raw_cost :=
509: pa_currency.round_currency_amt( recs.acct_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
510: valid_fp_tab(l_tab_ndx).denom_raw_cost :=
511: pa_currency.round_currency_amt( recs.denom_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
505: pa_currency.round_currency_amt( recs.denom_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
506: valid_fp_tab(l_tab_ndx).acct_burdened_cost :=
507: pa_currency.round_currency_amt( recs.acct_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
508: valid_fp_tab(l_tab_ndx).acct_raw_cost :=
509: pa_currency.round_currency_amt( recs.acct_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
510: valid_fp_tab(l_tab_ndx).denom_raw_cost :=
511: pa_currency.round_currency_amt( recs.denom_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
512: valid_fp_tab(l_tab_ndx).receipt_currency_amount :=
513: pa_currency.round_currency_amt( recs.receipt_currency_amount * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
507: pa_currency.round_currency_amt( recs.acct_burdened_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
508: valid_fp_tab(l_tab_ndx).acct_raw_cost :=
509: pa_currency.round_currency_amt( recs.acct_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
510: valid_fp_tab(l_tab_ndx).denom_raw_cost :=
511: pa_currency.round_currency_amt( recs.denom_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
512: valid_fp_tab(l_tab_ndx).receipt_currency_amount :=
513: pa_currency.round_currency_amt( recs.receipt_currency_amount * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
514: /* ENds - Modified following columns derivation for bug#6809323 */
515: END if;
509: pa_currency.round_currency_amt( recs.acct_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
510: valid_fp_tab(l_tab_ndx).denom_raw_cost :=
511: pa_currency.round_currency_amt( recs.denom_raw_cost * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
512: valid_fp_tab(l_tab_ndx).receipt_currency_amount :=
513: pa_currency.round_currency_amt( recs.receipt_currency_amount * valid_fp_tab(l_tab_ndx).quantity/recs.quantity);
514: /* ENds - Modified following columns derivation for bug#6809323 */
515: END if;
516:
517: x_acc_qty := x_acc_qty + valid_fp_tab(l_tab_ndx).quantity ;