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 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 404: arp_standard.init_standard;

400: /* 9214034 - The original select from dual
401: caused random ORA-6502 errors when called
402: from iReceivables. Replaced with direct
403: assignment and init. */
404: arp_standard.init_standard;
405: l_sys_disc_partial_pay_flag :=
406: arp_standard.sysparm.partial_discount_flag;
407:
408: /*--------------------------------------------------------------------+

Line 406: arp_standard.sysparm.partial_discount_flag;

402: from iReceivables. Replaced with direct
403: assignment and init. */
404: arp_standard.init_standard;
405: l_sys_disc_partial_pay_flag :=
406: arp_standard.sysparm.partial_discount_flag;
407:
408: /*--------------------------------------------------------------------+
409: |Bug 2334691 - If partial discount flag in system option is 'N' then |
410: |l_disc_rec.disc_partial_pmt_flag= 'N' , if discount flag is 'Y' on |

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

496: arp_standard.debug( 'p_error_code := '||p_error_code );
497: END IF;
498: END IF;
499: IF PG_DEBUG in ('Y', 'C') THEN
500: arp_standard.debug( 'arp_calculate_discount.calculate_discounts() -' );
501: END IF;
502: --
503: EXCEPTION
504: WHEN OTHERS THEN

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

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

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

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

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

569: get_current_discount_percent (p_disc_rec, p_ps_rec);
570: END IF;
571:
572: IF PG_DEBUG in ('Y', 'C') THEN
573: arp_standard.debug( 'arp_calculate_discount.get_discount_percentages()-');
574: END IF;
575: EXCEPTION
576: WHEN OTHERS THEN
577: IF PG_DEBUG in ('Y', 'C') THEN

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

574: END IF;
575: EXCEPTION
576: WHEN OTHERS THEN
577: IF PG_DEBUG in ('Y', 'C') THEN
578: arp_standard.debug( 'Exception: arp_calculate_discount.'||
579: 'get_discount_percentages()' );
580: END IF;
581: RAISE;
582: END get_discount_percentages;

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

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

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

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

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

662: END IF;
663: RAISE ar_m_no_rec;
664: WHEN OTHERS THEN
665: IF PG_DEBUG in ('Y', 'C') THEN
666: arp_standard.debug('get_payment_schedule_info: ' ||
667: 'EXCEPTION: arp_calculate_discount.get_payment_schedule_info' );
668: END IF;
669: RAISE;
670: END;

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

677: p_ps_rec.terms_sequence_number := AR_NO_TERM;
678: END IF;
679:
680: IF PG_DEBUG in ('Y', 'C') THEN
681: arp_standard.debug( 'arp_calculate_discount.get_payment_schedule_info()-');
682: END IF;
683:
684: EXCEPTION
685: WHEN OTHERS THEN

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

683:
684: EXCEPTION
685: WHEN OTHERS THEN
686: IF PG_DEBUG in ('Y', 'C') THEN
687: arp_standard.debug('get_payment_schedule_info: ' || 'Exception: arp_calculate_discount.'||
688: 'get_payment_schedule_info()' );
689: END IF;
690: RAISE;
691: END get_payment_schedule_info;

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

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

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

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

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

741:
742: IF PG_DEBUG in ('Y', 'C') THEN
743: arp_standard.debug( '-- best_discount_percentage:'||
744: TO_CHAR( p_disc_rec.best_disc_pct ) );
745: arp_standard.debug( 'arp_calculate_discount.'||
746: 'get_best_discount_percentage()-' );
747: END IF;
748:
749: EXCEPTION

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

748:
749: EXCEPTION
750: WHEN OTHERS THEN
751: IF PG_DEBUG in ('Y', 'C') THEN
752: arp_standard.debug( 'Exception: arp_calculate_discount.'||
753: 'get_best_discount_percentage()' );
754: END IF;
755: RAISE;
756: END get_best_discount_percentage;

Line 820: arp_standard.debug(

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

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

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

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

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

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

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

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

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

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

846:
847: IF PG_DEBUG in ('Y', 'C') THEN
848: arp_standard.debug( '--p_disc_rec.earned_disc_pct:'||
849: TO_CHAR(p_disc_rec.earned_disc_pct));
850: arp_standard.debug( 'arp_calculate_discount.'||
851: 'get_current_discount_percent()-' );
852: END IF;
853:
854: EXCEPTION

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

853:
854: EXCEPTION
855: WHEN OTHERS THEN
856: IF PG_DEBUG in ('Y', 'C') THEN
857: arp_standard.debug( 'EXCEPTION: arp_calculate_discount.'||
858: 'get_current_discount_percent()' );
859: END IF;
860: RAISE;
861:

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1120: --
1121: EXCEPTION
1122: WHEN OTHERS THEN
1123: IF PG_DEBUG in ('Y', 'C') THEN
1124: arp_standard.debug( 'Exception: arp_calculate_discount.correct_lines_only_discounts()' );
1125: END IF;
1126: RAISE;
1127: END correct_lines_only_discounts;
1128: --

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

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

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

1201: RETURN;
1202: END IF;
1203: --
1204: IF PG_DEBUG in ('Y', 'C') THEN
1205: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_adr() +' );
1206: END IF;
1207: --
1208: EXCEPTION
1209: WHEN OTHERS THEN

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

1207: --
1208: EXCEPTION
1209: WHEN OTHERS THEN
1210: IF PG_DEBUG in ('Y', 'C') THEN
1211: arp_standard.debug( 'Exception: arp_calculate_discount.decrease_discounts_to_adr()');
1212: END IF;
1213: RAISE;
1214: END decrease_discounts_to_adr;
1215: --

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1378: --
1379: EXCEPTION
1380: WHEN OTHERS THEN
1381: IF PG_DEBUG in ('Y', 'C') THEN
1382: arp_standard.debug( 'Exception: arp_calculate_discount.determine_max_allowed_disc()');
1383: END IF;
1384: RAISE;
1385: END determine_max_allowed_disc;
1386: --

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

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

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

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

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

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

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

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

Line 1485: arp_standard.init_standard;

1481: /* 9214034 - The original select from dual
1482: caused random ORA-6502 errors when called
1483: from iReceivables. Replaced with direct
1484: assignment and init. */
1485: arp_standard.init_standard;
1486: l_sys_disc_partial_pay_flag :=
1487: arp_standard.sysparm.partial_discount_flag;
1488:
1489:

Line 1487: arp_standard.sysparm.partial_discount_flag;

1483: from iReceivables. Replaced with direct
1484: assignment and init. */
1485: arp_standard.init_standard;
1486: l_sys_disc_partial_pay_flag :=
1487: arp_standard.sysparm.partial_discount_flag;
1488:
1489:
1490: /*--------------------------------------------------------------------+
1491: |Bug 2334691 - If partial discount flag in system option is 'N' then |

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

1493: |system option, then take the value from payment terms record |
1494: *--------------------------------------------------------------------*/
1495:
1496: IF PG_DEBUG in ('Y', 'C') THEN
1497: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);
1498: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_ps_disc_partial_pay_flag);
1499: END IF;
1500:
1501: IF NVL(l_sys_disc_partial_pay_flag,'N') = 'N' THEN

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

1494: *--------------------------------------------------------------------*/
1495:
1496: IF PG_DEBUG in ('Y', 'C') THEN
1497: arp_standard.debug( 'Partial Discount flag System Options = '|| l_sys_disc_partial_pay_flag);
1498: arp_standard.debug( 'Partial Discount flag Payment Term = '|| l_ps_disc_partial_pay_flag);
1499: END IF;
1500:
1501: IF NVL(l_sys_disc_partial_pay_flag,'N') = 'N' THEN
1502: l_ps_disc_partial_pay_flag := 'N';

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

1507:
1508: IF NVL(l_ps_disc_partial_pay_flag,'N') = 'Y'
1509: THEN
1510: IF PG_DEBUG in ('Y', 'C') THEN
1511: arp_standard.debug( ' disc_partial_pmt_flag: Y' );
1512: END IF;
1513: --
1514: --If partial payment discount is allowed then the following steps
1515: --are done.

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

1534: and application_type = 'CASH'
1535: and status = 'APP';
1536:
1537: IF PG_DEBUG in ('Y', 'C') THEN
1538: arp_standard.debug( 'from ar_rec_app :');
1539: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1540: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1541: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1542: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));

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

1535: and status = 'APP';
1536:
1537: IF PG_DEBUG in ('Y', 'C') THEN
1538: arp_standard.debug( 'from ar_rec_app :');
1539: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1540: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1541: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1542: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1543: END IF;

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

1536:
1537: IF PG_DEBUG in ('Y', 'C') THEN
1538: arp_standard.debug( 'from ar_rec_app :');
1539: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1540: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1541: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1542: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1543: END IF;
1544: end;

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

1537: IF PG_DEBUG in ('Y', 'C') THEN
1538: arp_standard.debug( 'from ar_rec_app :');
1539: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1540: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1541: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1542: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1543: END IF;
1544: end;
1545:

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

