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.FV_DC_ASSIGN_FINANCE_CHRG dependencies on FND_LOG

Line 77: fv_utility.debug_mesg(fnd_log.level_statement, p_module,p_message);

73: p_module IN VARCHAR2,
74: p_message IN VARCHAR2
75: ) IS
76: BEGIN
77: fv_utility.debug_mesg(fnd_log.level_statement, p_module,p_message);
78: END;
79:
80: PROCEDURE initialize_global_variables
81: IS

Line 94: g_CURRENT_LOG_LEVEL := fnd_log.g_current_runtime_level;

90: g_org_id := mo_global.get_current_org_id;
91: mo_utils.get_ledger_info(g_org_id, g_set_of_books_id, g_ledger_name);
92: g_enter := 'ENTER';
93: g_exit := 'EXIT';
94: g_CURRENT_LOG_LEVEL := fnd_log.g_current_runtime_level;
95: g_out_rec_count := 0;
96: g_lo_date := TO_DATE('1-1-1900', 'DD-MM-YYYY');
97: g_hi_date := TO_DATE('31-12-4000', 'DD-MM-YYYY');
98: END;

Line 116: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

112: l_module_name := g_module_name || 'initialize_program_variables';
113: p_retcode := g_SUCCESS;
114: p_errbuf := NULL;
115:
116: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
117: debug(l_module_name,g_enter);
118: END IF;
119:
120: BEGIN

Line 143: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

139: END;
140:
141: IF (p_retcode = g_SUCCESS) THEN
142: BEGIN
143: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
144: debug(l_module_name,'SELECT gl_period_statuses');
145: END IF;
146: SELECT 1
147: INTO l_ar_period_count

Line 163: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

159: WHEN OTHERS THEN
160: p_retcode := g_FAILURE;
161: p_errbuf := SQLERRM;
162: l_location := l_module_name||'.select_gl_period_statuses2';
163: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
164: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
165: END;
166: END IF;
167:

Line 164: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

160: p_retcode := g_FAILURE;
161: p_errbuf := SQLERRM;
162: l_location := l_module_name||'.select_gl_period_statuses2';
163: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
164: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
165: END;
166: END IF;
167:
168:

Line 169: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

165: END;
166: END IF;
167:
168:
169: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
170: debug(l_module_name,g_exit);
171: END IF;
172:
173: EXCEPTION

Line 299: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

295: l_module_name := g_module_name || 'accrue_charges';
296: p_retcode := g_SUCCESS;
297: p_errbuf := NULL;
298:
299: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
300: debug(l_module_name,g_enter);
301: END IF;
302:
303: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

Line 303: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

299: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
300: debug(l_module_name,g_enter);
301: END IF;
302:
303: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
304: debug(l_module_name,'p_last_date='||p_last_date);
305: debug(l_module_name,'p_customer_trx_id='||p_customer_trx_id);
306: debug(l_module_name,'p_rate_amount='||p_rate_amount);
307: debug(l_module_name,'p_interval='||p_interval);

Line 321: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

317: -- the amount for the schedule that is late.
318:
319: l_ct_id := p_customer_trx_id;
320: BEGIN
321: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
322: debug(l_module_name,'l_ct_id='||l_ct_id);
323: END IF;
324:
325: SELECT SUM(amount_due_remaining)

Line 331: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

327: FROM ar_payment_schedules
328: WHERE customer_trx_id = l_ct_id
329: AND class = 'INV';
330:
331: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
332: debug(l_module_name,'l_amt_due='||l_amt_due);
333: END IF;
334:
335: EXCEPTION

Line 348: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

344: ELSE
345: l_amt_due := p_amount_due_remaining;
346: END IF;
347:
348: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
349: debug(l_module_name,'l_amt_due(1)='||l_amt_due);
350: END IF;
351:
352: IF (p_retcode = g_SUCCESS) THEN

Line 356: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

352: IF (p_retcode = g_SUCCESS) THEN
353: l_accrued_amount := round(l_amt_due * p_rate_amount *
354: ((trunc(p_accrue_as_of_date) - trunc(p_last_date))/360),2);
355: g_out_rec_tab(g_out_rec_count).comments := 'Accrued Amount = '||l_amt_due||'*'||p_rate_amount||'*('||(trunc(p_accrue_as_of_date) - trunc(p_last_date))||'/360)'||'='||l_accrued_amount;
356: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
357: debug(l_module_name,'l_accrued_amount='||l_accrued_amount);
358: END IF;
359: END IF;
360:

Line 361: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

357: debug(l_module_name,'l_accrued_amount='||l_accrued_amount);
358: END IF;
359: END IF;
360:
361: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
362: debug(l_module_name,g_exit);
363: END IF;
364: p_charges := l_accrued_amount;
365: EXCEPTION

Line 395: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

391: p_retcode := g_SUCCESS;
392: p_errbuf := NULL;
393: p_number_of_periods := 1; -- starting at one takes in to consideration we must
394:
395: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
396: debug(l_module_name,'Inside '||l_module_name);
397: debug(l_module_name,'p_interval='||p_interval);
398: debug(l_module_name,'p_last_accrual_date='||p_last_accrual_date);
399: debug(l_module_name,'p_first_late_day='||p_first_late_day);

Line 412: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

408: p_number_of_periods := trunc((trunc(p_accrue_as_of_date) - trunc(p_first_late_day))/p_interval);
409: END IF;
410: END IF;
411:
412: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
413: l_location := '6';
414: debug(l_module_name,'p_number_of_periods='||p_number_of_periods);
415: END IF;
416:

Line 423: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

