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_CALCULATE_DISCOUNT dependencies on ARP_STANDARD

Line 165: arp_standard.debug( 'arp_calculate_discount.calculate_discounts() +' );

161: --
162: BEGIN
163: --
164: IF PG_DEBUG in ('Y', 'C') THEN
165: arp_standard.debug( 'arp_calculate_discount.calculate_discounts() +' );
166: END IF;
167: -- ARTA Changes, calles TA version of calculate discount for TA
168: -- installation
169: IF nvl(arp_global.sysparam.ta_installed_flag,'N') = 'Y' THEN

Line 176: arp_standard.debug( 'MODE: DIRECT' );

172: ELSE
173: IF (p_mode = AR_DIRECT_DISC OR p_mode = AR_DIRECT_NEW_DISC)
174: THEN
175: IF PG_DEBUG in ('Y', 'C') THEN
176: arp_standard.debug( 'MODE: DIRECT' );
177: END IF;
178: ELSE
179: IF PG_DEBUG in ('Y', 'C') THEN
180: arp_standard.debug( 'MODE: DEFAULT' );

Line 180: arp_standard.debug( 'MODE: DEFAULT' );

176: arp_standard.debug( 'MODE: DIRECT' );
177: END IF;
178: ELSE
179: IF PG_DEBUG in ('Y', 'C') THEN
180: arp_standard.debug( 'MODE: DEFAULT' );
181: END IF;
182: END IF;
183: IF PG_DEBUG in ('Y', 'C') THEN
184: arp_standard.debug( 'p_default_amt_app:'||p_default_amt_app );

Line 184: arp_standard.debug( 'p_default_amt_app:'||p_default_amt_app );

180: arp_standard.debug( 'MODE: DEFAULT' );
181: END IF;
182: END IF;
183: IF PG_DEBUG in ('Y', 'C') THEN
184: arp_standard.debug( 'p_default_amt_app:'||p_default_amt_app );
185: arp_standard.debug( 'p_earned_both_flag:'||p_earned_both_flag );
186: arp_standard.debug( 'p_earned_disc_pct:'||p_earned_disc_pct );
187: END IF;
188: --

Line 185: arp_standard.debug( 'p_earned_both_flag:'||p_earned_both_flag );

181: END IF;
182: END IF;
183: IF PG_DEBUG in ('Y', 'C') THEN
184: arp_standard.debug( 'p_default_amt_app:'||p_default_amt_app );
185: arp_standard.debug( 'p_earned_both_flag:'||p_earned_both_flag );
186: arp_standard.debug( 'p_earned_disc_pct:'||p_earned_disc_pct );
187: END IF;
188: --
189: l_disc_rec.input_amt := p_input_amt;

Line 186: arp_standard.debug( 'p_earned_disc_pct:'||p_earned_disc_pct );

182: END IF;
183: IF PG_DEBUG in ('Y', 'C') THEN
184: arp_standard.debug( 'p_default_amt_app:'||p_default_amt_app );
185: arp_standard.debug( 'p_earned_both_flag:'||p_earned_both_flag );
186: arp_standard.debug( 'p_earned_disc_pct:'||p_earned_disc_pct );
187: END IF;
188: --
189: l_disc_rec.input_amt := p_input_amt;
190: IF PG_DEBUG in ('Y', 'C') THEN

Line 191: arp_standard.debug( 'Input amt = '||TO_CHAR( p_input_amt ) );

187: END IF;
188: --
189: l_disc_rec.input_amt := p_input_amt;
190: IF PG_DEBUG in ('Y', 'C') THEN
191: arp_standard.debug( 'Input amt = '||TO_CHAR( p_input_amt ) );
192: END IF;
193: --IF ( p_grace_days IS NOT NULL ) THEN
194: l_disc_rec.grace_days := p_grace_days;
195: --END IF;

Line 227: arp_standard.debug( 'p_close_invoice_flag:'||p_close_invoice_flag );

223: END IF;
224:
225:
226: IF PG_DEBUG in ('Y', 'C') THEN
227: arp_standard.debug( 'p_close_invoice_flag:'||p_close_invoice_flag );
228: END IF;
229:
230: -- Check input(ardckin). Exit with error if not all needed fields are
231: -- populated.

Line 233: arp_standard.debug( 'error_code = '||TO_CHAR( error_code ));

229:
230: -- Check input(ardckin). Exit with error if not all needed fields are
231: -- populated.
232: IF PG_DEBUG in ('Y', 'C') THEN
233: arp_standard.debug( 'error_code = '||TO_CHAR( error_code ));
234: END IF;
235: -- p_error_code := AR_M_FAILURE ;
236: -- arp_standard.debug( 'p_error_code = '||TO_CHAR( p_error_code )) ;
237: -- RETURN;

Line 236: -- arp_standard.debug( 'p_error_code = '||TO_CHAR( p_error_code )) ;

232: IF PG_DEBUG in ('Y', 'C') THEN
233: arp_standard.debug( 'error_code = '||TO_CHAR( error_code ));
234: END IF;
235: -- p_error_code := AR_M_FAILURE ;
236: -- arp_standard.debug( 'p_error_code = '||TO_CHAR( p_error_code )) ;
237: -- RETURN;
238:
239: IF PG_DEBUG in ('Y', 'C') THEN
240: arp_standard.debug( 'l_ps_rec.amount_due_remaining := '||

Line 240: arp_standard.debug( 'l_ps_rec.amount_due_remaining := '||

236: -- arp_standard.debug( 'p_error_code = '||TO_CHAR( p_error_code )) ;
237: -- RETURN;
238:
239: IF PG_DEBUG in ('Y', 'C') THEN
240: arp_standard.debug( 'l_ps_rec.amount_due_remaining := '||
241: TO_CHAR(l_ps_rec.amount_due_remaining ));
242: END IF;
243:
244: IF (p_select_flag = 'Y')

Line 247: arp_standard.debug( 'l_select_flag: TRUE' );

243:
244: IF (p_select_flag = 'Y')
245: THEN
246: IF PG_DEBUG in ('Y', 'C') THEN
247: arp_standard.debug( 'l_select_flag: TRUE' );
248: END IF;
249: l_select_flag := TRUE;
250: get_payment_schedule_info ( l_disc_rec, l_ps_rec );
251: ELSE

Line 253: arp_standard.debug( 'l_select_flag: FALSE' );

249: l_select_flag := TRUE;
250: get_payment_schedule_info ( l_disc_rec, l_ps_rec );
251: ELSE
252: IF PG_DEBUG in ('Y', 'C') THEN
253: arp_standard.debug( 'l_select_flag: FALSE' );
254: END IF;
255: l_select_flag := FALSE;
256: END IF;
257:

Line 292: arp_standard.debug( 'l_disc_rec.max_disc = '||

288: -- Calculate maximum remaining discount(ardmaxd) that may be taken for
289: -- this ps.
290: determine_max_allowed_disc ( p_mode, l_disc_rec, l_ps_rec );
291: IF PG_DEBUG in ('Y', 'C') THEN
292: arp_standard.debug( 'l_disc_rec.max_disc = '||
293: TO_CHAR( l_disc_rec.max_disc ) );
294: END IF;
295: --
296: --

Line 325: arp_standard.debug( 'p_out_earned_disc = '||TO_CHAR( p_out_earned_disc ));

321: /*Start FP Bug-5741063 Bug 5386459 extended fix to call procedure to decrease discount as per max allowed */
322: decrease_discounts_to_maxd(l_disc_rec, l_ps_rec, p_out_earned_disc,p_out_unearned_disc );
323: --
324: IF PG_DEBUG in ('Y', 'C') THEN
325: arp_standard.debug( 'p_out_earned_disc = '||TO_CHAR( p_out_earned_disc ));
326: arp_standard.debug( 'p_out_unearned_disc = '||TO_CHAR( p_out_unearned_disc ));
327: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
328: END IF;
329: --

Line 326: arp_standard.debug( 'p_out_unearned_disc = '||TO_CHAR( p_out_unearned_disc ));

322: decrease_discounts_to_maxd(l_disc_rec, l_ps_rec, p_out_earned_disc,p_out_unearned_disc );
323: --
324: IF PG_DEBUG in ('Y', 'C') THEN
325: arp_standard.debug( 'p_out_earned_disc = '||TO_CHAR( p_out_earned_disc ));
326: arp_standard.debug( 'p_out_unearned_disc = '||TO_CHAR( p_out_unearned_disc ));
327: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
328: END IF;
329: --
330: ELSE

Line 327: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));

323: --
324: IF PG_DEBUG in ('Y', 'C') THEN
325: arp_standard.debug( 'p_out_earned_disc = '||TO_CHAR( p_out_earned_disc ));
326: arp_standard.debug( 'p_out_unearned_disc = '||TO_CHAR( p_out_unearned_disc ));
327: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
328: END IF;
329: --
330: ELSE
331: IF PG_DEBUG in ('Y', 'C') THEN

Line 332: arp_standard.debug( 'Unknown Mode ' );

328: END IF;
329: --
330: ELSE
331: IF PG_DEBUG in ('Y', 'C') THEN
332: arp_standard.debug( 'Unknown Mode ' );
333: END IF;
334: RAISE ar_m_fail;
335: --p_error_code := AR_M_FAILURE ;
336: --RETURN;

Line 372: arp_standard.debug( 'amt_due_remaining = '||TO_CHAR( l_ps_rec.amount_due_remaining ) );

368: --
369: IF (p_mode = AR_DEFAULT_DISC OR p_mode = AR_DEFAULT_NEW_DISC)
370: THEN
371: IF PG_DEBUG in ('Y', 'C') THEN
372: arp_standard.debug( 'amt_due_remaining = '||TO_CHAR( l_ps_rec.amount_due_remaining ) );
373: END IF;
374: -- Fix bug 1164810, default amount applied when the profile
375: -- AR: Cash - Default Amount Applied OPTION is set to
376: -- Remaining Amount of the Invoice

Line 400: SELECT arp_standard.sysparm.partial_discount_flag

396:
397: /*For bug 2147188 populating the partial_pmt_flag correctly to
398: calculate the discount correctly*/
399:
400: SELECT arp_standard.sysparm.partial_discount_flag
401: INTO l_sys_disc_partial_pay_flag
402: FROM dual;
403:
404: /*--------------------------------------------------------------------+

Line 411: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);

407: |system option, then take the value from payment terms record |
408: *--------------------------------------------------------------------*/
409:
410: IF PG_DEBUG in ('Y', 'C') THEN
411: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);
412: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_disc_rec.disc_partial_pmt_flag);
413: END IF;
414:
415: IF NVL(l_sys_disc_partial_pay_flag,'N') = 'N' THEN