1538: arp_standard.debug( 'from ar_rec_app :');
1539: arp_standard.debug( 'payment_schedule_id = ' || to_char(p_ps_rec.payment_schedule_id));
1540: arp_standard.debug( 'l_amount_applied_to = ' || to_char(l_amount_applied_to));
1541: arp_standard.debug( 'l_earned_discount_taken = ' || to_char(l_earned_discount_taken));
1542: arp_standard.debug( 'l_unearned_discount_taken = ' || to_char(l_unearned_discount_taken));
1543: END IF;
1544: end;
1545:
1546: IF l_earned_disc_pct = 1

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

1556: - arpcurr.CurrRound(l_amt_due_remaining*l_earned_disc_pct,
1557: p_ps_rec.invoice_currency_code);
1558:
1559: IF PG_DEBUG in ('Y', 'C') THEN
1560: arp_standard.debug( 'l_temp = ' || to_char(l_temp));
1561: END IF;
1562:
1563: IF ( ( l_amt_due_remaining > 0 AND l_temp <= l_input_amt ) OR
1564: ( l_amt_due_remaining < 0 AND l_temp >= l_input_amt ) )

Line 1592: arp_standard.debug(

1588:
1589: l_input_amt_earned := l_input_amt;
1590:
1591: IF PG_DEBUG in ('Y', 'C') THEN
1592: arp_standard.debug(
1593: 'current receipt amount : l_input_amt_earned --:' ||
1594: TO_CHAR(l_input_amt_earned));
1595: END IF;
1596:

Line 1615: arp_standard.debug(

1611: -- l_earned_discount_taken from p_earned_disc
1612: -- also consolidated debug messages in one if pg_debug if block
1613:
1614: IF PG_DEBUG in ('Y', 'C') THEN
1615: arp_standard.debug(
1616: 'discount available for THIS receipt : ' ||
1617: to_char(p_earned_disc));
1618:
1619: arp_standard.debug('calculate_direct_discount: total redeemable discount 1 : ' ||

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

1615: arp_standard.debug(
1616: 'discount available for THIS receipt : ' ||
1617: to_char(p_earned_disc));
1618:
1619: arp_standard.debug('calculate_direct_discount: total redeemable discount 1 : ' ||
1620: TO_CHAR(p_earned_disc + l_earned_discount_taken));
1621: END IF;
1622: END IF;
1623:

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

1621: END IF;
1622: END IF;
1623:
1624: IF PG_DEBUG in ('Y', 'C') THEN
1625: arp_standard.debug( 'total redeemable discount 3 :'||TO_CHAR(p_earned_disc));
1626: END IF;
1627:
1628: END IF;
1629: --

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

1663: l_best_disc := (l_input_amt_unearned*l_best_pct ) /
1664: ( 1 - l_best_pct );
1665: END IF;
1666: IF PG_DEBUG in ('Y', 'C') THEN
1667: arp_standard.debug( 'ptr 1- l_unearned_disc:'||TO_CHAR(l_best_disc));
1668: END IF;
1669: l_best_disc := l_best_disc - l_unearned_discount_taken;
1670: IF PG_DEBUG in ('Y', 'C') THEN
1671: arp_standard.debug( 'ptr 2- l_unearned_disc:'||TO_CHAR(l_best_disc));

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

1667: arp_standard.debug( 'ptr 1- l_unearned_disc:'||TO_CHAR(l_best_disc));
1668: END IF;
1669: l_best_disc := l_best_disc - l_unearned_discount_taken;
1670: IF PG_DEBUG in ('Y', 'C') THEN
1671: arp_standard.debug( 'ptr 2- l_unearned_disc:'||TO_CHAR(l_best_disc));
1672: END IF;
1673: END IF;
1674: END IF;
1675: --

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

1679: END IF;
1680: --
1681: ELSE
1682: IF PG_DEBUG in ('Y', 'C') THEN
1683: arp_standard.debug( ' disc_partial_pmt_flag: !Y' );
1684: END IF;
1685: -- If partial payment discount is not allowed, then the following
1686: -- steps are taken.
1687: -- earned discount = (current %) * ADO

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

1744: p_unearned_disc := p_disc_rec.max_disc - p_earned_disc;
1745: END IF;
1746:
1747: IF PG_DEBUG in ('Y', 'C') THEN
1748: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1749: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1750: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1751: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1752: END IF;

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

1745: END IF;
1746:
1747: IF PG_DEBUG in ('Y', 'C') THEN
1748: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1749: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1750: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1751: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1752: END IF;
1753:

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

1746:
1747: IF PG_DEBUG in ('Y', 'C') THEN
1748: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1749: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1750: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1751: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1752: END IF;
1753:
1754: EXCEPTION

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

1747: IF PG_DEBUG in ('Y', 'C') THEN
1748: arp_standard.debug( '-- p_earned_disc: '||TO_CHAR(p_earned_disc));
1749: arp_standard.debug( '-- max_disc:' ||TO_CHAR(p_disc_rec.max_disc));
1750: arp_standard.debug( '-- p_unearned_disc:'||TO_CHAR(p_unearned_disc));
1751: arp_standard.debug( 'arp_calculate_discount.calculate_direct_discount()-');
1752: END IF;
1753:
1754: EXCEPTION
1755: WHEN OTHERS THEN

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

1753:
1754: EXCEPTION
1755: WHEN OTHERS THEN
1756: IF PG_DEBUG in ('Y', 'C') THEN
1757: arp_standard.debug( 'Exception: arp_calculate_discount.'||
1758: 'calculate_direct_discount()');
1759: END IF;
1760: RAISE;
1761: END calculate_direct_discount;

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

1808: l_disc_to_take NUMBER;
1809: l_OIR_AR BOOLEAN;
1810: BEGIN
1811: IF PG_DEBUG in ('Y', 'C') THEN
1812: arp_standard.debug( 'arp_calculate_discount.calculate_default_discount() +' );
1813: END IF;
1814: --
1815: /*FP bug 5335376 for Bug 5223829 Leftover changes of bug for case of system option partial discount unchecked
1816: Set variable based on parameter p_called_from*/

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

1830: --If partial payment discount is allowed then the following steps
1831: --are done.
1832: --Earned discount = ADR * (earned discount %)
1833: IF PG_DEBUG in ('Y', 'C') THEN
1834: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1835: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));
1836: END IF;
1837: p_earned_disc := l_amt_due_remaining * l_earned_disc_pct;
1838: IF PG_DEBUG in ('Y', 'C') THEN

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

1831: --are done.
1832: --Earned discount = ADR * (earned discount %)
1833: IF PG_DEBUG in ('Y', 'C') THEN
1834: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1835: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));
1836: END IF;
1837: p_earned_disc := l_amt_due_remaining * l_earned_disc_pct;
1838: IF PG_DEBUG in ('Y', 'C') THEN
1839: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));

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

