eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.ARP_MISC_CASH_DIST dependencies on ARP_GLOBAL

Line 79: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then

75: -- bec'z TAX line has same source_id as first AR DISTRIBUTION line
76: -- begin 1543658
77: --bug5655154, commented the accounting_method='ACCRUAL' check
78: --begin 1813186
79: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then
80: --end 1813186
81: BEGIN
82: SELECT line_id into l_ard_line_id
83: FROM ar_distributions

Line 254: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then

250: arp_standard.debug('arp_process_receipts.insert_mcd_rec()+');
251: END IF;
252: --bug5655154, commented accounting_method ='ACCRUAL'
253: --begin 1813186
254: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then
255: --end 1813186
256:
257:
258: -- check if calling form is compatible with entity handler

Line 309: if (arp_global.base_min_acc_unit is null) then

305: else
306: l_mcd_rec.amount := round(l_cr_rec.amount* (p_percent/100)/l_min_unit)*l_min_unit;
307: end if;
308:
309: if (arp_global.base_min_acc_unit is null) then
310: l_mcd_rec.acctd_amount := round((l_cr_rec.amount * p_percent/100) * nvl(l_cr_rec.exchange_rate ,1),
311: arp_global.base_precision);
312: else
313: l_mcd_rec.acctd_amount := round(l_cr_rec.amount* (p_percent/100) * nvl(l_cr_rec.exchange_rate ,1)

Line 311: arp_global.base_precision);

307: end if;
308:
309: if (arp_global.base_min_acc_unit is null) then
310: l_mcd_rec.acctd_amount := round((l_cr_rec.amount * p_percent/100) * nvl(l_cr_rec.exchange_rate ,1),
311: arp_global.base_precision);
312: else
313: l_mcd_rec.acctd_amount := round(l_cr_rec.amount* (p_percent/100) * nvl(l_cr_rec.exchange_rate ,1)
314: / arp_global.base_precision) * arp_global.base_precision;
315: end if;

Line 314: / arp_global.base_precision) * arp_global.base_precision;

310: l_mcd_rec.acctd_amount := round((l_cr_rec.amount * p_percent/100) * nvl(l_cr_rec.exchange_rate ,1),
311: arp_global.base_precision);
312: else
313: l_mcd_rec.acctd_amount := round(l_cr_rec.amount* (p_percent/100) * nvl(l_cr_rec.exchange_rate ,1)
314: / arp_global.base_precision) * arp_global.base_precision;
315: end if;
316: IF PG_DEBUG in ('Y', 'C') THEN
317: arp_standard.debug( 'l_mcd_rec.amount :='||to_char(l_mcd_rec.amount));
318: arp_standard.debug( 'l_mcd_rec.acctd_amount:='||

Line 377: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;

373: l_mcd_rec.attribute15 := p_attribute15;
374: -- l_mcd_rec.acctd_amount := p_acctd_amount;
375: l_mcd_rec.ussgl_transaction_code := p_ussgl_tc;
376: l_mcd_rec.posting_control_id := -3; -- not posted;
377: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;
378: l_mcd_rec.code_combination_id := p_code_combination_id;
379: l_mcd_rec.created_from := 'ARRERCT';
380:
381:

Line 408: if (arp_global.base_min_acc_unit is null) then

404:
405: IF sign(p_amount_ard) = -1 THEN -- Debits for Ar distribution
406:
407: l_ard_rec.amount_dr := abs(p_amount_ard);
408: if (arp_global.base_min_acc_unit is null) then
409: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard) *nvl(l_cr_rec.exchange_rate,1),
410: arp_global.base_precision);
411:
412: else

Line 410: arp_global.base_precision);

406:
407: l_ard_rec.amount_dr := abs(p_amount_ard);
408: if (arp_global.base_min_acc_unit is null) then
409: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard) *nvl(l_cr_rec.exchange_rate,1),
410: arp_global.base_precision);
411:
412: else
413: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)*nvl(l_cr_rec.exchange_rate,1)
414: /arp_global.base_precision)*arp_global.base_precision;

Line 414: /arp_global.base_precision)*arp_global.base_precision;

410: arp_global.base_precision);
411:
412: else
413: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)*nvl(l_cr_rec.exchange_rate,1)
414: /arp_global.base_precision)*arp_global.base_precision;
415: end if;
416:
417:
418: l_ard_rec.amount_cr := NULL;