419: p_retcode := g_FAILURE;
420: p_errbuf := SQLERRM;
421: debug(l_module_name,'l_location='||l_location);
422: l_location := l_module_name||'.final_exception';
423: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
424: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
425: END missed_intervals;
426:
427: PROCEDURE submit_report

Line 424: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

420: p_errbuf := SQLERRM;
421: debug(l_module_name,'l_location='||l_location);
422: l_location := l_module_name||'.final_exception';
423: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
424: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
425: END missed_intervals;
426:
427: PROCEDURE submit_report
428: (

Line 451: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

447: start_time => NULL,
448: sub_request => FALSE,
449: argument1 => g_request_id
450: );
451: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
452: debug (l_module_name,'Submitting Detail report '||l_conc_req_id);
453: END IF;
454:
455: IF (l_conc_req_id = 0) THEN

Line 466: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

462: WHEN OTHERS THEN
463: p_retcode := g_FAILURE;
464: p_errbuf := SQLERRM;
465: l_location := l_module_name||'.final_exception';
466: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
467: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
468: END submit_report;
469:
470: PROCEDURE interpret_dm_error

Line 467: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

463: p_retcode := g_FAILURE;
464: p_errbuf := SQLERRM;
465: l_location := l_module_name||'.final_exception';
466: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
467: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
468: END submit_report;
469:
470: PROCEDURE interpret_dm_error
471: (

Line 535: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

531: WHEN OTHERS THEN
532: p_retcode := g_FAILURE;
533: p_errbuf := SQLERRM;
534: l_location := l_module_name||'.final_exception';
535: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
536: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
537: END interpret_dm_error;
538:
539: PROCEDURE check_and_correct_rounding

Line 536: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

532: p_retcode := g_FAILURE;
533: p_errbuf := SQLERRM;
534: l_location := l_module_name||'.final_exception';
535: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
536: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
537: END interpret_dm_error;
538:
539: PROCEDURE check_and_correct_rounding
540: (

Line 562: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

558: l_module_name := g_module_name || 'check_and_correct_rounding';
559: p_retcode := g_SUCCESS;
560: p_errbuf := null;
561:
562: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
563: debug(l_module_name,g_enter);
564: END IF;
565:
566: /* First correct the line amount variations if any */

Line 569: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

565:
566: /* First correct the line amount variations if any */
567: l_total_line_amount := 0;
568: l_line_id := 0;
569: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
570: debug (l_module_name,'Checking if total of line changes are correct');
571: END IF;
572: FOR line IN 1..p_trx_lines_tbl.COUNT LOOP
573: l_line_id := l_line_id + 1;

Line 577: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

573: l_line_id := l_line_id + 1;
574: l_total_line_amount := l_total_line_amount + p_trx_lines_tbl(l_line_id).amount;
575: END LOOP;
576:
577: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
578: debug (l_module_name,'l_total_line_amount='||l_total_line_amount);
579: debug (l_module_name,'p_amount='||p_amount);
580: debug (l_module_name,'l_line_id='||l_line_id);
581: END IF;

Line 586: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

582:
583: IF (l_total_line_amount <> p_amount) THEN
584: p_trx_lines_tbl(l_line_id).amount := p_trx_lines_tbl(l_line_id).amount + (p_amount-l_total_line_amount);
585: p_trx_lines_tbl(l_line_id).unit_selling_price := p_trx_lines_tbl(l_line_id).amount;
586: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
587: debug (l_module_name,'Changed the line amount');
588: debug (l_module_name,'amount='||p_trx_lines_tbl(l_line_id).amount);
589: debug (l_module_name,'unit_selling_price='||p_trx_lines_tbl(l_line_id).unit_selling_price);
590: END IF;

Line 595: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

591: END IF;
592:
593: /* Now correct the dist amount variations if any */
594: l_line_id := 0;
595: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
596: debug (l_module_name,'Checking if total of dist changes are correct');
597: END IF;
598: FOR line IN 1..p_trx_lines_tbl.COUNT LOOP
599: l_line_id := l_line_id + 1;

Line 611: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

607: l_total_dist_amount := l_total_dist_amount + p_trx_dist_tbl(l_dist_id).amount;
608: p_trx_dist_tbl(l_dist_id).percent := ROUND((p_trx_dist_tbl(l_dist_id).amount/p_trx_lines_tbl(l_line_id).amount)*100, 4);
609: l_total_percent := l_total_percent + p_trx_dist_tbl(l_dist_id).percent;
610: l_last_dist_id := l_dist_id;
611: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
612: debug (l_module_name,'Checking for dist amounts');
613: debug (l_module_name,'percent='||p_trx_dist_tbl(l_dist_id).percent);
614: debug (l_module_name,'Running l_total_dist_amount='||l_total_dist_amount);
615: debug (l_module_name,'Running l_total_percent='||l_total_percent);

Line 620: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

616: END IF;
617: END IF;
618: END LOOP;
619:
620: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
621: debug (l_module_name,'l_total_dist_amount='||l_total_dist_amount);
622: debug (l_module_name,'l_total_percent(1)='||l_total_percent);
623: debug (l_module_name,'p_trx_lines_tbl(l_line_id).amount='||p_trx_lines_tbl(l_line_id).amount);
624: debug (l_module_name,'l_last_dist_id='||l_last_dist_id);

Line 632: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

628: l_total_percent := l_total_percent - p_trx_dist_tbl(l_last_dist_id).percent;
629: p_trx_dist_tbl(l_last_dist_id).amount := p_trx_dist_tbl(l_last_dist_id).amount + (p_trx_lines_tbl(l_line_id).amount - l_total_dist_amount);
630: p_trx_dist_tbl(l_last_dist_id).percent := ROUND((p_trx_dist_tbl(l_last_dist_id).amount/p_trx_lines_tbl(l_line_id).amount)*100, 4);
631: l_total_percent := l_total_percent + p_trx_dist_tbl(l_last_dist_id).percent;
632: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
633: debug (l_module_name,'Changed the dist amount');
634: debug (l_module_name,'amount='||p_trx_dist_tbl(l_last_dist_id).amount);
635: debug (l_module_name,'percent='||p_trx_dist_tbl(l_last_dist_id).percent);
636: END IF;

Line 639: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

635: debug (l_module_name,'percent='||p_trx_dist_tbl(l_last_dist_id).percent);
636: END IF;
637: END IF;
638:
639: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
640: debug (l_module_name,'l_total_percent(2)='||l_total_percent);
641: debug (l_module_name,'l_last_dist_id='||l_last_dist_id);
642: END IF;
643:

Line 653: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

649: WHEN OTHERS THEN
650: p_retcode := g_FAILURE;
651: p_errbuf := SQLERRM;
652: l_location := l_module_name||'.final_exception';
653: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
654: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
655: END;
656:
657: PROCEDURE create_dm

Line 654: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

650: p_retcode := g_FAILURE;
651: p_errbuf := SQLERRM;
652: l_location := l_module_name||'.final_exception';
653: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
654: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
655: END;
656:
657: PROCEDURE create_dm
658: (

Line 715: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

711: l_module_name := g_module_name || 'create_dm';
712: p_retcode := g_SUCCESS;
713: p_errbuf := null;
714:
715: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
716: debug(l_module_name,g_enter);
717: END IF;
718:
719: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

Line 719: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

715: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
716: debug(l_module_name,g_enter);
717: END IF;
718:
719: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
720: debug (l_module_name,'p_invoice_date_type='||p_invoice_date_type);
721: debug (l_module_name,'p_trx_date='||p_trx_date);
722: debug (l_module_name,'p_due_date='||p_due_date);
723: debug (l_module_name,'p_trx_currency='||p_trx_currency);

Line 765: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

761: WHEN OTHERS THEN
762: p_retcode := g_FAILURE;
763: p_errbuf := SQLERRM;
764: l_location := l_module_name||'.select_fv_ra_customer_trx_s';
765: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
766: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
767: END;
768: END IF;
769:

Line 766: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

762: p_retcode := g_FAILURE;
763: p_errbuf := SQLERRM;
764: l_location := l_module_name||'.select_fv_ra_customer_trx_s';
765: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
766: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
767: END;
768: END IF;
769:
770: IF (p_retcode = g_SUCCESS) THEN

Line 776: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

772: SELECT SUM(NVL(rctl.amount_due_remaining, rctl.quantity_invoiced*rctl.unit_selling_price))
773: INTO l_total_line_amount
774: FROM ra_customer_trx_lines rctl
775: WHERE rctl.customer_trx_id = p_parent_invoice_id;
776: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
777: debug (l_module_name,'l_total_line_amount='||l_total_line_amount);
778: END IF;
779: EXCEPTION
780: WHEN OTHERS THEN

Line 784: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

780: WHEN OTHERS THEN
781: p_retcode := g_FAILURE;
782: p_errbuf := SQLERRM;
783: l_location := l_module_name||'.select_ra_customer_trx_lines';
784: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
785: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
786: END;
787: END IF;
788:

Line 785: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

781: p_retcode := g_FAILURE;
782: p_errbuf := SQLERRM;
783: l_location := l_module_name||'.select_ra_customer_trx_lines';
784: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
785: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
786: END;
787: END IF;
788:
789: IF (p_retcode = g_SUCCESS) THEN

Line 836: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

832: --Currently AR allows only one Receivable line so putting the percent
833: --at 100.
834: l_trx_dist_tbl(l_dist_counter).percent := 100;
835: l_trx_dist_tbl(l_dist_counter).code_combination_id := inv_dist_rec.code_combination_id;
836: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
837: debug (l_module_name,'** DIST BEGIN **');
838: debug (l_module_name,'trx_header_id='||l_trx_dist_tbl(l_dist_counter).trx_header_id);
839: debug (l_module_name,'trx_line_id='||l_trx_dist_tbl(l_dist_counter).trx_line_id);
840: debug (l_module_name,'trx_dist_id='||l_trx_dist_tbl(l_dist_counter).trx_dist_id);

Line 853: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

849: IF (p_prorate_charge = 'L') THEN
850: FOR inv_lines_rec IN (SELECT *
851: FROM ra_customer_trx_lines rctl
852: WHERE rctl.customer_trx_id = p_parent_invoice_id) LOOP
853: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
854: debug (l_module_name,'inv_lines_rec.amount_due_remaining='||inv_lines_rec.amount_due_remaining);
855: debug (l_module_name,'inv_lines_rec.quantity_invoiced='||inv_lines_rec.quantity_invoiced);
856: debug (l_module_name,'inv_lines_rec.unit_selling_price='||inv_lines_rec.unit_selling_price);
857: END IF;

Line 859: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

855: debug (l_module_name,'inv_lines_rec.quantity_invoiced='||inv_lines_rec.quantity_invoiced);
856: debug (l_module_name,'inv_lines_rec.unit_selling_price='||inv_lines_rec.unit_selling_price);
857: END IF;
858: l_line_amount_due := NVL(inv_lines_rec.amount_due_remaining, (inv_lines_rec.quantity_invoiced*inv_lines_rec.unit_selling_price));
859: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
860: debug (l_module_name,'l_line_amount_due='||l_line_amount_due);
861: debug (l_module_name,'l_total_line_amount='||l_total_line_amount);
862: debug (l_module_name,'p_amount='||p_amount);
863: END IF;

Line 865: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

861: debug (l_module_name,'l_total_line_amount='||l_total_line_amount);
862: debug (l_module_name,'p_amount='||p_amount);
863: END IF;
864: l_prorated_line_amount := ROUND((l_line_amount_due/l_total_line_amount), 2)*p_amount;
865: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
866: debug (l_module_name,'l_prorated_line_amount='||l_prorated_line_amount);
867: END IF;
868: l_line_counter := l_line_counter + 1;
869: l_trx_lines_tbl(l_line_counter).trx_header_id := 1;

Line 879: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

875: l_trx_lines_tbl(l_line_counter).quantity_invoiced := 1;
876: l_trx_lines_tbl(l_line_counter).amount := l_prorated_line_amount;
877: l_trx_lines_tbl(l_line_counter).unit_selling_price := l_prorated_line_amount;
878:
879: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
880: debug (l_module_name,'** LINES BEGIN **');
881: debug (l_module_name,'trx_header_id='||l_trx_lines_tbl(l_line_counter).trx_header_id);
882: debug (l_module_name,'trx_line_id='||l_trx_lines_tbl(l_line_counter).trx_line_id);
883: debug (l_module_name,'line_number='||l_trx_lines_tbl(l_line_counter).line_number);

Line 898: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

894: FROM ra_cust_trx_line_gl_dist rctl
895: WHERE rctl.customer_trx_id = p_parent_invoice_id
896: AND rctl.customer_trx_line_id = inv_lines_rec.customer_trx_line_id) LOOP
897: l_dist_counter := l_dist_counter + 1;
898: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
899: debug (l_module_name,'REC');
900: debug (l_module_name,'inv_dist_rec.percent='||inv_dist_rec.percent);
901: debug (l_module_name,'l_prorated_line_amount='||l_prorated_line_amount);
902: debug (l_module_name,'amount='||(l_prorated_line_amount*inv_dist_rec.percent)/100);

Line 914: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

910: --l_trx_dist_tbl(l_dist_counter).percent := NULL;
911: l_trx_dist_tbl(l_dist_counter).percent := inv_dist_rec.percent;
912:
913: l_trx_dist_tbl(l_dist_counter).code_combination_id := inv_dist_rec.code_combination_id;
914: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
915: debug (l_module_name,'** DIST BEGIN **');
916: debug (l_module_name,'trx_header_id='||l_trx_dist_tbl(l_dist_counter).trx_header_id);
917: debug (l_module_name,'trx_line_id='||l_trx_dist_tbl(l_dist_counter).trx_line_id);
918: debug (l_module_name,'trx_dist_id='||l_trx_dist_tbl(l_dist_counter).trx_dist_id);

Line 939: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

935: l_trx_lines_tbl(l_line_counter).quantity_invoiced := 1;
936: l_trx_lines_tbl(l_line_counter).amount := p_amount;
937: l_trx_lines_tbl(l_line_counter).unit_selling_price := p_amount;
938:
939: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
940: debug (l_module_name,'** LINES BEGIN **');
941: debug (l_module_name,'trx_header_id='||l_trx_lines_tbl(l_line_counter).trx_header_id);
942: debug (l_module_name,'trx_line_id='||l_trx_lines_tbl(l_line_counter).trx_line_id);
943: debug (l_module_name,'line_number='||l_trx_lines_tbl(l_line_counter).line_number);

Line 970: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

966: GROUP BY code_combination_id
967: ORDER BY code_combination_id) LOOP
968:
969: l_dist_counter := l_dist_counter + 1;
970: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
971: debug (l_module_name,'REC');
972: debug (l_module_name,'inv_dist_rec.percent='||inv_dist_rec.percent);
973: debug (l_module_name,'amount='||inv_dist_rec.amount);
974: END IF;

Line 985: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

981: --l_trx_dist_tbl(l_dist_counter).percent := NULL;
982: l_trx_dist_tbl(l_dist_counter).percent := inv_dist_rec.percent*100;
983:
984: l_trx_dist_tbl(l_dist_counter).code_combination_id := inv_dist_rec.code_combination_id;
985: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
986: debug (l_module_name,'** DIST BEGIN **');
987: debug (l_module_name,'trx_header_id='||l_trx_dist_tbl(l_dist_counter).trx_header_id);
988: debug (l_module_name,'trx_line_id='||l_trx_dist_tbl(l_dist_counter).trx_line_id);
989: debug (l_module_name,'trx_dist_id='||l_trx_dist_tbl(l_dist_counter).trx_dist_id);

Line 1039: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1035: END IF;
1036:
1037:
1038: IF (p_retcode = g_SUCCESS) THEN
1039: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1040: debug (l_module_name,'Calling ar_invoice_api_pub.create_single_invoice');
1041: END IF;
1042:
1043: ar_invoice_api_pub.create_single_invoice

Line 1059: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1055: x_msg_count => l_message_count,
1056: x_msg_data => l_message_data
1057: );
1058:
1059: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1060: debug (l_module_name,'l_return_status='||l_return_status);
1061: debug (l_module_name,'l_message_count='||l_message_count);
1062: debug (l_module_name,'l_message_data='||l_message_data);
1063: debug (l_module_name,'p_dm_invoice_id='||p_dm_invoice_id);