1835: arp_standard.debug( 'l_earned_disc_pct = '||TO_CHAR( l_earned_disc_pct ));
1836: END IF;
1837: p_earned_disc := l_amt_due_remaining * l_earned_disc_pct;
1838: IF PG_DEBUG in ('Y', 'C') THEN
1839: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));
1840: END IF;
1841: --Calculate unearned discount.
1842: --If earned discount percentage equal to best discount percentage.
1843: --unearned discount = 0.

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

1877: --
1878: --
1879: -- make sure max discount is not exceeded. reduce discounts as needed
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1882: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'before 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( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );

1878: --
1879: -- make sure max discount is not exceeded. reduce discounts as needed
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1882: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1884: END IF;
1885: --
1886: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');

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

1879: -- make sure max discount is not exceeded. reduce discounts as needed
1880: IF PG_DEBUG in ('Y', 'C') THEN
1881: arp_standard.debug( 'before decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1882: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1884: END IF;
1885: --
1886: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');
1887: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );

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

1882: arp_standard.debug( 'before decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1883: arp_standard.debug( 'before decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1884: END IF;
1885: --
1886: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');
1887: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );
1888: --
1889: IF PG_DEBUG in ('Y', 'C') THEN
1890: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );

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

1886: -- arp_standard.debug( ' TEST: do not call decrease_discounts_to_maxd');
1887: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );
1888: --
1889: IF PG_DEBUG in ('Y', 'C') THEN
1890: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1891: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1892: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1893: END IF;
1894: --

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

1887: decrease_discounts_to_maxd(p_disc_rec, p_ps_rec, p_earned_disc, p_unearned_disc );
1888: --
1889: IF PG_DEBUG in ('Y', 'C') THEN
1890: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1891: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1892: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1893: END IF;
1894: --
1895: -- amount to apply = ADR - discount to be taken

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

1888: --
1889: IF PG_DEBUG in ('Y', 'C') THEN
1890: arp_standard.debug( 'After decrease_discounts_to_maxd, p_earned_disc = '||TO_CHAR( p_earned_disc ) );
1891: arp_standard.debug( 'After decrease_discounts_to_maxd, p_unearned_disc = '||TO_CHAR( p_unearned_disc ) );
1892: arp_standard.debug( 'After decrease_discounts_to_maxd, p_disc_rec.max_disc = '||TO_CHAR( p_disc_rec.max_disc ) );
1893: END IF;
1894: --
1895: -- amount to apply = ADR - discount to be taken
1896: -- calculate discount to take

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