Line 412: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_disc_rec.disc_partial_pmt_flag);

408: *--------------------------------------------------------------------*/
409:
410: IF PG_DEBUG in ('Y', 'C') THEN
411: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);
412: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_disc_rec.disc_partial_pmt_flag);
413: END IF;
414:
415: IF NVL(l_sys_disc_partial_pay_flag,'N') = 'N' THEN
416: l_disc_rec.disc_partial_pmt_flag := 'N';

Line 422: arp_standard.debug( 'Partial Discount flag - Final = '|| l_disc_rec.disc_partial_pmt_flag);

418: null;
419: END IF;
420:
421: IF PG_DEBUG in ('Y', 'C') THEN
422: arp_standard.debug( 'Partial Discount flag - Final = '|| l_disc_rec.disc_partial_pmt_flag);
423: END IF;
424:
425: IF NVL(l_disc_rec.disc_partial_pmt_flag,'N')= 'Y' then
426: SELECT DECODE( fc.minimum_accountable_unit,

Line 482: arp_standard.debug( 'earned_disc = '||TO_CHAR( p_out_earned_disc ) );

478: */
479: END IF;
480: --
481: IF PG_DEBUG in ('Y', 'C') THEN
482: arp_standard.debug( 'earned_disc = '||TO_CHAR( p_out_earned_disc ) );
483: arp_standard.debug( 'Unearned_disc = '||TO_CHAR( p_out_unearned_disc ) );
484: arp_standard.debug( 'Amount to Apply = '||TO_CHAR( p_out_amt_to_apply ) );
485: END IF;
486: --

Line 483: arp_standard.debug( 'Unearned_disc = '||TO_CHAR( p_out_unearned_disc ) );

479: END IF;
480: --
481: IF PG_DEBUG in ('Y', 'C') THEN
482: arp_standard.debug( 'earned_disc = '||TO_CHAR( p_out_earned_disc ) );
483: arp_standard.debug( 'Unearned_disc = '||TO_CHAR( p_out_unearned_disc ) );
484: arp_standard.debug( 'Amount to Apply = '||TO_CHAR( p_out_amt_to_apply ) );
485: END IF;
486: --
487: p_earned_disc_pct := l_disc_rec.earned_disc_pct;

Line 484: arp_standard.debug( 'Amount to Apply = '||TO_CHAR( p_out_amt_to_apply ) );

480: --
481: IF PG_DEBUG in ('Y', 'C') THEN
482: arp_standard.debug( 'earned_disc = '||TO_CHAR( p_out_earned_disc ) );
483: arp_standard.debug( 'Unearned_disc = '||TO_CHAR( p_out_unearned_disc ) );
484: arp_standard.debug( 'Amount to Apply = '||TO_CHAR( p_out_amt_to_apply ) );
485: END IF;
486: --
487: p_earned_disc_pct := l_disc_rec.earned_disc_pct;
488: p_best_disc_pct := l_disc_rec.best_disc_pct;

Line 492: arp_standard.debug( 'p_error_code := '||p_error_code );

488: p_best_disc_pct := l_disc_rec.best_disc_pct;
489: p_out_discount_date := l_disc_rec.out_discount_date;
490: --p_error_code := AR_M_SUCCESS;
491: IF PG_DEBUG in ('Y', 'C') THEN
492: arp_standard.debug( 'p_error_code := '||p_error_code );
493: END IF;
494: END IF;
495: IF PG_DEBUG in ('Y', 'C') THEN
496: arp_standard.debug( 'arp_calculate_discount.calculate_discounts() -' );

Line 496: arp_standard.debug( 'arp_calculate_discount.calculate_discounts() -' );

492: arp_standard.debug( 'p_error_code := '||p_error_code );
493: END IF;
494: END IF;
495: IF PG_DEBUG in ('Y', 'C') THEN
496: arp_standard.debug( 'arp_calculate_discount.calculate_discounts() -' );
497: END IF;
498: --
499: EXCEPTION
500: WHEN OTHERS THEN

Line 502: arp_standard.debug( 'Exception: arp_calculate_discount.calculate_discounts()' );

498: --
499: EXCEPTION
500: WHEN OTHERS THEN
501: IF PG_DEBUG in ('Y', 'C') THEN
502: arp_standard.debug( 'Exception: arp_calculate_discount.calculate_discounts()' );
503: END IF;
504: --IF (error_code IS NOT NULL) THEN
505: --p_error_code := error_code;
506: --RETURN;

Line 548: arp_standard.debug( 'arp_calculate_discount.'||

544: p_ps_rec IN OUT NOCOPY ar_payment_schedules%ROWTYPE
545: ) IS
546: BEGIN
547: IF PG_DEBUG in ('Y', 'C') THEN
548: arp_standard.debug( 'arp_calculate_discount.'||
549: 'get_discount_percentages()+' );
550: END IF;
551:
552: -- ----------------------------------------------------------------

Line 569: arp_standard.debug( 'arp_calculate_discount.get_discount_percentages()-');

565: get_current_discount_percent (p_disc_rec, p_ps_rec);
566: END IF;
567:
568: IF PG_DEBUG in ('Y', 'C') THEN
569: arp_standard.debug( 'arp_calculate_discount.get_discount_percentages()-');
570: END IF;
571: EXCEPTION
572: WHEN OTHERS THEN
573: IF PG_DEBUG in ('Y', 'C') THEN

Line 574: arp_standard.debug( 'Exception: arp_calculate_discount.'||

570: END IF;
571: EXCEPTION
572: WHEN OTHERS THEN
573: IF PG_DEBUG in ('Y', 'C') THEN
574: arp_standard.debug( 'Exception: arp_calculate_discount.'||
575: 'get_discount_percentages()' );
576: END IF;
577: RAISE;
578: END get_discount_percentages;

Line 617: arp_standard.debug( 'arp_calculate_discount.get_payment_schedule_info() +' );

613: ) IS
614: l_payment_schedule_id NUMBER;
615: BEGIN
616: IF PG_DEBUG in ('Y', 'C') THEN
617: arp_standard.debug( 'arp_calculate_discount.get_payment_schedule_info() +' );
618: END IF;
619: --
620: -- Select Payment Schedule info and populate ps record type and two disc record
621: -- values (calc_disc_on_lines and disc_partial_pmt_flag)

Line 657: arp_standard.debug('get_payment_schedule_info: ' || 'No data found in ar_payment_schedules' );

653: EXCEPTION
654: WHEN NO_DATA_FOUND THEN
655: --error_code := AR_M_NO_RECORD ;
656: IF PG_DEBUG in ('Y', 'C') THEN
657: arp_standard.debug('get_payment_schedule_info: ' || 'No data found in ar_payment_schedules' );
658: END IF;
659: RAISE ar_m_no_rec;
660: WHEN OTHERS THEN
661: IF PG_DEBUG in ('Y', 'C') THEN

Line 662: arp_standard.debug('get_payment_schedule_info: ' ||

658: END IF;
659: RAISE ar_m_no_rec;
660: WHEN OTHERS THEN
661: IF PG_DEBUG in ('Y', 'C') THEN
662: arp_standard.debug('get_payment_schedule_info: ' ||
663: 'EXCEPTION: arp_calculate_discount.get_payment_schedule_info' );
664: END IF;
665: RAISE;
666: END;

Line 677: arp_standard.debug( 'arp_calculate_discount.get_payment_schedule_info()-');

673: p_ps_rec.terms_sequence_number := AR_NO_TERM;
674: END IF;
675:
676: IF PG_DEBUG in ('Y', 'C') THEN
677: arp_standard.debug( 'arp_calculate_discount.get_payment_schedule_info()-');
678: END IF;
679:
680: EXCEPTION
681: WHEN OTHERS THEN

Line 683: arp_standard.debug('get_payment_schedule_info: ' || 'Exception: arp_calculate_discount.'||

679:
680: EXCEPTION
681: WHEN OTHERS THEN
682: IF PG_DEBUG in ('Y', 'C') THEN
683: arp_standard.debug('get_payment_schedule_info: ' || 'Exception: arp_calculate_discount.'||
684: 'get_payment_schedule_info()' );
685: END IF;
686: RAISE;
687: END get_payment_schedule_info;

Line 724: arp_standard.debug( 'arp_calculate_discount.'||

720: p_ps_rec IN ar_payment_schedules%ROWTYPE
721: ) IS
722: BEGIN
723: IF PG_DEBUG in ('Y', 'C') THEN
724: arp_standard.debug( 'arp_calculate_discount.'||
725: 'get_best_discount_percentage()+' );
726: END IF;
727: --
728: -- Get best discount percentage

Line 739: arp_standard.debug( '-- best_discount_percentage:'||

735: tld.term_id = p_ps_rec.term_id
736: AND tld.sequence_num = p_ps_rec.terms_sequence_number;
737:
738: IF PG_DEBUG in ('Y', 'C') THEN
739: arp_standard.debug( '-- best_discount_percentage:'||
740: TO_CHAR( p_disc_rec.best_disc_pct ) );
741: arp_standard.debug( 'arp_calculate_discount.'||
742: 'get_best_discount_percentage()-' );
743: END IF;

Line 741: arp_standard.debug( 'arp_calculate_discount.'||

737:
738: IF PG_DEBUG in ('Y', 'C') THEN
739: arp_standard.debug( '-- best_discount_percentage:'||
740: TO_CHAR( p_disc_rec.best_disc_pct ) );
741: arp_standard.debug( 'arp_calculate_discount.'||
742: 'get_best_discount_percentage()-' );
743: END IF;
744:
745: EXCEPTION

Line 748: arp_standard.debug( 'Exception: arp_calculate_discount.'||

744:
745: EXCEPTION
746: WHEN OTHERS THEN
747: IF PG_DEBUG in ('Y', 'C') THEN
748: arp_standard.debug( 'Exception: arp_calculate_discount.'||
749: 'get_best_discount_percentage()' );
750: END IF;
751: RAISE;
752: END get_best_discount_percentage;

Line 816: arp_standard.debug(

812: td.discount_date ASC;
813:
814: BEGIN
815: IF PG_DEBUG in ('Y', 'C') THEN
816: arp_standard.debug(
817: 'arp_calculate_discount.get_current_discount_percent()+' );
818: END IF;
819: --
820: -- Get current discount percentage

Line 828: arp_standard.debug( '-- l_grace_days := '||TO_CHAR(l_grace_days ));

824: l_apply_date := p_disc_rec.apply_date;
825: l_calculated_date := TRUNC(l_apply_date - l_grace_days);
826:
827: IF PG_DEBUG in ('Y', 'C') THEN
828: arp_standard.debug( '-- l_grace_days := '||TO_CHAR(l_grace_days ));
829: arp_standard.debug( '-- l_apply_date :='||TO_CHAR(l_apply_date,'DD-MON-RRRR HH24:MI:SS' ));
830: arp_standard.debug( '-- l_calculated_date :='||TO_CHAR(l_calculated_date,'DD-MON-RRRR HH24:MI:SS' ));
831: END IF;
832:

Line 829: arp_standard.debug( '-- l_apply_date :='||TO_CHAR(l_apply_date,'DD-MON-RRRR HH24:MI:SS' ));

825: l_calculated_date := TRUNC(l_apply_date - l_grace_days);
826:
827: IF PG_DEBUG in ('Y', 'C') THEN
828: arp_standard.debug( '-- l_grace_days := '||TO_CHAR(l_grace_days ));
829: arp_standard.debug( '-- l_apply_date :='||TO_CHAR(l_apply_date,'DD-MON-RRRR HH24:MI:SS' ));
830: arp_standard.debug( '-- l_calculated_date :='||TO_CHAR(l_calculated_date,'DD-MON-RRRR HH24:MI:SS' ));
831: END IF;
832:
833: -- If cursor does not return anything, this will be the default

Line 830: arp_standard.debug( '-- l_calculated_date :='||TO_CHAR(l_calculated_date,'DD-MON-RRRR HH24:MI:SS' ));

826:
827: IF PG_DEBUG in ('Y', 'C') THEN
828: arp_standard.debug( '-- l_grace_days := '||TO_CHAR(l_grace_days ));
829: arp_standard.debug( '-- l_apply_date :='||TO_CHAR(l_apply_date,'DD-MON-RRRR HH24:MI:SS' ));
830: arp_standard.debug( '-- l_calculated_date :='||TO_CHAR(l_calculated_date,'DD-MON-RRRR HH24:MI:SS' ));
831: END IF;
832:
833: -- If cursor does not return anything, this will be the default
834: p_disc_rec.earned_disc_pct := 0;

Line 844: arp_standard.debug( '--p_disc_rec.earned_disc_pct:'||

840: EXIT;
841: END LOOP;
842:
843: IF PG_DEBUG in ('Y', 'C') THEN
844: arp_standard.debug( '--p_disc_rec.earned_disc_pct:'||
845: TO_CHAR(p_disc_rec.earned_disc_pct));
846: arp_standard.debug( 'arp_calculate_discount.'||
847: 'get_current_discount_percent()-' );
848: END IF;

Line 846: arp_standard.debug( 'arp_calculate_discount.'||

842:
843: IF PG_DEBUG in ('Y', 'C') THEN
844: arp_standard.debug( '--p_disc_rec.earned_disc_pct:'||
845: TO_CHAR(p_disc_rec.earned_disc_pct));
846: arp_standard.debug( 'arp_calculate_discount.'||
847: 'get_current_discount_percent()-' );
848: END IF;
849:
850: EXCEPTION

Line 853: arp_standard.debug( 'EXCEPTION: arp_calculate_discount.'||

849:
850: EXCEPTION
851: WHEN OTHERS THEN
852: IF PG_DEBUG in ('Y', 'C') THEN
853: arp_standard.debug( 'EXCEPTION: arp_calculate_discount.'||
854: 'get_current_discount_percent()' );
855: END IF;
856: RAISE;
857:

Line 922: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() +' );

918:
919: --
920: BEGIN
921: IF PG_DEBUG in ('Y', 'C') THEN
922: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() +' );
923: END IF;
924: --
925: --Correct discount percentages for LINEs only discounts.
926: --

Line 942: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts : No adjustments for payment schedule' );

938: END;
939: --
940: IF ( l_amount_adjusted IS NULL ) THEN
941: IF PG_DEBUG in ('Y', 'C') THEN
942: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts : No adjustments for payment schedule' );
943: END IF;
944: l_adjustments := FALSE;
945: l_tax_adjustments := FALSE;
946: END IF;

Line 961: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts : No credit memos for payment schedule' );

957: END;
958: --
959: IF ( l_amount_applied IS NULL ) THEN
960: IF PG_DEBUG in ('Y', 'C') THEN
961: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts : No credit memos for payment schedule' );
962: END IF;
963: l_credit_memos := FALSE;
964: l_tax_credit_memos := FALSE;
965: END IF;

Line 1105: arp_standard.debug( ' l_multiplier:'||TO_CHAR(l_multiplier));

1101: l_multiplier := l_numerator / l_denominator;
1102: END IF;
1103:
1104: IF PG_DEBUG in ('Y', 'C') THEN
1105: arp_standard.debug( ' l_multiplier:'||TO_CHAR(l_multiplier));
1106: END IF;
1107: p_disc_rec.earned_disc_pct := p_disc_rec.earned_disc_pct * l_multiplier;
1108: p_disc_rec.best_disc_pct := p_disc_rec.best_disc_pct * l_multiplier;
1109: --

Line 1111: arp_standard.debug( ' p_disc_rec.adjusted_ado:'||TO_CHAR(p_disc_rec.adjusted_ado));

1107: p_disc_rec.earned_disc_pct := p_disc_rec.earned_disc_pct * l_multiplier;
1108: p_disc_rec.best_disc_pct := p_disc_rec.best_disc_pct * l_multiplier;
1109: --
1110: IF PG_DEBUG in ('Y', 'C') THEN
1111: arp_standard.debug( ' p_disc_rec.adjusted_ado:'||TO_CHAR(p_disc_rec.adjusted_ado));
1112: arp_standard.debug( ' p_disc_rec.earned_disc_pct:'||TO_CHAR(p_disc_rec.earned_disc_pct));
1113: arp_standard.debug( ' p_disc_rec.best_disc_pct:'||TO_CHAR(p_disc_rec.best_disc_pct));
1114: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() -' );
1115: END IF;

Line 1112: arp_standard.debug( ' p_disc_rec.earned_disc_pct:'||TO_CHAR(p_disc_rec.earned_disc_pct));

1108: p_disc_rec.best_disc_pct := p_disc_rec.best_disc_pct * l_multiplier;
1109: --
1110: IF PG_DEBUG in ('Y', 'C') THEN
1111: arp_standard.debug( ' p_disc_rec.adjusted_ado:'||TO_CHAR(p_disc_rec.adjusted_ado));
1112: arp_standard.debug( ' p_disc_rec.earned_disc_pct:'||TO_CHAR(p_disc_rec.earned_disc_pct));
1113: arp_standard.debug( ' p_disc_rec.best_disc_pct:'||TO_CHAR(p_disc_rec.best_disc_pct));
1114: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() -' );
1115: END IF;
1116: --

Line 1113: arp_standard.debug( ' p_disc_rec.best_disc_pct:'||TO_CHAR(p_disc_rec.best_disc_pct));

1109: --
1110: IF PG_DEBUG in ('Y', 'C') THEN
1111: arp_standard.debug( ' p_disc_rec.adjusted_ado:'||TO_CHAR(p_disc_rec.adjusted_ado));
1112: arp_standard.debug( ' p_disc_rec.earned_disc_pct:'||TO_CHAR(p_disc_rec.earned_disc_pct));
1113: arp_standard.debug( ' p_disc_rec.best_disc_pct:'||TO_CHAR(p_disc_rec.best_disc_pct));
1114: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() -' );
1115: END IF;
1116: --
1117: EXCEPTION

Line 1114: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() -' );

1110: IF PG_DEBUG in ('Y', 'C') THEN
1111: arp_standard.debug( ' p_disc_rec.adjusted_ado:'||TO_CHAR(p_disc_rec.adjusted_ado));
1112: arp_standard.debug( ' p_disc_rec.earned_disc_pct:'||TO_CHAR(p_disc_rec.earned_disc_pct));
1113: arp_standard.debug( ' p_disc_rec.best_disc_pct:'||TO_CHAR(p_disc_rec.best_disc_pct));
1114: arp_standard.debug( 'arp_calculate_discount.correct_lines_only_discounts() -' );
1115: END IF;
1116: --
1117: EXCEPTION
1118: WHEN OTHERS THEN

Line 1120: arp_standard.debug( 'Exception: arp_calculate_discount.correct_lines_only_discounts()' );

1116: --
1117: EXCEPTION
1118: WHEN OTHERS THEN
1119: IF PG_DEBUG in ('Y', 'C') THEN
1120: arp_standard.debug( 'Exception: arp_calculate_discount.correct_lines_only_discounts()' );
1121: END IF;
1122: RAISE;
1123: END correct_lines_only_discounts;
1124: --

Line 1164: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_adr() +' );

1160: l_amt NUMBER;
1161: l_new_amt_due_remaining NUMBER;
1162: BEGIN
1163: IF PG_DEBUG in ('Y', 'C') THEN
1164: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_adr() +' );
1165: END IF;
1166: --
1167: l_amt_due_remaining := p_ps_rec.amount_due_remaining;
1168: l_amt := p_disc_rec.input_amt;

Line 1201: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_adr() +' );

1197: RETURN;
1198: END IF;
1199: --
1200: IF PG_DEBUG in ('Y', 'C') THEN
1201: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_adr() +' );
1202: END IF;
1203: --
1204: EXCEPTION
1205: WHEN OTHERS THEN

Line 1207: arp_standard.debug( 'Exception: arp_calculate_discount.decrease_discounts_to_adr()');

1203: --
1204: EXCEPTION
1205: WHEN OTHERS THEN
1206: IF PG_DEBUG in ('Y', 'C') THEN
1207: arp_standard.debug( 'Exception: arp_calculate_discount.decrease_discounts_to_adr()');
1208: END IF;
1209: RAISE;
1210: END decrease_discounts_to_adr;
1211: --

Line 1251: arp_standard.debug( 'arp_calculate_discount.determine_max_allowed_disc() +' );

1247: l_max_allowed_discount NUMBER;
1248: l_amt_due_original NUMBER;
1249: BEGIN
1250: IF PG_DEBUG in ('Y', 'C') THEN
1251: arp_standard.debug( 'arp_calculate_discount.determine_max_allowed_disc() +' );
1252: END IF;
1253: --
1254: l_adjustments := TRUE;
1255: l_credit_memos := TRUE;

Line 1267: arp_standard.debug( 'Selecting from database ' );

1263: -- /*=========================================+
1264: -- Need to select and calculate adjusted ADO
1265: -- +=========================================*/
1266: IF PG_DEBUG in ('Y', 'C') THEN
1267: arp_standard.debug( 'Selecting from database ' );
1268: END IF;
1269: BEGIN
1270: SELECT sum(amount)
1271: INTO l_amount_adjusted

Line 1279: arp_standard.debug( 'No adjustments for payment schedule' );

1275: END;
1276: --
1277: IF ( l_amount_adjusted IS NULL ) THEN
1278: IF PG_DEBUG in ('Y', 'C') THEN
1279: arp_standard.debug( 'No adjustments for payment schedule' );
1280: END IF;
1281: l_adjustments := FALSE;
1282: END IF;
1283: --

Line 1296: arp_standard.debug( 'No credit memos for payment schedule' );

1292: END;
1293: --
1294: IF ( l_amount_applied IS NULL ) THEN
1295: IF PG_DEBUG in ('Y', 'C') THEN
1296: arp_standard.debug( 'No credit memos for payment schedule' );
1297: END IF;
1298: l_credit_memos := FALSE;
1299: END IF;
1300: --

Line 1333: arp_standard.debug( 'Default or Direct Mode p_mode=' || to_char(p_mode));

1329: -- Get max allowed total discount.
1330: -- multiply best percentage by adjusted ADO to get max total discount
1331: IF (p_mode = AR_DIRECT_NEW_DISC OR p_mode = AR_DEFAULT_NEW_DISC) THEN
1332: IF PG_DEBUG in ('Y', 'C') THEN
1333: arp_standard.debug( 'Default or Direct Mode p_mode=' || to_char(p_mode));
1334: END IF;
1335: l_max_allowed_discount := p_disc_rec.best_disc_pct *
1336: p_disc_rec.adjusted_ado;
1337: -- Modified for RT Bug Feb 28, 97.

Line 1341: arp_standard.debug( 'Not in Default/Direct Mode p_mode=' || to_char(p_mode));

1337: -- Modified for RT Bug Feb 28, 97.
1338: -- p_ps_rec.amount_due_original;
1339: ELSE
1340: IF PG_DEBUG in ('Y', 'C') THEN
1341: arp_standard.debug( 'Not in Default/Direct Mode p_mode=' || to_char(p_mode));
1342: END IF;
1343: l_max_allowed_discount := p_disc_rec.best_disc_pct *
1344: l_amt_due_original;
1345: END IF;

Line 1372: arp_standard.debug( 'arp_calculate_discount.determine_max_allowed_disc() -' );

1368: -- Populate max allowable discount and exit.
1369: --
1370: p_disc_rec.max_disc := l_max_allowed_discount;
1371: IF PG_DEBUG in ('Y', 'C') THEN
1372: arp_standard.debug( 'arp_calculate_discount.determine_max_allowed_disc() -' );
1373: END IF;
1374: --
1375: EXCEPTION
1376: WHEN OTHERS THEN

Line 1378: arp_standard.debug( 'Exception: arp_calculate_discount.determine_max_allowed_disc()');

1374: --
1375: EXCEPTION
1376: WHEN OTHERS THEN
1377: IF PG_DEBUG in ('Y', 'C') THEN
1378: arp_standard.debug( 'Exception: arp_calculate_discount.determine_max_allowed_disc()');
1379: END IF;
1380: RAISE;
1381: END determine_max_allowed_disc;
1382: --

Line 1450: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount() +' );

1446: l_ps_disc_partial_pay_flag VARCHAR2(1) := 'N' ;
1447:
1448: BEGIN
1449: IF PG_DEBUG in ('Y', 'C') THEN
1450: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount() +' );
1451: END IF;
1452: --
1453: l_ado := p_disc_rec.adjusted_ado;
1454: l_earned_disc_pct := p_disc_rec.earned_disc_pct;

Line 1463: arp_standard.debug( ' l_earned_disc_pct:'||TO_CHAR(l_earned_disc_pct));

1459:
1460: -- Added here by Ketul Nov 18, 96 for Bug #423908
1461: l_amt_due_remaining := p_ps_rec.amount_due_remaining;
1462: IF PG_DEBUG in ('Y', 'C') THEN
1463: arp_standard.debug( ' l_earned_disc_pct:'||TO_CHAR(l_earned_disc_pct));
1464: arp_standard.debug( ' l_best_pct:'||TO_CHAR(l_best_pct));
1465: arp_standard.debug( ' l_input_amt:'||TO_CHAR(l_input_amt));
1466: END IF;
1467: --Methods for calculating discounts depend on whether or not

Line 1464: arp_standard.debug( ' l_best_pct:'||TO_CHAR(l_best_pct));

1460: -- Added here by Ketul Nov 18, 96 for Bug #423908
1461: l_amt_due_remaining := p_ps_rec.amount_due_remaining;
1462: IF PG_DEBUG in ('Y', 'C') THEN
1463: arp_standard.debug( ' l_earned_disc_pct:'||TO_CHAR(l_earned_disc_pct));
1464: arp_standard.debug( ' l_best_pct:'||TO_CHAR(l_best_pct));
1465: arp_standard.debug( ' l_input_amt:'||TO_CHAR(l_input_amt));
1466: END IF;
1467: --Methods for calculating discounts depend on whether or not
1468: --discounts are allowed on partial payments.

Line 1465: arp_standard.debug( ' l_input_amt:'||TO_CHAR(l_input_amt));

1461: l_amt_due_remaining := p_ps_rec.amount_due_remaining;
1462: IF PG_DEBUG in ('Y', 'C') THEN
1463: arp_standard.debug( ' l_earned_disc_pct:'||TO_CHAR(l_earned_disc_pct));
1464: arp_standard.debug( ' l_best_pct:'||TO_CHAR(l_best_pct));
1465: arp_standard.debug( ' l_input_amt:'||TO_CHAR(l_input_amt));
1466: END IF;
1467: --Methods for calculating discounts depend on whether or not
1468: --discounts are allowed on partial payments.
1469:

Line 1477: SELECT arp_standard.sysparm.partial_discount_flag

1473: l_amount_applied_to := 0;
1474: l_earned_discount_taken := 0;
1475: l_unearned_discount_taken := 0;
1476:
1477: SELECT arp_standard.sysparm.partial_discount_flag
1478: INTO l_sys_disc_partial_pay_flag
1479: FROM dual;
1480:
1481: /*--------------------------------------------------------------------+

Line 1488: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);

1484: |system option, then take the value from payment terms record |
1485: *--------------------------------------------------------------------*/
1486:
1487: IF PG_DEBUG in ('Y', 'C') THEN
1488: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);
1489: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_ps_disc_partial_pay_flag);
1490: END IF;
1491:
1492: IF NVL(l_sys_disc_partial_pay_flag,'N') = 'N' THEN

Line 1489: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_ps_disc_partial_pay_flag);

1485: *--------------------------------------------------------------------*/
1486:
1487: IF PG_DEBUG in ('Y', 'C') THEN
1488: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);
1489: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_ps_disc_partial_pay_flag);
1490: END IF;
1491:
1492: IF NVL(l_sys_disc_partial_pay_flag,'N') = 'N' THEN
1493: l_ps_disc_partial_pay_flag := 'N';

Line 1502: arp_standard.debug( ' disc_partial_pmt_flag: Y' );

1498:
1499: IF NVL(l_ps_disc_partial_pay_flag,'N') = 'Y'
1500: THEN
1501: IF PG_DEBUG in ('Y', 'C') THEN
1502: arp_standard.debug( ' disc_partial_pmt_flag: Y' );
1503: END IF;
1504: --
1505: --If partial payment discount is allowed then the following steps
1506: --are done.

Line 1529: arp_standard.debug( 'from ar_rec_app :');

1525: and application_type = 'CASH'
1526: and status = 'APP';
1527:
1528: IF PG_DEBUG in ('Y', 'C') THEN
1529: arp_standard.debug( 'from ar_rec_app :');
1530: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1531: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1532: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1533: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));

Line 1530: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));

1526: and status = 'APP';
1527:
1528: IF PG_DEBUG in ('Y', 'C') THEN
1529: arp_standard.debug( 'from ar_rec_app :');
1530: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1531: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1532: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1533: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1534: END IF;

Line 1531: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));