Line 424: if (arp_global.base_min_acc_unit is null) then

420:
421: ELSE -- Credits for Ar distribution
422:
423: l_ard_rec.amount_cr := p_amount_ard;
424: if (arp_global.base_min_acc_unit is null) then
425: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard) *nvl(l_cr_rec.exchange_rate,1),
426: arp_global.base_precision);
427:
428: else

Line 426: arp_global.base_precision);

422:
423: l_ard_rec.amount_cr := p_amount_ard;
424: if (arp_global.base_min_acc_unit is null) then
425: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard) *nvl(l_cr_rec.exchange_rate,1),
426: arp_global.base_precision);
427:
428: else
429: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)*nvl(l_cr_rec.exchange_rate,1)
430: /arp_global.base_precision)*arp_global.base_precision;

Line 430: /arp_global.base_precision)*arp_global.base_precision;

426: arp_global.base_precision);
427:
428: else
429: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)*nvl(l_cr_rec.exchange_rate,1)
430: /arp_global.base_precision)*arp_global.base_precision;
431: end if;
432: l_ard_rec.amount_dr := NULL;
433: l_ard_rec.acctd_amount_dr := NULL;
434:

Line 487: if (arp_global.base_min_acc_unit is null) then

483: UNION
484: select 0 from dual);
485:
486:
487: if (arp_global.base_min_acc_unit is null) then
488: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
489: *nvl(l_cr_rec.exchange_rate,1),
490: arp_global.base_precision);
491:

Line 490: arp_global.base_precision);

486:
487: if (arp_global.base_min_acc_unit is null) then
488: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
489: *nvl(l_cr_rec.exchange_rate,1),
490: arp_global.base_precision);
491:
492: l_ard_tax_rec.acctd_amount_cr:= round(l_ard_tax_rec.amount_cr
493: *nvl(l_cr_rec.exchange_rate,1),
494: arp_global.base_precision);

Line 494: arp_global.base_precision);

490: arp_global.base_precision);
491:
492: l_ard_tax_rec.acctd_amount_cr:= round(l_ard_tax_rec.amount_cr
493: *nvl(l_cr_rec.exchange_rate,1),
494: arp_global.base_precision);
495: else
496: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
497: *nvl(l_cr_rec.exchange_rate,1)
498: /arp_global.base_precision)

Line 498: /arp_global.base_precision)

494: arp_global.base_precision);
495: else
496: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
497: *nvl(l_cr_rec.exchange_rate,1)
498: /arp_global.base_precision)
499: *arp_global.base_precision;
500:
501: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
502: *nvl(l_cr_rec.exchange_rate,1)

Line 499: *arp_global.base_precision;

495: else
496: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
497: *nvl(l_cr_rec.exchange_rate,1)
498: /arp_global.base_precision)
499: *arp_global.base_precision;
500:
501: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
502: *nvl(l_cr_rec.exchange_rate,1)
503: /arp_global.base_precision)

Line 503: /arp_global.base_precision)

499: *arp_global.base_precision;
500:
501: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
502: *nvl(l_cr_rec.exchange_rate,1)
503: /arp_global.base_precision)
504: *arp_global.base_precision;
505:
506: end if;
507: DELETE FROM ar_distributions

Line 504: *arp_global.base_precision;

500:
501: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
502: *nvl(l_cr_rec.exchange_rate,1)
503: /arp_global.base_precision)
504: *arp_global.base_precision;
505:
506: end if;
507: DELETE FROM ar_distributions
508: WHERE source_table = 'MCD' AND

Line 532: if (arp_global.base_min_acc_unit is null) then

528: -- the present receipt in a plsql table
529: update_flag:='N';
530: FOR cr_ard_rec IN cr_ard_cur(l_mcd_id,l_cr_rec.cash_receipt_id) LOOP
531: ard_tbl_ctr := ard_tbl_ctr + 1;
532: if (arp_global.base_min_acc_unit is null) then
533: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr*
534: nvl(l_cr_rec.exchange_rate,1),
535: arp_global.base_precision);
536:

Line 535: arp_global.base_precision);