1905: END IF;
1906: -- subtract discount from ADR
1907: p_out_amt_to_apply := l_amt_due_remaining - l_disc_to_take;
1908: IF PG_DEBUG in ('Y', 'C') THEN
1909: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1910: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1911: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));
1912: END IF;
1913: --If Input Amount = CLOSE_INVOICE then

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

1906: -- subtract discount from ADR
1907: p_out_amt_to_apply := l_amt_due_remaining - l_disc_to_take;
1908: IF PG_DEBUG in ('Y', 'C') THEN
1909: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1910: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1911: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));
1912: END IF;
1913: --If Input Amount = CLOSE_INVOICE then
1914: IF ( p_disc_rec.close_invoice_flag = 'Y' ) THEN

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

1907: p_out_amt_to_apply := l_amt_due_remaining - l_disc_to_take;
1908: IF PG_DEBUG in ('Y', 'C') THEN
1909: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1910: arp_standard.debug( 'l_amt_due_remaining = '||TO_CHAR( l_amt_due_remaining ));
1911: arp_standard.debug( 'l_disc_to_take = '||TO_CHAR( l_disc_to_take ));
1912: END IF;
1913: --If Input Amount = CLOSE_INVOICE then
1914: IF ( p_disc_rec.close_invoice_flag = 'Y' ) THEN
1915: RETURN;

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

1941:
1942: IF l_OIR_AR THEN
1943: p_out_amt_to_apply := l_input_amt;
1944: IF PG_DEBUG in ('Y', 'C') THEN
1945: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
1946: END IF;
1947:
1948: IF ( p_disc_rec.disc_partial_pmt_flag = 'N' ) THEN
1949: p_earned_disc := 0;

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

1986: IF (p_mode = AR_DIRECT_NEW_DISC OR p_mode = AR_DEFAULT_NEW_DISC) THEN
1987: p_unearned_disc := p_disc_rec.max_disc - p_earned_disc;
1988: END IF;
1989: IF PG_DEBUG in ('Y', 'C') THEN
1990: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||
1991: TO_CHAR( p_earned_disc ) );
1992: arp_standard.debug( 'max_disc in calculate_default_discount = '||
1993: TO_CHAR( p_disc_rec.max_disc ) );
1994: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||

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

1988: END IF;
1989: IF PG_DEBUG in ('Y', 'C') THEN
1990: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||
1991: TO_CHAR( p_earned_disc ) );
1992: arp_standard.debug( 'max_disc in calculate_default_discount = '||
1993: TO_CHAR( p_disc_rec.max_disc ) );
1994: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||
1995: TO_CHAR( p_unearned_disc ) );
1996: END IF;

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

1990: arp_standard.debug( 'p_earned_disc in calculate_default_discount = '||
1991: TO_CHAR( p_earned_disc ) );
1992: arp_standard.debug( 'max_disc in calculate_default_discount = '||
1993: TO_CHAR( p_disc_rec.max_disc ) );
1994: arp_standard.debug( 'p_unearned_disc in calculate_default_discount = '||
1995: TO_CHAR( p_unearned_disc ) );
1996: END IF;
1997: --
1998: --

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

1997: --
1998: --
1999: --
2000: IF PG_DEBUG in ('Y', 'C') THEN
2001: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));
2002: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
2003: END IF;
2004: --If receipt unapplied (input amount) < 0
2005: --then Amount to default(amount to apply) =0.

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

1998: --
1999: --
2000: IF PG_DEBUG in ('Y', 'C') THEN
2001: arp_standard.debug( 'p_earned_disc = '||TO_CHAR( p_earned_disc ));
2002: arp_standard.debug( 'p_out_amt_to_apply = '||TO_CHAR( p_out_amt_to_apply ));
2003: END IF;
2004: --If receipt unapplied (input amount) < 0
2005: --then Amount to default(amount to apply) =0.
2006: --else

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

2013: --else
2014: --set discount to 0.
2015: --
2016: IF PG_DEBUG in ('Y', 'C') THEN
2017: arp_standard.debug( 'arp_calculate_discount.calculate_default_discount() -' );
2018: END IF;
2019: --
2020: EXCEPTION
2021: WHEN OTHERS THEN

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

2019: --
2020: EXCEPTION
2021: WHEN OTHERS THEN
2022: IF PG_DEBUG in ('Y', 'C') THEN
2023: arp_standard.debug( 'Exception: arp_calculate_discount.calculate_default_discount()');
2024: END IF;
2025: RAISE;
2026: END calculate_default_discount;
2027: --

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