1527:
1528: IF PG_DEBUG in ('Y', 'C') THEN
1529: arp_standard.debug( 'from ar_rec_app :');
1530: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1531: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1532: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1533: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1534: END IF;
1535: end;

Line 1532: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));

1528: IF PG_DEBUG in ('Y', 'C') THEN
1529: arp_standard.debug( 'from ar_rec_app :');
1530: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1531: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1532: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1533: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1534: END IF;
1535: end;
1536:

Line 1533: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));

1529: arp_standard.debug( 'from ar_rec_app :');
1530: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1531: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1532: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1533: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1534: END IF;
1535: end;
1536:
1537: IF l_earned_disc_pct = 1

Line 1551: arp_standard.debug( 'l_temp = ' || to_char(l_temp));

1547: - arpcurr.CurrRound(l_amt_due_remaining*l_earned_disc_pct,
1548: p_ps_rec.invoice_currency_code);
1549:
1550: IF PG_DEBUG in ('Y', 'C') THEN
1551: arp_standard.debug( 'l_temp = ' || to_char(l_temp));
1552: END IF;
1553:
1554: IF ( ( l_amt_due_remaining > 0 AND l_temp <= l_input_amt ) OR
1555: ( l_amt_due_remaining < 0 AND l_temp >= l_input_amt ) )