Line 1092: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1088: WHEN OTHERS THEN
1089: p_retcode := g_FAILURE;
1090: p_errbuf := SQLERRM;
1091: l_location := l_module_name||'.update_ra_customer_trx';
1092: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1093: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1094: END;
1095: END IF;
1096:

Line 1093: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

1089: p_retcode := g_FAILURE;
1090: p_errbuf := SQLERRM;
1091: l_location := l_module_name||'.update_ra_customer_trx';
1092: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1093: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1094: END;
1095: END IF;
1096:
1097:

Line 1103: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1099: WHEN OTHERS THEN
1100: p_retcode := g_FAILURE;
1101: p_errbuf := SQLERRM;
1102: l_location := l_module_name||'.final_exception';
1103: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1104: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1105: END create_dm;
1106:
1107: PROCEDURE process_and_create_dm

Line 1104: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

1100: p_retcode := g_FAILURE;
1101: p_errbuf := SQLERRM;
1102: l_location := l_module_name||'.final_exception';
1103: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1104: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1105: END create_dm;
1106:
1107: PROCEDURE process_and_create_dm
1108: (

Line 1165: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1161: ELSE
1162: l_root_invoice_id := p_root_invoice_id;
1163: END IF;
1164:
1165: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1166: debug(l_module_name,'Calling create_dm');
1167: END IF;
1168:
1169: l_term_id := p_immediate_term_id;

Line 1211: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1207: );
1208:
1209: IF (p_retcode = g_SUCCESS) THEN
1210: BEGIN
1211: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1212: debug(l_module_name,'Insert fv_ar_fin_chrg_invoices');
1213: END IF;
1214: INSERT INTO fv_ar_fin_chrg_invoices
1215: (

Line 1265: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1261: WHEN OTHERS THEN
1262: p_retcode := g_FAILURE;
1263: p_errbuf := SQLERRM;
1264: l_location := l_module_name||'.insert_fv_ar_fin_chrg_invoices';
1265: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1266: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1267: END;
1268: END IF;
1269:

Line 1266: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

1262: p_retcode := g_FAILURE;
1263: p_errbuf := SQLERRM;
1264: l_location := l_module_name||'.insert_fv_ar_fin_chrg_invoices';
1265: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1266: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1267: END;
1268: END IF;
1269:
1270: IF (p_retcode = g_SUCCESS) THEN

Line 1272: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1268: END IF;
1269:
1270: IF (p_retcode = g_SUCCESS) THEN
1271: BEGIN
1272: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1273: debug(l_module_name,'Insert fv_ar_fin_chrg_inv_lines');
1274: END IF;
1275: INSERT INTO fv_ar_fin_chrg_inv_lines
1276: (

Line 1315: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1311: WHEN OTHERS THEN
1312: p_retcode := g_FAILURE;
1313: p_errbuf := SQLERRM;
1314: l_location := l_module_name||'.insert_fv_ar_fin_chrg_inv_lines';
1315: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1316: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1317: END;
1318: END IF;
1319:

Line 1316: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

1312: p_retcode := g_FAILURE;
1313: p_errbuf := SQLERRM;
1314: l_location := l_module_name||'.insert_fv_ar_fin_chrg_inv_lines';
1315: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1316: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1317: END;
1318: END IF;
1319:
1320: IF (p_retcode = g_SUCCESS) THEN

Line 1321: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1317: END;
1318: END IF;
1319:
1320: IF (p_retcode = g_SUCCESS) THEN
1321: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1322: debug(l_module_name,'Updating fv_ar_fin_chrg_invoices(1)');
1323: END IF;
1324:
1325: BEGIN

Line 1345: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1341: finance_charges = NVL(finance_charges, 0) + p_finance_charges
1342: WHERE invoice_id = l_root_invoice_id;
1343: END IF;
1344:
1345: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1346: debug(l_module_name,'Updated '||SQL%ROWCOUNT||' rows.');
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN

Line 1353: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1349: WHEN OTHERS THEN
1350: p_retcode := g_FAILURE;
1351: p_errbuf := SQLERRM;
1352: l_location := l_module_name||'.update_fv_ar_fin_chrg_invoices (1)';
1353: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1354: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1355: END;
1356: END IF;
1357:

Line 1354: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

1350: p_retcode := g_FAILURE;
1351: p_errbuf := SQLERRM;
1352: l_location := l_module_name||'.update_fv_ar_fin_chrg_invoices (1)';
1353: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1354: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1355: END;
1356: END IF;
1357:
1358: IF (p_retcode = g_SUCCESS) THEN

Line 1413: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1409: WHEN OTHERS THEN
1410: p_retcode := g_FAILURE;
1411: p_errbuf := SQLERRM;
1412: l_location := l_module_name||'.insert_fv_invoice_finance_chrgs';
1413: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1414: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1415: END;
1416: END LOOP;
1417: END IF;

Line 1414: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

1410: p_retcode := g_FAILURE;
1411: p_errbuf := SQLERRM;
1412: l_location := l_module_name||'.insert_fv_invoice_finance_chrgs';
1413: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1414: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1415: END;
1416: END LOOP;
1417: END IF;
1418:

Line 1419: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

1415: END;
1416: END LOOP;
1417: END IF;
1418:
1419: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
1420: debug(l_module_name,g_enter);
1421: END IF;
1422: EXCEPTION
1423: WHEN OTHERS THEN

Line 1427: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1423: WHEN OTHERS THEN
1424: p_retcode := g_FAILURE;
1425: p_errbuf := SQLERRM;
1426: l_location := l_module_name||'.final_exception';
1427: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1428: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1429: END process_and_create_dm;
1430:
1431: PROCEDURE get_cvf_rate

Line 1428: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

1424: p_retcode := g_FAILURE;
1425: p_errbuf := SQLERRM;
1426: l_location := l_module_name||'.final_exception';
1427: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1428: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1429: END process_and_create_dm;
1430:
1431: PROCEDURE get_cvf_rate
1432: (

Line 1447: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1443: p_retcode := g_SUCCESS;
1444: p_errbuf := NULL;
1445: p_cvf_rate := NULL;
1446:
1447: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1448: debug(l_module_name,'Inside '||l_module_name);
1449: debug(l_module_name,'p_accrue_as_of_date '||p_accrue_as_of_date);
1450: END IF;
1451: BEGIN

Line 1467: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1463: p_retcode := g_FAILURE;
1464: p_errbuf := SQLERRM;
1465: debug(l_module_name,'l_location='||l_location);
1466: l_location := l_module_name||'.final_exception';
1467: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1468: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1469: END get_cvf_rate;
1470:
1471: PROCEDURE get_last_accrual_date

Line 1468: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

1464: p_errbuf := SQLERRM;
1465: debug(l_module_name,'l_location='||l_location);
1466: l_location := l_module_name||'.final_exception';
1467: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1468: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1469: END get_cvf_rate;
1470:
1471: PROCEDURE get_last_accrual_date
1472: (

Line 1488: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1484: p_retcode := g_SUCCESS;
1485: p_errbuf := NULL;
1486: p_last_accrual_date := NULL;
1487:
1488: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1489: debug(l_module_name,'Inside '||l_module_name);
1490: debug(l_module_name,'p_payment_schedule_id '||p_payment_schedule_id);
1491: debug(l_module_name,'p_charge_type '||p_charge_type);
1492: END IF;

Line 1510: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1506: p_retcode := g_FAILURE;
1507: p_errbuf := SQLERRM;
1508: debug(l_module_name,'l_location='||l_location);
1509: l_location := l_module_name||'.final_exception';
1510: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1511: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1512: END get_last_accrual_date;
1513:
1514: PROCEDURE set_last_accrual_date

Line 1511: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

1507: p_errbuf := SQLERRM;
1508: debug(l_module_name,'l_location='||l_location);
1509: l_location := l_module_name||'.final_exception';
1510: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1511: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1512: END get_last_accrual_date;
1513:
1514: PROCEDURE set_last_accrual_date
1515: (

Line 1531: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1527: l_module_name := g_module_name || 'set_last_accrual_date';
1528: p_retcode := g_SUCCESS;
1529: p_errbuf := NULL;
1530:
1531: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1532: debug(l_module_name,'Inside '||l_module_name);
1533: debug(l_module_name,'p_org_id '||p_org_id);
1534: debug(l_module_name,'p_payment_schedule_id '||p_payment_schedule_id);
1535: debug(l_module_name,'p_charge_type '||p_charge_type);

Line 1566: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1562: p_retcode := g_FAILURE;
1563: p_errbuf := SQLERRM;
1564: debug(l_module_name,'l_location='||l_location);
1565: l_location := l_module_name||'.final_exception';
1566: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1567: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1568: END set_last_accrual_date;
1569:
1570: ----------------------------------------------------------------------------------------------

Line 1567: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

1563: p_errbuf := SQLERRM;
1564: debug(l_module_name,'l_location='||l_location);
1565: l_location := l_module_name||'.final_exception';
1566: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1567: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
1568: END set_last_accrual_date;
1569:
1570: ----------------------------------------------------------------------------------------------
1571:

Line 1603: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

1599: l_module_name := g_module_name || 'assign_finance_charge';
1600: p_retcode := g_SUCCESS;
1601: p_errbuf := NULL;
1602: l_accrue_as_of_date := TRUNC(SYSDATE);
1603: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
1604: debug(l_module_name,g_enter);
1605: END IF;
1606:
1607: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

Line 1607: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1603: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
1604: debug(l_module_name,g_enter);
1605: END IF;
1606:
1607: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1608: debug(l_module_name,'p_invoice_date_type='||p_invoice_date_type);
1609: debug(l_module_name,'p_gl_date='||p_gl_date);
1610: END IF;
1611:

Line 1625: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1621: );
1622:
1623: IF (p_retcode = g_SUCCESS) THEN
1624: IF (p_retcode = g_SUCCESS) THEN
1625: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1626: debug(l_module_name,'Calling get_cvf_rate');
1627: END IF;
1628: /*
1629: Get the Current Value of Fund rate as this is not going to change

Line 1639: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1635: p_cvf_rate => l_cvf_rate,
1636: p_errbuf => p_errbuf,
1637: p_retcode => p_retcode
1638: );
1639: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1640: debug(l_module_name,'p_cvf_rate ='||l_cvf_rate);
1641: END IF;
1642: END IF;
1643: END IF;

Line 1646: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1642: END IF;
1643: END IF;
1644:
1645: IF (p_retcode = g_SUCCESS) THEN
1646: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1647: debug(l_module_name,'main_rec');
1648: END IF;
1649: FOR main_rec IN (SELECT aps.customer_trx_id invoice_id,
1650: aps.amount_due_remaining,

Line 1743: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1739: ORDER BY rct.customer_trx_id,
1740: fcc.charge_id,
1741: aps.payment_schedule_id)
1742: LOOP
1743: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1744: debug(l_module_name,'************************************************************');
1745: debug(l_module_name,'main_rec.invoice_id='||main_rec.invoice_id);
1746: debug(l_module_name,'main_rec.amount_due_remaining='||main_rec.amount_due_remaining);
1747: debug(l_module_name,'main_rec.payment_schedule_id='||main_rec.payment_schedule_id);

Line 1804: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1800: log (l_location,p_errbuf);
1801: END IF;
1802:
1803: IF (p_retcode = g_SUCCESS) THEN
1804: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1805: debug(l_module_name,'Calling get_last_accrual_date');
1806: END IF;
1807: get_last_accrual_date
1808: (

Line 1815: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1811: p_last_accrual_date => main_rec.last_accrual_date,
1812: p_errbuf => p_errbuf,
1813: p_retcode => p_retcode
1814: );
1815: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1816: debug(l_module_name,'main_rec.last_accrual_date='||main_rec.last_accrual_date);
1817: END IF;
1818: END IF;
1819:

Line 1847: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1843: g_out_rec_tab(g_out_rec_count).payment_schedule_id := main_rec.payment_schedule_id;
1844: g_out_rec_tab(g_out_rec_count).charge_type := main_rec.charge_type;
1845:
1846: IF (main_rec.rate_type = 'CVFR' AND l_cvf_rate IS NOT NULL) THEN
1847: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1848: debug(l_module_name,'Changing the rates to CVFR');
1849: END IF;
1850: main_rec.rate_flag := 'Y';
1851: main_rec.rate_amount := l_cvf_rate/100;

Line 1869: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

1865: WHEN OTHERS THEN
1866: p_retcode := g_FAILURE;
1867: p_errbuf := SQLERRM;
1868: l_location := l_module_name||'.select_ar_payment_schedules';
1869: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1870: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1871: END;
1872: END IF;
1873:

Line 1870: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

1866: p_retcode := g_FAILURE;
1867: p_errbuf := SQLERRM;
1868: l_location := l_module_name||'.select_ar_payment_schedules';
1869: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
1870: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
1871: END;
1872: END IF;
1873:
1874: IF (NVL(l_old_invoice_id, -999) = main_rec.invoice_id AND

Line 1921: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1917: ELSE
1918: l_accrual_date := main_rec.last_accrual_date;
1919: END IF;
1920:
1921: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1922: debug(l_module_name,'Calling accrue_charges');
1923: END IF;
1924: -- l_first_late_day := trunc(main_rec.due_date) + main_rec.first_accrual + main_rec.grace_period + 1;
1925: g_out_rec_tab(g_out_rec_count).accrual_date := l_accrual_date;

Line 1940: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1936: p_retcode => p_retcode
1937: );
1938: g_out_rec_tab(g_out_rec_count).finance_charges := l_finance_charges;
1939:
1940: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1941: debug(l_module_name,'accrue_charges return code = '||p_retcode);
1942: debug(l_module_name,'accrue_charges return buf = '||p_errbuf);
1943: END IF;
1944:

Line 1945: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

1941: debug(l_module_name,'accrue_charges return code = '||p_retcode);
1942: debug(l_module_name,'accrue_charges return buf = '||p_errbuf);
1943: END IF;
1944:
1945: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
1946: debug(l_module_name,'l_finance_charges='||l_finance_charges);
1947: END IF;
1948:
1949: ELSE

Line 2064: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2060: WHEN OTHERS THEN
2061: p_retcode := g_FAILURE;
2062: p_errbuf := SQLERRM;
2063: l_location := l_module_name||'.final_exception';
2064: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2065: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
2066: ROLLBACK;
2067: END;
2068:

Line 2065: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);

2061: p_retcode := g_FAILURE;
2062: p_errbuf := SQLERRM;
2063: l_location := l_module_name||'.final_exception';
2064: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2065: fv_utility.log_mesg(fnd_log.level_unexpected, l_location, p_errbuf);
2066: ROLLBACK;
2067: END;
2068:
2069:

Line 2110: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN

2106: l_module_name := g_module_name || 'assign_finance_charge';
2107: p_retcode := g_SUCCESS;
2108: p_errbuf := null;
2109:
2110: IF (fnd_log.level_procedure >= g_CURRENT_LOG_LEVEL) THEN
2111: debug(l_module_name,g_enter);
2112: END IF;
2113:
2114:

Line 2116: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

2112: END IF;
2113:
2114:
2115: BEGIN
2116: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
2117: debug(l_module_name,'g_set_of_books_id='||g_set_of_books_id);
2118: END IF;
2119:
2120: SELECT currency_code

Line 2125: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

2121: INTO l_currency_code
2122: FROM gl_ledgers_public_v
2123: WHERE ledger_id = g_set_of_books_id;
2124:
2125: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
2126: debug(l_module_name,'l_currency_code='||l_currency_code);
2127: END IF;
2128:
2129: EXCEPTION

Line 2134: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2130: WHEN OTHERS THEN
2131: p_retcode := g_FAILURE;
2132: p_errbuf := SQLERRM;
2133: l_location := l_module_name||'.select_gl_ledgers_public_v';
2134: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2135: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2136: END;
2137:
2138: IF (p_retcode = g_SUCCESS) THEN

Line 2135: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

2131: p_retcode := g_FAILURE;
2132: p_errbuf := SQLERRM;
2133: l_location := l_module_name||'.select_gl_ledgers_public_v';
2134: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2135: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2136: END;
2137:
2138: IF (p_retcode = g_SUCCESS) THEN
2139: FOR customer in c1 (g_set_of_books_id)

Line 2141: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

2137:
2138: IF (p_retcode = g_SUCCESS) THEN
2139: FOR customer in c1 (g_set_of_books_id)
2140: LOOP
2141: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
2142: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,'Updating waive flag for: '||customer.customer_id);
2143: END IF;
2144:
2145: BEGIN

Line 2142: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,'Updating waive flag for: '||customer.customer_id);

2138: IF (p_retcode = g_SUCCESS) THEN
2139: FOR customer in c1 (g_set_of_books_id)
2140: LOOP
2141: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
2142: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,'Updating waive flag for: '||customer.customer_id);
2143: END IF;
2144:
2145: BEGIN
2146:

Line 2228: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2224: WHEN OTHERS THEN
2225: p_retcode := g_FAILURE;
2226: p_errbuf := SQLERRM;
2227: l_location := l_module_name||'.update_fv_cust_finance_chrgs';
2228: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2229: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2230: END;
2231: END LOOP;
2232: END IF;

Line 2229: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

2225: p_retcode := g_FAILURE;
2226: p_errbuf := SQLERRM;
2227: l_location := l_module_name||'.update_fv_cust_finance_chrgs';
2228: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2229: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2230: END;
2231: END LOOP;
2232: END IF;
2233:

Line 2275: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2271: WHEN OTHERS THEN
2272: p_retcode := g_FAILURE;
2273: p_errbuf := SQLERRM;
2274: l_location := l_module_name||'.delete_fv_cust_finance_chrgs';
2275: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2276: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2277: END;
2278:
2279: BEGIN

Line 2276: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

2272: p_retcode := g_FAILURE;
2273: p_errbuf := SQLERRM;
2274: l_location := l_module_name||'.delete_fv_cust_finance_chrgs';
2275: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2276: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2277: END;
2278:
2279: BEGIN
2280: INSERT INTO fv_cust_finance_chrgs

Line 2341: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2337: WHEN OTHERS THEN
2338: p_retcode := g_FAILURE;
2339: p_errbuf := SQLERRM;
2340: l_location := l_module_name||'.insert_fv_cust_finance_chrgs';
2341: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2342: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2343: END;
2344: END IF;
2345:

Line 2342: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

2338: p_retcode := g_FAILURE;
2339: p_errbuf := SQLERRM;
2340: l_location := l_module_name||'.insert_fv_cust_finance_chrgs';
2341: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2342: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2343: END;
2344: END IF;
2345:
2346: IF (p_retcode = g_SUCCESS) THEN

Line 2425: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2421: WHEN OTHERS THEN
2422: p_retcode := g_FAILURE;
2423: p_errbuf := SQLERRM;
2424: l_location := l_module_name||'.insert_fv_cust_finance_chrgs';
2425: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2426: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2427: END;
2428: END IF;
2429: IF (p_retcode = g_SUCCESS) THEN

Line 2426: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

2422: p_retcode := g_FAILURE;
2423: p_errbuf := SQLERRM;
2424: l_location := l_module_name||'.insert_fv_cust_finance_chrgs';
2425: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2426: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2427: END;
2428: END IF;
2429: IF (p_retcode = g_SUCCESS) THEN
2430: BEGIN

Line 2506: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2502: WHEN OTHERS THEN
2503: p_retcode := g_FAILURE;
2504: p_errbuf := SQLERRM;
2505: l_location := l_module_name||'.insert_fv_invoice_finance_chrgs';
2506: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2507: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2508: END;
2509: END IF;
2510:

Line 2507: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;

2503: p_retcode := g_FAILURE;
2504: p_errbuf := SQLERRM;
2505: l_location := l_module_name||'.insert_fv_invoice_finance_chrgs';
2506: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2507: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,p_errbuf) ;
2508: END;
2509: END IF;
2510:
2511: IF (p_retcode = g_SUCCESS) THEN

Line 2526: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN

2522: argument2 => l_currency_code,
2523: argument3 => g_request_id
2524: );
2525:
2526: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
2527: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name, 'l_req_id = '||l_req_id);
2528: END IF;
2529:
2530:

Line 2527: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name, 'l_req_id = '||l_req_id);

2523: argument3 => g_request_id
2524: );
2525:
2526: IF (fnd_log.level_statement >= g_CURRENT_LOG_LEVEL) THEN
2527: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name, 'l_req_id = '||l_req_id);
2528: END IF;
2529:
2530:
2531: IF l_req_id = 0 THEN

Line 2534: fv_utility.log_mesg(fnd_log.level_error, l_module_name, p_errbuf);

2530:
2531: IF l_req_id = 0 THEN
2532: p_retcode := g_FAILURE;
2533: p_errbuf := 'Submitting the concurrent process, FVDCAFCO, failed contact System Admin.';
2534: fv_utility.log_mesg(fnd_log.level_error, l_module_name, p_errbuf);
2535: END IF;
2536: END IF;
2537:
2538: COMMIT;

Line 2544: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;

2540: WHEN OTHERS THEN
2541: p_retcode := g_FAILURE;
2542: p_errbuf := SQLERRM;
2543: l_location := l_module_name||'.insert_fv_invoice_finance_chrgs';
2544: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2545: fv_utility.log_mesg(fnd_log.level_unexpected, l_module_name||'.final_exception', p_errbuf);
2546: ROLLBACK;
2547: END assign_finance_charge;
2548: BEGIN

Line 2545: fv_utility.log_mesg(fnd_log.level_unexpected, l_module_name||'.final_exception', p_errbuf);

2541: p_retcode := g_FAILURE;
2542: p_errbuf := SQLERRM;
2543: l_location := l_module_name||'.insert_fv_invoice_finance_chrgs';
2544: fv_utility.log_mesg(fnd_log.level_unexpected, l_location,l_location) ;
2545: fv_utility.log_mesg(fnd_log.level_unexpected, l_module_name||'.final_exception', p_errbuf);
2546: ROLLBACK;
2547: END assign_finance_charge;
2548: BEGIN
2549: initialize_global_variables;