2060: p_select_flag IN BOOLEAN,
2061: p_ps_rec IN OUT NOCOPY ar_payment_schedules%ROWTYPE ) IS
2062: BEGIN
2063: IF PG_DEBUG in ('Y', 'C') THEN
2064: arp_standard.debug( 'arp_calculate_discount.check_input() +' );
2065: END IF;
2066: --
2067: -- If Input Amount equals NULL
2068: -- exit with error

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

2068: -- exit with error
2069: IF p_disc_rec.input_amt IS NULL
2070: THEN
2071: IF PG_DEBUG in ('Y', 'C') THEN
2072: arp_standard.debug( 'arp_calculate_discount.check_input : Input amount is NULL. Must have a value.' );
2073: END IF;
2074: --error_code := AR_M_FAILURE ;
2075: IF PG_DEBUG in ('Y', 'C') THEN
2076: arp_standard.debug( 'Check input Failed' );

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

2072: arp_standard.debug( 'arp_calculate_discount.check_input : Input amount is NULL. Must have a value.' );
2073: END IF;
2074: --error_code := AR_M_FAILURE ;
2075: IF PG_DEBUG in ('Y', 'C') THEN
2076: arp_standard.debug( 'Check input Failed' );
2077: END IF;
2078: --APP_EXCEPTION.raise_exception;
2079: RAISE ar_m_fail;
2080: END IF;

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

2082: -- exit with error
2083: IF p_disc_rec.apply_date IS NULL
2084: THEN
2085: IF PG_DEBUG in ('Y', 'C') THEN
2086: arp_standard.debug( 'arp_calculate_discount.check_input : Apply date is NULL. Must have a value.' );
2087: END IF;
2088: --error_code := AR_M_FAILURE ;
2089: IF PG_DEBUG in ('Y', 'C') THEN
2090: arp_standard.debug( 'Check input Failed' );

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

2086: arp_standard.debug( 'arp_calculate_discount.check_input : Apply date is NULL. Must have a value.' );
2087: END IF;
2088: --error_code := AR_M_FAILURE ;
2089: IF PG_DEBUG in ('Y', 'C') THEN
2090: arp_standard.debug( 'Check input Failed' );
2091: END IF;
2092: --APP_EXCEPTION.raise_exception;
2093: RAISE ar_m_fail;
2094: END IF;

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

2103: IF p_disc_rec.disc_partial_pmt_flag <> 'Y' AND
2104: p_disc_rec.disc_partial_pmt_flag <> 'N'
2105: THEN
2106: IF PG_DEBUG in ('Y', 'C') THEN
2107: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.disc_partial_pmt_flag' );
2108: END IF;
2109: RAISE ar_m_fail;
2110: END IF;
2111: -- If calc_disc_on_lines not in ('Y', 'N', 'I', 'L', 'T', 'F')

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

2117: p_disc_rec.calc_disc_on_lines <> 'T' AND
2118: p_disc_rec.calc_disc_on_lines <> 'F'
2119: THEN
2120: IF PG_DEBUG in ('Y', 'C') THEN
2121: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.calc_disc_on_lines' );
2122: END IF;
2123: RAISE ar_m_fail;
2124: END IF;
2125: END IF;

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

2128: -- exit with error
2129: IF ( p_disc_rec.earned_both_flag <> AR_EARNED_INDICATOR AND
2130: p_disc_rec.earned_both_flag <> AR_BOTH_INDICATOR ) THEN
2131: IF PG_DEBUG in ('Y', 'C') THEN
2132: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_disc_rec.earned_both_flag' );
2133: END IF;
2134: RAISE ar_m_fail;
2135: END IF;
2136: -- If Select_flag <> TRUE AND <> FALSE

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

2136: -- If Select_flag <> TRUE AND <> FALSE
2137: -- exit with error
2138: IF ( p_select_flag <> TRUE AND p_select_flag <> FALSE ) THEN
2139: IF PG_DEBUG in ('Y', 'C') THEN
2140: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for p_select_flag. Must be TRUE or FALSE.' );
2141: END IF;
2142: RAISE ar_m_fail;
2143: END IF;
2144: -- If payment_schedule_id <= 0

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

2144: -- If payment_schedule_id <= 0
2145: -- exit with error
2146: IF ( p_ps_rec.payment_schedule_id <= 0 ) THEN
2147: IF PG_DEBUG in ('Y', 'C') THEN
2148: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for
2149: p_ps_rec.payment_schedule_id. Must be greater than zero.' );
2150: END IF;
2151: RAISE ar_m_fail;
2152: END IF;

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

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

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