Line 1583: arp_standard.debug(

1579:
1580: l_input_amt_earned := l_input_amt;
1581:
1582: IF PG_DEBUG in ('Y', 'C') THEN
1583: arp_standard.debug(
1584: 'current receipt amount : l_input_amt_earned --:' ||
1585: TO_CHAR(l_input_amt_earned));
1586: END IF;
1587:

Line 1606: arp_standard.debug(

1602: -- l_earned_discount_taken from p_earned_disc
1603: -- also consolidated debug messages in one if pg_debug if block
1604:
1605: IF PG_DEBUG in ('Y', 'C') THEN
1606: arp_standard.debug(
1607: 'discount available for THIS receipt : ' ||
1608: to_char(p_earned_disc));
1609:
1610: arp_standard.debug('calculate_direct_discount: total redeemable discount 1 : ' ||

Line 1610: arp_standard.debug('calculate_direct_discount: total redeemable discount 1 : ' ||

1606: arp_standard.debug(
1607: 'discount available for THIS receipt : ' ||
1608: to_char(p_earned_disc));
1609:
1610: arp_standard.debug('calculate_direct_discount: total redeemable discount 1 : ' ||
1611: TO_CHAR(p_earned_disc + l_earned_discount_taken));
1612: END IF;
1613: END IF;
1614:

Line 1616: arp_standard.debug( 'total redeemable discount 3 :'||TO_CHAR(p_earned_disc));

1612: END IF;
1613: END IF;
1614:
1615: IF PG_DEBUG in ('Y', 'C') THEN
1616: arp_standard.debug( 'total redeemable discount 3 :'||TO_CHAR(p_earned_disc));
1617: END IF;
1618:
1619: END IF;
1620: --

Line 1658: arp_standard.debug( 'ptr 1- l_unearned_disc:'||TO_CHAR(l_best_disc));

1654: l_best_disc := (l_input_amt_unearned*l_best_pct ) /
1655: ( 1 - l_best_pct );
1656: END IF;
1657: IF PG_DEBUG in ('Y', 'C') THEN
1658: arp_standard.debug( 'ptr 1- l_unearned_disc:'||TO_CHAR(l_best_disc));
1659: END IF;
1660: l_best_disc := l_best_disc - l_unearned_discount_taken;
1661: IF PG_DEBUG in ('Y', 'C') THEN
1662: arp_standard.debug( 'ptr 2- l_unearned_disc:'||TO_CHAR(l_best_disc));

Line 1662: arp_standard.debug( 'ptr 2- l_unearned_disc:'||TO_CHAR(l_best_disc));

1658: arp_standard.debug( 'ptr 1- l_unearned_disc:'||TO_CHAR(l_best_disc));
1659: END IF;
1660: l_best_disc := l_best_disc - l_unearned_discount_taken;
1661: IF PG_DEBUG in ('Y', 'C') THEN
1662: arp_standard.debug( 'ptr 2- l_unearned_disc:'||TO_CHAR(l_best_disc));
1663: END IF;
1664: END IF;
1665: END IF;
1666: --

Line 1674: arp_standard.debug( ' disc_partial_pmt_flag: !Y' );

1670: END IF;
1671: --
1672: ELSE
1673: IF PG_DEBUG in ('Y', 'C') THEN
1674: arp_standard.debug( ' disc_partial_pmt_flag: !Y' );
1675: END IF;
1676: -- If partial payment discount is not allowed, then the following
1677: -- steps are taken.
1678: -- earned discount = (current %) * ADO

Line 1739: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));

1735: p_unearned_disc := p_disc_rec.max_disc - p_earned_disc;
1736: END IF;
1737:
1738: IF PG_DEBUG in ('Y', 'C') THEN
1739: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1740: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1741: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1742: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1743: END IF;

Line 1740: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));