531: ard_tbl_ctr := ard_tbl_ctr + 1;
532: if (arp_global.base_min_acc_unit is null) then
533: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr*
534: nvl(l_cr_rec.exchange_rate,1),
535: arp_global.base_precision);
536:
537: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr
538: *nvl(l_cr_rec.exchange_rate,1),
539: arp_global.base_precision);

Line 539: arp_global.base_precision);

535: arp_global.base_precision);
536:
537: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr
538: *nvl(l_cr_rec.exchange_rate,1),
539: arp_global.base_precision);
540: else
541: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr
542: *nvl(l_cr_rec.exchange_rate,1)
543: /arp_global.base_precision)

Line 543: /arp_global.base_precision)

539: arp_global.base_precision);
540: else
541: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr
542: *nvl(l_cr_rec.exchange_rate,1)
543: /arp_global.base_precision)
544: *arp_global.base_precision;
545: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*
546: nvl(l_cr_rec.exchange_rate,1)
547: /arp_global.base_precision)

Line 544: *arp_global.base_precision;

540: else
541: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr
542: *nvl(l_cr_rec.exchange_rate,1)
543: /arp_global.base_precision)
544: *arp_global.base_precision;
545: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*
546: nvl(l_cr_rec.exchange_rate,1)
547: /arp_global.base_precision)
548: *arp_global.base_precision;

Line 547: /arp_global.base_precision)

543: /arp_global.base_precision)
544: *arp_global.base_precision;
545: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*
546: nvl(l_cr_rec.exchange_rate,1)
547: /arp_global.base_precision)
548: *arp_global.base_precision;
549:
550: end if;
551: ard_tbl_tbl(ard_tbl_ctr) := cr_ard_rec;

Line 548: *arp_global.base_precision;

544: *arp_global.base_precision;
545: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*
546: nvl(l_cr_rec.exchange_rate,1)
547: /arp_global.base_precision)
548: *arp_global.base_precision;
549:
550: end if;
551: ard_tbl_tbl(ard_tbl_ctr) := cr_ard_rec;
552: update_flag:='Y';

Line 649: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;

645: l_mcd_rec.attribute15 := p_attribute15;
646: l_mcd_rec.acctd_amount := p_acctd_amount;
647: l_mcd_rec.ussgl_transaction_code := p_ussgl_tc;
648: l_mcd_rec.posting_control_id := -3; -- not posted;
649: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;
650: l_mcd_rec.code_combination_id := p_code_combination_id;
651: l_mcd_rec.created_from := 'ARRERCT';
652:
653:

Line 797: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then

793: arp_standard.debug('arp_process_receipts.update_mcd_rec()+');
794: END IF;
795: --bug5655154, commented accounting_method = 'ACCRUAL'
796: --begin 1813186
797: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then
798: --end 1813186
799:
800:
801: -- check if calling form is compatible with entity handler

Line 855: if (arp_global.base_min_acc_unit is null) then

851: else
852: l_mcd_rec.amount := round(l_cr_rec.amount* (p_percent/100)/l_min_unit)*l_min_unit;
853: end if;
854:
855: if (arp_global.base_min_acc_unit is null) then
856: l_mcd_rec.acctd_amount := round((l_cr_rec.amount * p_percent/100) * nvl(l_cr_rec.exchange_rate ,1),
857: arp_global.base_precision);
858: else
859: l_mcd_rec.acctd_amount := round(l_cr_rec.amount* (p_percent/100) * nvl(l_cr_rec.exchange_rate ,1)

Line 857: arp_global.base_precision);

853: end if;
854:
855: if (arp_global.base_min_acc_unit is null) then
856: l_mcd_rec.acctd_amount := round((l_cr_rec.amount * p_percent/100) * nvl(l_cr_rec.exchange_rate ,1),
857: arp_global.base_precision);
858: else
859: l_mcd_rec.acctd_amount := round(l_cr_rec.amount* (p_percent/100) * nvl(l_cr_rec.exchange_rate ,1)
860: / arp_global.base_precision) * arp_global.base_precision;
861: end if;

Line 860: / arp_global.base_precision) * arp_global.base_precision;