2167: p_ps_rec.terms_sequence_number := AR_NO_TERM;
2168: ELSIF ( p_ps_rec.terms_sequence_number < 0 )
2169: THEN
2170: IF PG_DEBUG in ('Y', 'C') THEN
2171: arp_standard.debug( 'arp_calculate_discount.check_input : Invalid value for
2172: p_ps_rec.terms_sequence_number. Must be greater than zero. ' );
2173: END IF;
2174: RAISE ar_m_fail;
2175: END IF;

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

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

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

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

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

2187: RAISE ar_m_fail;
2188: END IF;
2189: IF ( p_ps_rec.invoice_currency_code IS NULL ) THEN
2190: IF PG_DEBUG in ('Y', 'C') THEN
2191: arp_standard.debug( 'arp_calculate_discount.check_input : p_ps_rec.invoice_currency_code is NULL . Must have a value. ');
2192: END IF;
2193: RAISE ar_m_fail;
2194: END IF;
2195: IF ( p_ps_rec.discount_taken_earned IS NULL ) THEN

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

2232: -- If lines_original = NULL
2233: -- Set lines_original = 0
2234: --
2235: IF PG_DEBUG in ('Y', 'C') THEN
2236: arp_standard.debug( 'arp_calculate_discount.check_input() -' );
2237: END IF;
2238: --
2239: EXCEPTION
2240: WHEN OTHERS THEN

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

2238: --
2239: EXCEPTION
2240: WHEN OTHERS THEN
2241: IF PG_DEBUG in ('Y', 'C') THEN
2242: arp_standard.debug( 'Exception: arp_calculate_discount.check_input()' );
2243: END IF;
2244: RAISE;
2245: END check_input;
2246: --

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

2283: p_unearned_disc IN OUT NOCOPY NUMBER) IS
2284: l_max_disc NUMBER;
2285: BEGIN
2286: IF PG_DEBUG in ('Y', 'C') THEN
2287: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_maxd() +' );
2288: END IF;
2289: --
2290: IF ( ABS(p_disc_rec.max_disc) < ABS(p_earned_disc) ) THEN
2291: p_earned_disc := p_disc_rec.max_disc;

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

2302: -- If max-earned < full unearned discount
2303: -- set unearned discount = max-earned
2304: --
2305: IF PG_DEBUG in ('Y', 'C') THEN
2306: arp_standard.debug( 'arp_calculate_discount.decrease_discounts_to_maxd() -' );
2307: END IF;
2308: --
2309: EXCEPTION
2310: WHEN OTHERS THEN

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

2308: --
2309: EXCEPTION
2310: WHEN OTHERS THEN
2311: IF PG_DEBUG in ('Y', 'C') THEN
2312: arp_standard.debug( 'Exception: arp_calculate_discount.decrease_discounts_to_maxd()');
2313: END IF;
2314: RAISE;
2315: END decrease_discounts_to_maxd;
2316: --

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

2387: l_close_invoice_flag VARCHAR2(10);
2388: --
2389: BEGIN
2390: IF PG_DEBUG in ('Y', 'C') THEN
2391: arp_standard.debug( 'arp_calculate_discount.discounts_cover()+' );
2392: END IF;
2393:
2394: /* 12987134 - set called_from based on p_module_name */
2395: IF p_module_name = 'ARXRWAPP'

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

2402: NULL; -- Do Nothing;
2403: -- Removed ARTA logic for Bug 4936298
2404: ELSE
2405: IF PG_DEBUG in ('Y', 'C') THEN
2406: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2407: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );

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

2403: -- Removed ARTA logic for Bug 4936298
2404: ELSE
2405: IF PG_DEBUG in ('Y', 'C') THEN
2406: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2407: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );

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

2404: ELSE
2405: IF PG_DEBUG in ('Y', 'C') THEN
2406: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2407: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );

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

2405: IF PG_DEBUG in ('Y', 'C') THEN
2406: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2407: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );

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

2406: arp_standard.debug('discounts_cover: ' || 'Mode : '||p_mode );
2407: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );

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

2407: arp_standard.debug('discounts_cover: ' || 'Currency Code : '||p_invoice_currency_code );
2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );

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

2408: arp_standard.debug('discounts_cover: ' || 'PS ID : '||p_ps_id );
2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );

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

2409: arp_standard.debug('discounts_cover: ' || 'Term Id : '||p_term_id );
2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );

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

2410: arp_standard.debug('discounts_cover: ' || 'Term Seq Num : '||p_terms_sequence_number );
2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );

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

2411: arp_standard.debug('discounts_cover: ' || 'Trx Date : '||TO_CHAR( p_trx_date ) );
2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );

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