1736: END IF;
1737:
1738: IF PG_DEBUG in ('Y', 'C') THEN
1739: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1740: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1741: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1742: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1743: END IF;
1744:

Line 1741: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));

1737:
1738: IF PG_DEBUG in ('Y', 'C') THEN
1739: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1740: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1741: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1742: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1743: END IF;
1744:
1745: EXCEPTION

Line 1742: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');

1738: IF PG_DEBUG in ('Y', 'C') THEN
1739: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1740: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1741: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1742: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1743: END IF;
1744:
1745: EXCEPTION
1746: WHEN OTHERS THEN

Line 1748: arp_standard.debug( 'Exception: arp_calculate_discount.'||

1744:
1745: EXCEPTION
1746: WHEN OTHERS THEN
1747: IF PG_DEBUG in ('Y', 'C') THEN
1748: arp_standard.debug( 'Exception: arp_calculate_discount.'||
1749: 'calculate_direct_discount()');
1750: END IF;
1751: RAISE;
1752: END calculate_direct_discount;

Line 1803: arp_standard.debug( 'arp_calculate_discount.calculate_default_discount() +' );

1799: l_disc_to_take NUMBER;
1800: l_OIR_AR BOOLEAN;
1801: BEGIN
1802: IF PG_DEBUG in ('Y', 'C') THEN
1803: arp_standard.debug( 'arp_calculate_discount.calculate_default_discount() +' );
1804: END IF;
1805: --
1806: /*FP bug 5335376 for Bug 5223829 Leftover changes of bug for case of system option partial discount unchecked
1807: Set variable based on parameter p_called_from*/

Line 1825: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));