856: l_mcd_rec.acctd_amount := round((l_cr_rec.amount * p_percent/100) * nvl(l_cr_rec.exchange_rate ,1),
857: arp_global.base_precision);
858: else
859: l_mcd_rec.acctd_amount := round(l_cr_rec.amount* (p_percent/100) * nvl(l_cr_rec.exchange_rate ,1)
860: / arp_global.base_precision) * arp_global.base_precision;
861: end if;
862: IF PG_DEBUG in ('Y', 'C') THEN
863: arp_standard.debug('l_mcd_rec.amount :='||to_char(l_mcd_rec.amount));
864: arp_standard.debug('l_mcd_rec.acctd_amount :='||to_char(l_mcd_rec.acctd_amount));

Line 939: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;

935: l_mcd_rec.attribute15 := p_attribute15;
936: -- l_mcd_rec.acctd_amount := p_acctd_amount;
937: l_mcd_rec.ussgl_transaction_code := p_ussgl_tc;
938: -- l_mcd_rec.posting_control_id := -3; -- not posted;
939: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;
940: l_mcd_rec.code_combination_id := p_code_combination_id;
941: l_mcd_rec.created_from := 'ARRERCT';
942:
943: IF PG_DEBUG in ('Y', 'C') THEN

Line 974: if (arp_global.base_min_acc_unit is null) then

970:
971: IF sign(p_amount_ard) = -1 THEN -- Debits for Ar distribution
972:
973: l_ard_rec.amount_dr := abs(p_amount_ard);
974: if (arp_global.base_min_acc_unit is null) then
975: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)
976: *nvl(l_cr_rec.exchange_rate,1),
977: arp_global.base_precision);
978:

Line 977: arp_global.base_precision);

973: l_ard_rec.amount_dr := abs(p_amount_ard);
974: if (arp_global.base_min_acc_unit is null) then
975: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)
976: *nvl(l_cr_rec.exchange_rate,1),
977: arp_global.base_precision);
978:
979: else
980: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)
981: *nvl(l_cr_rec.exchange_rate,1)

Line 982: /arp_global.base_precision)

978:
979: else
980: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)
981: *nvl(l_cr_rec.exchange_rate,1)
982: /arp_global.base_precision)
983: *arp_global.base_precision;
984: end if;
985:
986:

Line 983: *arp_global.base_precision;

979: else
980: l_ard_rec.acctd_amount_dr := round(abs(p_amount_ard)
981: *nvl(l_cr_rec.exchange_rate,1)
982: /arp_global.base_precision)
983: *arp_global.base_precision;
984: end if;
985:
986:
987: l_ard_rec.amount_cr := NULL;

Line 993: if (arp_global.base_min_acc_unit is null) then

989:
990: ELSE -- Credits for Ar distribution
991:
992: l_ard_rec.amount_cr := p_amount_ard;
993: if (arp_global.base_min_acc_unit is null) then
994: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)
995: *nvl(l_cr_rec.exchange_rate,1),
996: arp_global.base_precision);
997:

Line 996: arp_global.base_precision);

992: l_ard_rec.amount_cr := p_amount_ard;
993: if (arp_global.base_min_acc_unit is null) then
994: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)
995: *nvl(l_cr_rec.exchange_rate,1),
996: arp_global.base_precision);
997:
998: else
999: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)
1000: *nvl(l_cr_rec.exchange_rate,1)

Line 1001: /arp_global.base_precision)

997:
998: else
999: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)
1000: *nvl(l_cr_rec.exchange_rate,1)
1001: /arp_global.base_precision)
1002: *arp_global.base_precision;
1003: end if;
1004: l_ard_rec.amount_dr := NULL;
1005: l_ard_rec.acctd_amount_dr := NULL;

Line 1002: *arp_global.base_precision;

998: else
999: l_ard_rec.acctd_amount_cr := round(abs(p_amount_ard)
1000: *nvl(l_cr_rec.exchange_rate,1)
1001: /arp_global.base_precision)
1002: *arp_global.base_precision;
1003: end if;
1004: l_ard_rec.amount_dr := NULL;
1005: l_ard_rec.acctd_amount_dr := NULL;
1006:

Line 1054: if (arp_global.base_min_acc_unit is null) then

1050: and reversal_gl_date is null
1051: UNION
1052: select 0 from dual);
1053:
1054: if (arp_global.base_min_acc_unit is null) then
1055: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
1056: *nvl(l_cr_rec.exchange_rate,1),
1057: arp_global.base_precision);
1058:

Line 1057: arp_global.base_precision);

1053:
1054: if (arp_global.base_min_acc_unit is null) then
1055: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
1056: *nvl(l_cr_rec.exchange_rate,1),
1057: arp_global.base_precision);
1058:
1059: l_ard_tax_rec.acctd_amount_cr:= round(l_ard_tax_rec.amount_cr
1060: *nvl(l_cr_rec.exchange_rate,1),
1061: arp_global.base_precision);

Line 1061: arp_global.base_precision);

1057: arp_global.base_precision);
1058:
1059: l_ard_tax_rec.acctd_amount_cr:= round(l_ard_tax_rec.amount_cr
1060: *nvl(l_cr_rec.exchange_rate,1),
1061: arp_global.base_precision);
1062: else
1063: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
1064: *nvl(l_cr_rec.exchange_rate,1)
1065: /arp_global.base_precision)

Line 1065: /arp_global.base_precision)

1061: arp_global.base_precision);
1062: else
1063: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
1064: *nvl(l_cr_rec.exchange_rate,1)
1065: /arp_global.base_precision)
1066: *arp_global.base_precision;
1067:
1068: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
1069: *nvl(l_cr_rec.exchange_rate,1)

Line 1066: *arp_global.base_precision;

1062: else
1063: l_ard_tax_rec.acctd_amount_dr := round(l_ard_tax_rec.amount_dr
1064: *nvl(l_cr_rec.exchange_rate,1)
1065: /arp_global.base_precision)
1066: *arp_global.base_precision;
1067:
1068: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
1069: *nvl(l_cr_rec.exchange_rate,1)
1070: /arp_global.base_precision)

Line 1070: /arp_global.base_precision)

1066: *arp_global.base_precision;
1067:
1068: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
1069: *nvl(l_cr_rec.exchange_rate,1)
1070: /arp_global.base_precision)
1071: *arp_global.base_precision;
1072:
1073: end if;
1074: l_ard_tax_rec_flag:='Y'; -- flag to check if we have tax record

Line 1071: *arp_global.base_precision;

1067:
1068: l_ard_tax_rec.acctd_amount_cr := round(l_ard_tax_rec.amount_cr
1069: *nvl(l_cr_rec.exchange_rate,1)
1070: /arp_global.base_precision)
1071: *arp_global.base_precision;
1072:
1073: end if;
1074: l_ard_tax_rec_flag:='Y'; -- flag to check if we have tax record
1075: EXCEPTION

Line 1091: if (arp_global.base_min_acc_unit is null) then

1087: update_flag:='N';
1088: FOR cr_ard_rec IN cr_ard_cur(p_misc_cash_distribution_id,l_cr_rec.cash_receipt_id) LOOP
1089: ard_tbl_ctr := ard_tbl_ctr + 1;
1090:
1091: if (arp_global.base_min_acc_unit is null) then
1092: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr *nvl(l_cr_rec.exchange_rate,1),
1093: arp_global.base_precision);
1094:
1095: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*nvl(l_cr_rec.exchange_rate,1),

Line 1093: arp_global.base_precision);

1089: ard_tbl_ctr := ard_tbl_ctr + 1;
1090:
1091: if (arp_global.base_min_acc_unit is null) then
1092: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr *nvl(l_cr_rec.exchange_rate,1),
1093: arp_global.base_precision);
1094:
1095: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*nvl(l_cr_rec.exchange_rate,1),
1096: arp_global.base_precision);
1097: else

Line 1096: arp_global.base_precision);

1092: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr *nvl(l_cr_rec.exchange_rate,1),
1093: arp_global.base_precision);
1094:
1095: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*nvl(l_cr_rec.exchange_rate,1),
1096: arp_global.base_precision);
1097: else
1098: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr*nvl(l_cr_rec.exchange_rate,1)
1099: /arp_global.base_precision)*arp_global.base_precision;
1100:

Line 1099: /arp_global.base_precision)*arp_global.base_precision;

1095: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*nvl(l_cr_rec.exchange_rate,1),
1096: arp_global.base_precision);
1097: else
1098: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr*nvl(l_cr_rec.exchange_rate,1)
1099: /arp_global.base_precision)*arp_global.base_precision;
1100:
1101: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*nvl(l_cr_rec.exchange_rate,1)
1102: /arp_global.base_precision)*arp_global.base_precision;
1103:

Line 1102: /arp_global.base_precision)*arp_global.base_precision;

1098: cr_ard_rec.acctd_amount_dr := round(cr_ard_rec.amount_dr*nvl(l_cr_rec.exchange_rate,1)
1099: /arp_global.base_precision)*arp_global.base_precision;
1100:
1101: cr_ard_rec.acctd_amount_cr := round(cr_ard_rec.amount_cr*nvl(l_cr_rec.exchange_rate,1)
1102: /arp_global.base_precision)*arp_global.base_precision;
1103:
1104: end if;
1105: ard_tbl_tbl(ard_tbl_ctr) := cr_ard_rec;
1106: update_flag:='Y';

Line 1217: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;

1213: l_mcd_rec.attribute15 := p_attribute15;
1214: l_mcd_rec.acctd_amount := p_acctd_amount;
1215: l_mcd_rec.ussgl_transaction_code := p_ussgl_tc;
1216: -- l_mcd_rec.posting_control_id := -3; -- not posted;
1217: l_mcd_rec.set_of_books_id := arp_global.set_of_books_id;
1218: l_mcd_rec.code_combination_id := p_code_combination_id;
1219: l_mcd_rec.created_from := 'ARRERCT';
1220:
1221: -- Call table handler for ar_misc_cash_distributions to update record.

Line 1334: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then

1330:
1331: arp_misc_cash_dist_pkg.nowaitlock_fetch_p(p_misc_cash_distribution_id, l_mcd_rec);
1332: --bug5655154, commented accounting_method = 'ACCRUAL' check
1333: --begin 1813186
1334: -- if arp_global.sysparam.accounting_method = 'ACCRUAL' then
1335: --end 1813186
1336:
1337: IF PG_DEBUG in ('Y', 'C') THEN
1338: arp_standard.debug('Begin lock Dist amount ');

Line 1599: arp_global.set_of_books_id,

1595: l_dummy,
1596: l_dummy);
1597: ELSE
1598: l_acctd_amount := gl_currency_api.convert_amount(
1599: arp_global.set_of_books_id,
1600: l_cr_rec.currency_code,
1601: l_cr_rec.exchange_date,
1602: l_cr_rec.exchange_rate_type,
1603: l_cr_rec.amount);

Line 1610: if (arp_global.base_min_acc_unit is null) then

1606: FOR cr_mcd_rec IN mcd_cur(p_cash_receipt_id) LOOP
1607: --tbl_ctr := tbl_ctr + 1; -- Commented for bug 2113787.
1608: if l_cr_rec.exchange_rate is not null then
1609: tbl_ctr := tbl_ctr + 1; -- Added for bug 2113787.
1610: if (arp_global.base_min_acc_unit is null) then
1611:
1612: cr_mcd_rec.acctd_amount := round(cr_mcd_rec.amount*nvl(l_cr_rec.exchange_rate ,1),
1613: arp_global.base_precision);
1614: else

Line 1613: arp_global.base_precision);

1609: tbl_ctr := tbl_ctr + 1; -- Added for bug 2113787.
1610: if (arp_global.base_min_acc_unit is null) then
1611:
1612: cr_mcd_rec.acctd_amount := round(cr_mcd_rec.amount*nvl(l_cr_rec.exchange_rate ,1),
1613: arp_global.base_precision);
1614: else
1615: cr_mcd_rec.acctd_amount := round(cr_mcd_rec.amount*nvl(l_cr_rec.exchange_rate ,1)
1616: / arp_global.base_precision) * arp_global.base_precision;
1617: end if;

Line 1616: / arp_global.base_precision) * arp_global.base_precision;

1612: cr_mcd_rec.acctd_amount := round(cr_mcd_rec.amount*nvl(l_cr_rec.exchange_rate ,1),
1613: arp_global.base_precision);
1614: else
1615: cr_mcd_rec.acctd_amount := round(cr_mcd_rec.amount*nvl(l_cr_rec.exchange_rate ,1)
1616: / arp_global.base_precision) * arp_global.base_precision;
1617: end if;
1618:
1619:
1620: --end if; Commented for bug 2113787.