2412: arp_standard.debug('discounts_cover: ' || 'Receipt Date : '||TO_CHAR( p_trx_date ) );
2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );

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

2413: arp_standard.debug('discounts_cover: ' || 'Grace Days : '||p_grace_days );
2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );

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

2414: arp_standard.debug('discounts_cover: ' || 'Part. Disc. Flag : '||p_partial_discount_flag );
2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );

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

2415: arp_standard.debug('discounts_cover: ' || 'Calc. Disc. Lines : '||p_calc_discount_on_lines_flag );
2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2423: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );

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

2416: arp_standard.debug('discounts_cover: ' || 'Earned Disc. Pct : '||p_earned_disc_pct );
2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2423: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2424: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );

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

2417: arp_standard.debug('discounts_cover: ' || 'Best Disc. Pct : '||p_best_disc_pct );
2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2423: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2424: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2425: END IF;

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

2418: arp_standard.debug('discounts_cover: ' || 'Input Amount : '||p_input_amount );
2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2423: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2424: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2425: END IF;
2426: --

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

2419: arp_standard.debug('discounts_cover: ' || 'ADO : '||p_amount_due_original );
2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2423: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2424: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2425: END IF;
2426: --
2427: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN

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

2420: arp_standard.debug('discounts_cover: ' || 'ADR : '||p_amount_due_remaining );
2421: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Earned: '||p_discount_taken_earned );
2422: arp_standard.debug('discounts_cover: ' || 'Disc. Taken Unearn: '||p_discount_taken_unearned );
2423: arp_standard.debug('discounts_cover: ' || 'Lines Items Orig. : '||p_amount_line_items_original );
2424: arp_standard.debug('discounts_cover: ' || 'Out Discount Date : '||TO_CHAR( p_out_discount_date ) );
2425: END IF;
2426: --
2427: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
2428: validate_args_discounts_cover( p_mode, p_invoice_currency_code,

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

2508: l_earned_both_flag := 'B';
2509: END IF;
2510: --
2511: IF PG_DEBUG in ('Y', 'C') THEN
2512: arp_standard.debug('discounts_cover: ' || 'arp_calculate_discount.calc_discount()-' );
2513: END IF;
2514: --
2515: arp_calculate_discount.calculate_discounts( p_input_amount,
2516: p_grace_days,

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

2574: END IF; /* discount on partial payments not allowed */
2575: --
2576: END IF;
2577: IF PG_DEBUG in ('Y', 'C') THEN
2578: arp_standard.debug( 'arp_calculate_discount.discounts_cover()-' );
2579: END IF;
2580: --
2581: EXCEPTION
2582: WHEN OTHERS THEN

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

2580: --
2581: EXCEPTION
2582: WHEN OTHERS THEN
2583: IF PG_DEBUG in ('Y', 'C') THEN
2584: arp_standard.debug( 'EXCEPTION: arp_calculate_discount.discounts_cover'
2585: );
2586: END IF;
2587: RAISE;
2588: END discounts_cover;

Line 2684: | arp_standard.debug - debug procedure |

2680: | |
2681: | SCOPE - PRIVATE |
2682: | |
2683: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED - NONE |
2684: | arp_standard.debug - debug procedure |
2685: | |
2686: | ARGUMENTS : IN: |
2687: | p_mode - Mode |
2688: | p_currrency_code - Invoice Currency Code |

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

2706: p_trx_date IN ar_payment_schedules.trx_date%TYPE,
2707: p_apply_date IN ar_cash_receipts.receipt_date%TYPE ) IS
2708: BEGIN
2709: IF PG_DEBUG in ('Y', 'C') THEN
2710: arp_standard.debug( 'arp_calculate_discount.validate_args_discounts_cover()+' );
2711: END IF;
2712: --
2713: IF ( p_mode is NULL OR p_invoice_currency_code IS NULL OR
2714: p_ps_id IS NULL OR p_trx_date IS NULL OR

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

2717: APP_EXCEPTION.raise_exception;
2718: END IF;
2719: --
2720: IF PG_DEBUG in ('Y', 'C') THEN
2721: arp_standard.debug( 'arp_calculate_discount.validate_args_discounts_cover()-' );
2722: END IF;
2723: --
2724: EXCEPTION
2725: WHEN OTHERS THEN

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

2723: --
2724: EXCEPTION
2725: WHEN OTHERS THEN
2726: IF PG_DEBUG in ('Y', 'C') THEN
2727: arp_standard.debug('validate_args_discounts_cover: ' ||
2728: 'EXCEPTION: arp_calculate_discount.validate_args_calc_discoun
2729: ts' );
2730: END IF;
2731: RAISE;