1821: --If partial payment discount is allowed then the following steps
1822: --are done.
1823: --Earned discount = ADR * (earned discount %)
1824: IF PG_DEBUG in ('Y', 'C') THEN
1825: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1826: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));
1827: END IF;
1828: p_earned_disc := l_amt_due_remaining * l_earned_disc_pct;
1829: IF PG_DEBUG in ('Y', 'C') THEN

Line 1826: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));

1822: --are done.
1823: --Earned discount = ADR * (earned discount %)
1824: IF PG_DEBUG in ('Y', 'C') THEN
1825: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1826: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));
1827: END IF;
1828: p_earned_disc := l_amt_due_remaining * l_earned_disc_pct;
1829: IF PG_DEBUG in ('Y', 'C') THEN
1830: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));

Line 1830: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));

1826: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));
1827: END IF;
1828: p_earned_disc := l_amt_due_remaining * l_earned_disc_pct;
1829: IF PG_DEBUG in ('Y', 'C') THEN
1830: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));
1831: END IF;
1832: --Calculate unearned discount.
1833: --If earned discount percentage equal to best discount percentage.
1834: --unearned discount = 0.

Line 1872: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );

1868: --
1869: --
1870: -- make sure max discount is not exceeded. reduce discounts as needed
1871: IF PG_DEBUG in ('Y', 'C') THEN
1872: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1873: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1874: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1875: END IF;
1876: --

Line 1873: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );

1869: --
1870: -- make sure max discount is not exceeded. reduce discounts as needed
1871: IF PG_DEBUG in ('Y', 'C') THEN
1872: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1873: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1874: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1875: END IF;
1876: --
1877: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');

Line 1874: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );

1870: -- make sure max discount is not exceeded. reduce discounts as needed
1871: IF PG_DEBUG in ('Y', 'C') THEN
1872: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1873: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1874: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1875: END IF;
1876: --
1877: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');
1878: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );

Line 1877: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');

1873: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1874: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1875: END IF;
1876: --
1877: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');
1878: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );
1879: --
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );

Line 1881: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );

1877: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');
1878: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );
1879: --
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1882: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1884: END IF;
1885: --

Line 1882: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );

1878: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );
1879: --
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1882: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1884: END IF;
1885: --
1886: -- amount to apply = ADR - discount to be taken

Line 1883: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );

1879: --
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1882: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1884: END IF;
1885: --
1886: -- amount to apply = ADR - discount to be taken
1887: -- calculate discount to take

Line 1900: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));

1896: END IF;
1897: -- subtract discount from ADR
1898: p_out_amt_to_apply := l_amt_due_remaining - l_disc_to_take;
1899: IF PG_DEBUG in ('Y', 'C') THEN
1900: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1901: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1902: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));
1903: END IF;
1904: --If Input Amount = CLOSE_INVOICE then

Line 1901: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));

1897: -- subtract discount from ADR
1898: p_out_amt_to_apply := l_amt_due_remaining - l_disc_to_take;
1899: IF PG_DEBUG in ('Y', 'C') THEN
1900: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1901: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1902: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));
1903: END IF;
1904: --If Input Amount = CLOSE_INVOICE then
1905: IF ( p_disc_rec.close_invoice_flag = 'Y' ) THEN

Line 1902: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));

1898: p_out_amt_to_apply := l_amt_due_remaining - l_disc_to_take;
1899: IF PG_DEBUG in ('Y', 'C') THEN
1900: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1901: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1902: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));
1903: END IF;
1904: --If Input Amount = CLOSE_INVOICE then
1905: IF ( p_disc_rec.close_invoice_flag = 'Y' ) THEN
1906: RETURN;

Line 1936: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));

1932:
1933: IF l_OIR_AR THEN
1934: p_out_amt_to_apply := l_input_amt;
1935: IF PG_DEBUG in ('Y', 'C') THEN
1936: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1937: END IF;
1938:
1939: IF ( p_disc_rec.disc_partial_pmt_flag = 'N' ) THEN
1940: p_earned_disc := 0;

Line 1981: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||

1977: IF (p_mode = AR_DIRECT_NEW_DISC OR p_mode = AR_DEFAULT_NEW_DISC) THEN
1978: p_unearned_disc := p_disc_rec.max_disc - p_earned_disc;
1979: END IF;
1980: IF PG_DEBUG in ('Y', 'C') THEN
1981: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||
1982: TO_CHAR( p_earned_disc ) );
1983: arp_standard.debug( 'max_disc in calculate_default_discount = '||
1984: TO_CHAR( p_disc_rec.max_disc ) );
1985: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||

Line 1983: arp_standard.debug( 'max_disc in calculate_default_discount = '||

1979: END IF;
1980: IF PG_DEBUG in ('Y', 'C') THEN
1981: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||
1982: TO_CHAR( p_earned_disc ) );
1983: arp_standard.debug( 'max_disc in calculate_default_discount = '||
1984: TO_CHAR( p_disc_rec.max_disc ) );
1985: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||
1986: TO_CHAR( p_unearned_disc ) );
1987: END IF;

Line 1985: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||

1981: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||
1982: TO_CHAR( p_earned_disc ) );
1983: arp_standard.debug( 'max_disc in calculate_default_discount = '||
1984: TO_CHAR( p_disc_rec.max_disc ) );
1985: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||
1986: TO_CHAR( p_unearned_disc ) );
1987: END IF;
1988: --
1989: --

Line 1992: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));

1988: --
1989: --
1990: --
1991: IF PG_DEBUG in ('Y', 'C') THEN
1992: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));
1993: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1994: END IF;
1995: --If receipt unapplied (input amount) < 0
1996: --then Amount to default(amount to apply) =0.

Line 1993: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));

1989: --
1990: --
1991: IF PG_DEBUG in ('Y', 'C') THEN
1992: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));
1993: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1994: END IF;
1995: --If receipt unapplied (input amount) < 0
1996: --then Amount to default(amount to apply) =0.
1997: --else

Line 2008: arp_standard.debug( 'arp_calculate_discount.calculate_default_discount() -' );

2004: --else
2005: --set discount to 0.
2006: --
2007: IF PG_DEBUG in ('Y', 'C') THEN
2008: arp_standard.debug( 'arp_calculate_discount.calculate_default_discount() -' );
2009: END IF;
2010: --
2011: EXCEPTION
2012: WHEN OTHERS THEN

Line 2014: arp_standard.debug( 'Exception: arp_calculate_discount.calculate_default_discount()');

2010: --
2011: EXCEPTION
2012: WHEN OTHERS THEN
2013: IF PG_DEBUG in ('Y', 'C') THEN
2014: arp_standard.debug( 'Exception: arp_calculate_discount.calculate_default_discount()');
2015: END IF;
2016: RAISE;
2017: END calculate_default_discount;
2018: --

Line 2055: arp_standard.debug( 'arp_calculate_discount.check_input() +' );

2051: p_select_flag IN BOOLEAN,
2052: p_ps_rec IN OUT NOCOPY ar_payment_schedules%ROWTYPE ) IS
2053: BEGIN
2054: IF PG_DEBUG in ('Y', 'C') THEN
2055: arp_standard.debug( 'arp_calculate_discount.check_input() +' );
2056: END IF;
2057: --
2058: -- If Input Amount equals NULL
2059: -- exit with error

Line 2063: arp_standard.debug( 'arp_calculate_discount.check_input : Input amount is NULL. Must have a value.' );

2059: -- exit with error
2060: IF p_disc_rec.input_amt IS NULL
2061: THEN
2062: IF PG_DEBUG in ('Y', 'C') THEN
2063: arp_standard.debug( 'arp_calculate_discount.check_input : Input amount is NULL. Must have a value.' );
2064: END IF;
2065: --error_code := AR_M_FAILURE ;
2066: IF PG_DEBUG in ('Y', 'C') THEN
2067: arp_standard.debug( 'Check input Failed' );

Line 2067: arp_standard.debug( 'Check input Failed' );

2063: arp_standard.debug( 'arp_calculate_discount.check_input : Input amount is NULL. Must have a value.' );
2064: END IF;
2065: --error_code := AR_M_FAILURE ;
2066: IF PG_DEBUG in ('Y', 'C') THEN
2067: arp_standard.debug( 'Check input Failed' );
2068: END IF;
2069: --APP_EXCEPTION.raise_exception;
2070: RAISE ar_m_fail;
2071: END IF;

Line 2077: arp_standard.debug( 'arp_calculate_discount.check_input : Apply date is NULL. Must have a value.' );

2073: -- exit with error
2074: IF p_disc_rec.apply_date IS NULL
2075: THEN
2076: IF PG_DEBUG in ('Y', 'C') THEN
2077: arp_standard.debug( 'arp_calculate_discount.check_input : Apply date is NULL. Must have a value.' );
2078: END IF;
2079: --error_code := AR_M_FAILURE ;
2080: IF PG_DEBUG in ('Y', 'C') THEN
2081: arp_standard.debug( 'Check input Failed' );

Line 2081: arp_standard.debug( 'Check input Failed' );

2077: arp_standard.debug( 'arp_calculate_discount.check_input : Apply date is NULL. Must have a value.' );
2078: END IF;
2079: --error_code := AR_M_FAILURE ;
2080: IF PG_DEBUG in ('Y', 'C') THEN
2081: arp_standard.debug( 'Check input Failed' );
2082: END IF;
2083: --APP_EXCEPTION.raise_exception;
2084: RAISE ar_m_fail;
2085: END IF;

Line 2098: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.disc_partial_pmt_flag' );

2094: IF p_disc_rec.disc_partial_pmt_flag <> 'Y' AND
2095: p_disc_rec.disc_partial_pmt_flag <> 'N'
2096: THEN
2097: IF PG_DEBUG in ('Y', 'C') THEN
2098: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.disc_partial_pmt_flag' );
2099: END IF;
2100: RAISE ar_m_fail;
2101: END IF;
2102: -- If calc_disc_on_lines not in ('Y', 'N', 'I', 'L', 'T', 'F')

Line 2112: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.calc_disc_on_lines' );

2108: p_disc_rec.calc_disc_on_lines <> 'T' AND
2109: p_disc_rec.calc_disc_on_lines <> 'F'
2110: THEN
2111: IF PG_DEBUG in ('Y', 'C') THEN
2112: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.calc_disc_on_lines' );
2113: END IF;
2114: RAISE ar_m_fail;
2115: END IF;
2116: END IF;

Line 2123: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.earned_both_flag' );

2119: -- exit with error
2120: IF ( p_disc_rec.earned_both_flag <> AR_EARNED_INDICATOR AND
2121: p_disc_rec.earned_both_flag <> AR_BOTH_INDICATOR ) THEN
2122: IF PG_DEBUG in ('Y', 'C') THEN
2123: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.earned_both_flag' );
2124: END IF;
2125: RAISE ar_m_fail;
2126: END IF;
2127: -- If Select_flag <> TRUE AND <> FALSE

Line 2131: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_select_flag. Must be TRUE or FALSE.' );

2127: -- If Select_flag <> TRUE AND <> FALSE
2128: -- exit with error
2129: IF ( p_select_flag <> TRUE AND p_select_flag <> FALSE ) THEN
2130: IF PG_DEBUG in ('Y', 'C') THEN
2131: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_select_flag. Must be TRUE or FALSE.' );
2132: END IF;
2133: RAISE ar_m_fail;
2134: END IF;
2135: -- If payment_schedule_id <= 0

Line 2139: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for

2135: -- If payment_schedule_id <= 0
2136: -- exit with error
2137: IF ( p_ps_rec.payment_schedule_id <= 0 ) THEN
2138: IF PG_DEBUG in ('Y', 'C') THEN
2139: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for
2140: p_ps_rec.payment_schedule_id. Must be greater than zero.' );
2141: END IF;
2142: RAISE ar_m_fail;
2143: END IF;

Line 2152: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_ps_rec.term_id. Must be greater than zero. ' );

2148: p_ps_rec.term_id := AR_NO_TERM;
2149: ELSIF p_ps_rec.term_id < 0
2150: THEN
2151: IF PG_DEBUG in ('Y', 'C') THEN
2152: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_ps_rec.term_id. Must be greater than zero. ' );
2153: END IF;
2154: RAISE ar_m_fail;
2155: END IF;
2156: IF p_ps_rec.terms_sequence_number IS NULL

Line 2162: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for

2158: p_ps_rec.terms_sequence_number := AR_NO_TERM;
2159: ELSIF ( p_ps_rec.terms_sequence_number < 0 )
2160: THEN
2161: IF PG_DEBUG in ('Y', 'C') THEN
2162: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for
2163: p_ps_rec.terms_sequence_number. Must be greater than zero. ' );
2164: END IF;
2165: RAISE ar_m_fail;
2166: END IF;

Line 2169: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.trx_date is NULL. Must have a value. ');

2165: RAISE ar_m_fail;
2166: END IF;
2167: IF ( p_ps_rec.trx_date IS NULL ) THEN
2168: IF PG_DEBUG in ('Y', 'C') THEN
2169: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.trx_date is NULL. Must have a value. ');
2170: END IF;
2171: RAISE ar_m_fail;
2172: END IF;
2173: IF ( p_ps_rec.amount_due_original IS NULL )

Line 2176: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.amount_due_original is NULL . Must have a value. ');

2172: END IF;
2173: IF ( p_ps_rec.amount_due_original IS NULL )
2174: THEN
2175: IF PG_DEBUG in ('Y', 'C') THEN
2176: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.amount_due_original is NULL . Must have a value. ');
2177: END IF;
2178: RAISE ar_m_fail;
2179: END IF;
2180: IF ( p_ps_rec.invoice_currency_code IS NULL ) THEN

Line 2182: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.invoice_currency_code is NULL . Must have a value. ');

2178: RAISE ar_m_fail;
2179: END IF;
2180: IF ( p_ps_rec.invoice_currency_code IS NULL ) THEN
2181: IF PG_DEBUG in ('Y', 'C') THEN
2182: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.invoice_currency_code is NULL . Must have a value. ');
2183: END IF;
2184: RAISE ar_m_fail;
2185: END IF;
2186: IF ( p_ps_rec.discount_taken_earned IS NULL ) THEN

Line 2227: arp_standard.debug( 'arp_calculate_discount.check_input() -' );

2223: -- If lines_original = NULL
2224: -- Set lines_original = 0
2225: --
2226: IF PG_DEBUG in ('Y', 'C') THEN
2227: arp_standard.debug( 'arp_calculate_discount.check_input() -' );
2228: END IF;
2229: --
2230: EXCEPTION
2231: WHEN OTHERS THEN

Line 2233: arp_standard.debug( 'Exception: arp_calculate_discount.check_input()' );

2229: --
2230: EXCEPTION
2231: WHEN OTHERS THEN
2232: IF PG_DEBUG in ('Y', 'C') THEN
2233: arp_standard.debug( 'Exception: arp_calculate_discount.check_input()' );
2234: END IF;
2235: RAISE;
2236: END check_input;
2237: --

Line 2278: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_maxd() +' );

2274: p_unearned_disc IN OUT NOCOPY NUMBER) IS
2275: l_max_disc NUMBER;
2276: BEGIN
2277: IF PG_DEBUG in ('Y', 'C') THEN
2278: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_maxd() +' );
2279: END IF;
2280: --
2281: IF ( ABS(p_disc_rec.max_disc) < ABS(p_earned_disc) ) THEN
2282: p_earned_disc := p_disc_rec.max_disc;

Line 2297: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_maxd() -' );

2293: -- If max-earned < full unearned discount
2294: -- set unearned discount = max-earned
2295: --
2296: IF PG_DEBUG in ('Y', 'C') THEN
2297: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_maxd() -' );
2298: END IF;
2299: --
2300: EXCEPTION
2301: WHEN OTHERS THEN

Line 2303: arp_standard.debug( 'Exception: arp_calculate_discount.decrease_discounts_to_maxd()');

2299: --
2300: EXCEPTION
2301: WHEN OTHERS THEN
2302: IF PG_DEBUG in ('Y', 'C') THEN
2303: arp_standard.debug( 'Exception: arp_calculate_discount.decrease_discounts_to_maxd()');
2304: END IF;
2305: RAISE;
2306: END decrease_discounts_to_maxd;
2307: --

Line 2382: arp_standard.debug( 'arp_calculate_discount.discounts_cover()+' );

2378: l_close_invoice_flag VARCHAR2(10);
2379: --
2380: BEGIN
2381: IF PG_DEBUG in ('Y', 'C') THEN
2382: arp_standard.debug( 'arp_calculate_discount.discounts_cover()+' );
2383: END IF;
2384: -- ARTA changes calls TA discount cover for TA installation
2385: IF nvl(arp_global.sysparam.ta_installed_flag,'N') = 'Y' THEN
2386: NULL; -- Do Nothing;

Line 2390: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );

2386: NULL; -- Do Nothing;
2387: -- Removed ARTA logic for Bug 4936298
2388: ELSE
2389: IF PG_DEBUG in ('Y', 'C') THEN
2390: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );

Line 2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );

2387: -- Removed ARTA logic for Bug 4936298
2388: ELSE
2389: IF PG_DEBUG in ('Y', 'C') THEN
2390: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );

Line 2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );

2388: ELSE
2389: IF PG_DEBUG in ('Y', 'C') THEN
2390: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );

Line 2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );

2389: IF PG_DEBUG in ('Y', 'C') THEN
2390: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );

Line 2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );

2390: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );

Line 2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );

2391: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );

Line 2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );

2392: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );

Line 2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );

2393: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );

Line 2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );

2394: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );

Line 2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );

2395: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );

Line 2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );

2396: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );

Line 2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );

2397: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );

Line 2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );

2398: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );

Line 2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );

2399: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );

Line 2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );

2400: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2408: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );

Line 2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );

2401: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2408: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2409: END IF;

Line 2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );

2402: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2408: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2409: END IF;
2410: --

Line 2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );

2403: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2408: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2409: END IF;
2410: --
2411: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN

Line 2408: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );

2404: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2405: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2406: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2407: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2408: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2409: END IF;
2410: --
2411: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
2412: validate_args_discounts_cover( p_mode, p_invoice_currency_code,

Line 2491: arp_standard.debug('discounts_cover: ' || 'arp_calculate_discount.calc_discount()-' );

2487: l_earned_both_flag := 'B';
2488: END IF;
2489: --
2490: IF PG_DEBUG in ('Y', 'C') THEN
2491: arp_standard.debug('discounts_cover: ' || 'arp_calculate_discount.calc_discount()-' );
2492: END IF;
2493: --
2494: arp_calculate_discount.calculate_discounts( p_input_amount,
2495: p_grace_days,

Line 2557: arp_standard.debug( 'arp_calculate_discount.discounts_cover()-' );

2553: END IF; /* discount on partial payments not allowed */
2554: --
2555: END IF;
2556: IF PG_DEBUG in ('Y', 'C') THEN
2557: arp_standard.debug( 'arp_calculate_discount.discounts_cover()-' );
2558: END IF;
2559: --
2560: EXCEPTION
2561: WHEN OTHERS THEN

Line 2563: arp_standard.debug( 'EXCEPTION: arp_calculate_discount.discounts_cover'

2559: --
2560: EXCEPTION
2561: WHEN OTHERS THEN
2562: IF PG_DEBUG in ('Y', 'C') THEN
2563: arp_standard.debug( 'EXCEPTION: arp_calculate_discount.discounts_cover'
2564: );
2565: END IF;
2566: RAISE;
2567: END discounts_cover;

Line 2663: | arp_standard.debug - debug procedure |

2659: | |
2660: | SCOPE - PRIVATE |
2661: | |
2662: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED - NONE |
2663: | arp_standard.debug - debug procedure |
2664: | |
2665: | ARGUMENTS : IN: |
2666: | p_mode - Mode |
2667: | p_currrency_code - Invoice Currency Code |

Line 2689: arp_standard.debug( 'arp_calculate_discount.validate_args_discounts_cover()+' );

2685: p_trx_date IN ar_payment_schedules.trx_date%TYPE,
2686: p_apply_date IN ar_cash_receipts.receipt_date%TYPE ) IS
2687: BEGIN
2688: IF PG_DEBUG in ('Y', 'C') THEN
2689: arp_standard.debug( 'arp_calculate_discount.validate_args_discounts_cover()+' );
2690: END IF;
2691: --
2692: IF ( p_mode is NULL OR p_invoice_currency_code IS NULL OR
2693: p_ps_id IS NULL OR p_trx_date IS NULL OR

Line 2700: arp_standard.debug( 'arp_calculate_discount.validate_args_discounts_cover()-' );

2696: APP_EXCEPTION.raise_exception;
2697: END IF;
2698: --
2699: IF PG_DEBUG in ('Y', 'C') THEN
2700: arp_standard.debug( 'arp_calculate_discount.validate_args_discounts_cover()-' );
2701: END IF;
2702: --
2703: EXCEPTION
2704: WHEN OTHERS THEN

Line 2706: arp_standard.debug('validate_args_discounts_cover: ' ||

2702: --
2703: EXCEPTION
2704: WHEN OTHERS THEN
2705: IF PG_DEBUG in ('Y', 'C') THEN
2706: arp_standard.debug('validate_args_discounts_cover: ' ||
2707: 'EXCEPTION: arp_calculate_discount.validate_args_calc_discoun
2708: ts' );
2709: END IF;
2710: RAISE;