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

Line 9: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

5: G_Total_Prorated_Amt NUMBER := 0;
6: G_Total_Tax_Diff_Amt NUMBER := 0;
7:
8: -- Logging Infra
9: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

Line 10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

6: G_Total_Tax_Diff_Amt NUMBER := 0;
7:
8: -- Logging Infra
9: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

7:
8: -- Logging Infra
9: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

8: -- Logging Infra
9: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_ACCTG_PREPAY_DIST_PKG.';

Line 13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

9: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_ACCTG_PREPAY_DIST_PKG.';
17: -- Logging Infra

Line 14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_ACCTG_PREPAY_DIST_PKG.';
17: -- Logging Infra
18:

Line 15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_ACCTG_PREPAY_DIST_PKG.';
17: -- Logging Infra
18:
19:

Line 35: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

31: l_curr_calling_sequence VARCHAR2(2000);
32:
33: -- Logging Infra:
34: l_procedure_name CONSTANT VARCHAR2(30) := 'Update_Gain_Loss_Ind';
35: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
36:
37: BEGIN
38:
39: l_curr_calling_sequence := 'AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind<- ' ||

Line 44: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

40: p_calling_sequence;
41:
42:
43: -- Logging Infra: Setting up runtime level
44: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
45:
46: -- Logging Infra: Procedure level
47: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
48: l_log_msg := 'Begin of procedure '|| l_procedure_name;

Line 49: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

45:
46: -- Logging Infra: Procedure level
47: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
48: l_log_msg := 'Begin of procedure '|| l_procedure_name;
49: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
50: END IF;
51:
52: UPDATE AP_Prepay_History_All APH
53: SET Gain_Loss_Indicator =

Line 68: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

64:
65: -- Logging Infra: Procedure level
66: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
67: l_log_msg := 'End of procedure '|| l_procedure_name;
68: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
69: END IF;
70:
71:
72: EXCEPTION

Line 110: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

106: l_group_number NUMBER;
107:
108: -- Logging:
109: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Hist_Insert';
110: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
111:
112:
113: CURSOR c_prepay_history IS
114: SELECT AIL.Line_Number,

Line 166: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

162:
163: l_curr_calling_sequence := p_calling_sequence ||
164: ' -> AP_ACCTG_PREPAY_DISTS_PKG.PREPAY_HIST_INSERT';
165:
166: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
167:
168: l_log_msg :='Begin of procedure '||l_procedure_name;
169: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
170: FND_LOG.STRING(G_LEVEL_PROCEDURE,

Line 170: FND_LOG.STRING(G_LEVEL_PROCEDURE,

166: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
167:
168: l_log_msg :='Begin of procedure '||l_procedure_name;
169: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
170: FND_LOG.STRING(G_LEVEL_PROCEDURE,
171: G_MODULE_NAME || l_procedure_name,
172: l_log_msg);
173: END IF;
174:

Line 188: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

184: l_log_msg := 'CUR: C_Prepay_History: prepay_invoice_id = '||
185: l_prepay_invoice_id
186: || ' Prepay_Line_Number = ' || l_prepay_line_number
187: || ' Invoice_Line_Number = ' ||l_invoice_line_number;
188: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
189: END IF;
190:
191:
192: BEGIN

Line 271: FND_LOG.STRING(G_LEVEL_PROCEDURE,

267:
268: l_log_msg :='End of procedure '||l_procedure_name;
269:
270: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
271: FND_LOG.STRING(G_LEVEL_PROCEDURE,
272: G_MODULE_NAME || l_procedure_name,
273: l_log_msg);
274: END IF;
275:

Line 306: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

302: l_prepay_dist_rec r_prepay_dist_info;
303:
304: -- Logging Infra:
305: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Appl';
306: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
307:
308: -- BUG # 7688509
309: -- condition: historical_flag =Y
310: -- and event is 'INVOICE ADJUSTMENT'

Line 340: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

336: l_curr_calling_sequence := 'AP_ACCTG_PREPAY_DIST_PKG.Prepay_Dist_Appl<- ' ||
337: p_calling_sequence;
338:
339: -- Logging Infra: Setting up runtime level
340: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
341:
342: -- Logging Infra: Procedure level
343: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
344: l_log_msg := 'Begin of procedure '|| l_procedure_name;

Line 345: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

341:
342: -- Logging Infra: Procedure level
343: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
344: l_log_msg := 'Begin of procedure '|| l_procedure_name;
345: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
346: END IF;
347:
348: -- Bug Fix 5634515
349: -- deleting previous unprocessed prepayment history records for invoice

Line 356: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

352:
353: -- Logging Infra: Procedure level
354: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
355: l_log_msg := 'calling procedure Prepay_Hist_Insert ';
356: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
357: END IF;
358:
359: /* Bug 4996808. Inserting into the prepayment history table */
360: Prepay_Hist_Insert (P_Invoice_ID,

Line 378: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

374: l_log_msg := 'CUR: Prepay_History: prepay_history_id = '||
375: l_prepay_hist_rec.prepay_history_id
376: || ' Prepay_Invoice_ID = ' || l_prepay_hist_rec.Prepay_Invoice_ID
377: || ' Invoice_ID = ' ||l_prepay_hist_rec.Invoice_ID;
378: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
379: END IF;
380:
381:
382: /* Get the standard invoice header info */

Line 390: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

386:
387:
388: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
389: l_log_msg := 'CUR: Invoice_Header: Invoice_ID = '|| l_prepay_hist_rec.invoice_id;
390: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
391: END IF;
392:
393:
394: /* Get the prepayment invoice header info */

Line 411: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

407:
408: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
409: l_log_msg := 'CUR: Payment_History for payment: Payment_History_ID = '||
410: l_pay_hist_rec.payment_history_id;
411: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
412: END IF;
413:
414:
415: /* Get the clearing payment history info */

Line 426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

422:
423: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
424: l_log_msg := 'CUR: Payment_History for clearing: Payment_History_ID = '||
425: l_clr_hist_rec.payment_history_id;
426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
427: END IF;
428:
429:
430: /* Get the prepay distributions for this event */

Line 446: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

442: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
443: l_log_msg := 'CUR: Prepay_Dists: Invoice_ID = '||l_prepay_dist_rec.invoice_id
444: ||' Invoice_Distribution_ID = '||l_prepay_dist_rec.invoice_distribution_id
445: ||' Prepay_Distribution_ID = '||l_prepay_dist_rec.prepay_distribution_id;
446: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
447: END IF;
448:
449:
450: IF l_prepay_dist_rec.parent_reversal_id IS NOT NULL THEN

Line 456: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

452: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
453: l_log_msg := 'CUR: Prepay_Dists: Invoice_Distribution_ID = '
454: ||l_prepay_dist_rec.invoice_distribution_id
455: ||' Parent_Reversal_ID = '||l_prepay_dist_rec.parent_reversal_id;
456: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
457: END IF;
458:
459: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
460: l_log_msg := 'Calling procedure Prepay_Dist_Reverse for prepay dist: '

Line 462: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

458:
459: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
460: l_log_msg := 'Calling procedure Prepay_Dist_Reverse for prepay dist: '
461: || l_prepay_dist_rec.invoice_distribution_id;
462: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
463: END IF;
464:
465:
466: /* Creating prepayment appl dists for unapplication by reversing the prepay appl

Line 481: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

477:
478:
479: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
480: l_log_msg := 'Procedure Prepay_Dist_Reverse executed';
481: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
482: END IF;
483:
484: ELSE
485:

Line 501: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

497: l_log_msg := 'Final payment of Invoice_ID '||l_prepay_dist_rec.invoice_id;
498: ELSE
499: l_log_msg := 'Not final payment of Invoice_ID '||l_prepay_dist_rec.invoice_id;
500: END IF;
501: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
502: END IF;
503:
504:
505: OPEN Invoice_Dists(p_invoice_id);

Line 515: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

511:
512: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
513: l_log_msg := 'CUR: Invoice_Dists: Invoice_Distribution_ID = '
514: ||l_inv_dist_rec.invoice_distribution_id;
515: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
516: END IF;
517:
518:
519: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

Line 522: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

518:
519: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
520: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '
521: || l_inv_dist_rec.invoice_distribution_id;
522: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
523: END IF;
524:
525: -- BUG # 7688509
526: -- condition: historical_flag =Y

Line 565: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

561:
562:
563: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
564: l_log_msg := 'Procedure Prepay_Dist_Proc executed';
565: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
566: END IF;
567:
568: END LOOP;
569: CLOSE Invoice_Dists;

Line 579: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

575:
576: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
577: l_log_msg := 'Calling procedure P_Acctg_Pay_Round_Pkg.Do_Rounding for Invoice_ID: '
578: || l_inv_rec.invoice_id;
579: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
580: END IF;
581:
582: -- bug 7611160
583: SELECT asp.base_currency_code

Line 603: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

599: l_curr_calling_sequence);
600:
601: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
602: l_log_msg := 'Procedure P_Acctg_Pay_Round_Pkg.Do_Rounding executed';
603: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
604: END IF;
605:
606: END IF;
607: END LOOP;

Line 616: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

612:
613: -- Logging Infra: Procedure level
614: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
615: l_log_msg := 'End of procedure '|| l_procedure_name;
616: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
617: END IF;
618:
619:
620: EXCEPTION

Line 662: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

658: l_prepay_dist_cnt NUMBER;
659:
660: -- Logging Infra:
661: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Cascade_Adj';
662: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
663:
664: -- Bug 6698125. Added adj cursor to get the prepay history record
665: -- related to prepayment adjustment type events.
666: CURSOR Prepay_History_Adj

Line 773: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

769:
770: -- Logging Infra: Procedure level
771: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
772: l_log_msg := 'Begin of procedure '|| l_procedure_name;
773: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
774: END IF;
775:
776:
777: /* Get the prepayment history header info */

Line 790: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

786: || ' Prepay_Invoice_ID = ' || l_prepay_hist_rec.Prepay_Invoice_ID
787: || ' Invoice_ID = ' ||l_prepay_hist_rec.Invoice_ID
788: || ' Related_Event_ID = ' ||l_prepay_hist_rec.related_prepay_app_event_id
789: || ' Inv_Adj_Event_ID = ' ||l_prepay_hist_rec.invoice_adjustment_event_id;
790: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
791: END IF;
792:
793:
794: /* Get the standard invoice header info */

Line 802: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

798:
799:
800: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
801: l_log_msg := 'CUR: Invoice_Header: Invoice_ID = '|| l_prepay_hist_rec.invoice_id;
802: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
803: END IF;
804:
805:
806: /* Get the prepayment invoice header info */

Line 813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

809: CLOSE Invoice_Header;
810:
811: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
812: l_log_msg := 'CUR: Prepay Invoice_Header: Invoice_ID = '|| l_prepay_inv_rec.invoice_id;
813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
814: END IF;
815:
816:
817: /* Get the payment history info */

Line 828: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

824:
825: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
826: l_log_msg := 'CUR: Payment_History for payment: Payment_History_ID = '||
827: l_pay_hist_rec.payment_history_id;
828: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
829: END IF;
830:
831:
832: /* Get the clearing payment history info */

Line 843: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

839:
840: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
841: l_log_msg := 'CUR: Payment_History for clearing: Payment_History_ID = '||
842: l_clr_hist_rec.payment_history_id;
843: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
844: END IF;
845:
846:
847: /* Get the prepay dists based on the related event id */

Line 861: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

857: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
858: l_log_msg := 'CUR: Prepay_Dists: Invoice_ID = '||l_prepay_dist_rec.invoice_id
859: ||' Invoice_Distribution_ID = '||l_prepay_dist_rec.invoice_distribution_id
860: ||' Prepay_Distribution_ID = '||l_prepay_dist_rec.prepay_distribution_id;
861: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
862: END IF;
863:
864:
865: OPEN Invoice_Dists(l_prepay_hist_rec.invoice_id,

Line 878: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

874: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
875: l_log_msg := 'CUR: Invoice_Dists: Invoice_Distribution_ID = '
876: ||l_inv_dist_rec.invoice_distribution_id
877: || ' Reversal_Flag = ' ||l_inv_dist_rec.reversal_flag;
878: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
879: END IF;
880:
881: -- in bug 7488981 call to prepay_dist_reverse was made with null parent_reversal_id
882: -- therefore the following check is added to check that

Line 900: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

896:
897: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
898: l_log_msg := 'Calling procedure Prepay_Dist_Reverse for dist: '
899: || l_inv_dist_rec.invoice_distribution_id;
900: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
901: END IF;
902:
903: Prepay_Dist_Reverse
904: (l_prepay_hist_rec,

Line 914: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

910: l_curr_calling_sequence);
911:
912: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
913: l_log_msg := 'Procedure Prepay_Dist_Reverse executed';
914: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
915: END IF;
916:
917: ELSE
918:

Line 922: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

918:
919: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
920: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '
921: || l_inv_dist_rec.invoice_distribution_id;
922: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
923: END IF;
924:
925: -- Prorate only those awt distributions that were created during the invoice time
926: IF (l_inv_dist_rec.awt_invoice_payment_id IS NULL) THEN

Line 943: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

939: END IF;
940:
941: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
942: l_log_msg := 'Procedure Prepay_Dist_Proc executed';
943: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
944: END IF;
945:
946: END IF;
947:

Line 959: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

955: WHERE AID.Accounting_Event_ID = l_prepay_hist_rec.invoice_adjustment_event_id;
956:
957: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
958: l_log_msg := 'l_inv_adj_amount = ' ||l_inv_adj_amount;
959: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
960: END IF;
961:
962: /* Check if there is any change to the invoice liability. If there is
963: a change then we need to adjust the payment hist distributions for the

Line 979: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

975:
976: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
977: l_log_msg := 'CUR: Inv_Adj_Dists: Invoice_Distribution_ID = '
978: ||l_inv_dist_rec.invoice_distribution_id;
979: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
980: END IF;
981:
982: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
983: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '

Line 985: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

981:
982: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
983: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '
984: ||l_inv_dist_rec.invoice_distribution_id;
985: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
986: END IF;
987:
988: Prepay_Dist_Proc(l_pay_hist_rec,
989: l_clr_hist_rec,

Line 1002: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

998: l_curr_calling_sequence);
999:
1000: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1001: l_log_msg := 'Procedure Prepay_Dist_Proc executed';
1002: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1003: END IF;
1004:
1005:
1006: END LOOP;

Line 1027: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1023:
1024:
1025: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1026: l_log_msg := 'Updating the prorated prepaid amounts';
1027: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1028: END IF;
1029:
1030:
1031: /* Updating the prorated prepaid amounts for any rounding */

Line 1057: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1053:
1054:
1055: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1056: l_log_msg := 'Updating the prorated tax diff amounts';
1057: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1058: END IF;
1059:
1060: /* Updating the prorated tax diff amounts for any rounding */
1061: IF (l_prepay_dist_rec.prepay_tax_diff_amount <> 0) THEN

Line 1089: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1085:
1086: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1087: l_log_msg := 'Calling procedure P_Acctg_Pay_Round_Pkg.Do_Rounding for Invoice_ID: '
1088: || l_inv_rec.invoice_id;
1089: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1090: END IF;
1091:
1092: AP_Acctg_Pay_Round_Pkg.Do_Rounding
1093: (NULL, --p_xla_event_rec,

Line 1105: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1101: l_curr_calling_sequence);
1102:
1103: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1104: l_log_msg := 'Procedure P_Acctg_Pay_Round_Pkg.Do_Rounding executed';
1105: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1106: END IF;
1107:
1108:
1109: END LOOP;

Line 1114: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);

1110: CLOSE Prepay_Adj_Dists;
1111:
1112: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1113: l_log_msg := 'Calling procedure AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind';
1114: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1115: END IF;
1116:
1117: AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind
1118: (p_xla_event_rec,

Line 1123: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);

1119: l_curr_calling_sequence);
1120:
1121: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1122: l_log_msg := 'Procedure AP_Acctg_Prepay_Dist_Pkg.Updated_Gain_Loss_Ind executed';
1123: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1124: END IF;
1125:
1126:
1127: EXCEPTION

Line 1185: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1181: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
1182:
1183: -- Logging Infra:
1184: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Proc';
1185: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1186:
1187:
1188: BEGIN
1189:

Line 1196: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

1192:
1193:
1194: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1195: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1196: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1197: END IF;
1198:
1199:
1200: SELECT SUM(NVL(AID.Amount,0))

Line 1228: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

1224: IF p_final_payment = TRUE THEN
1225:
1226: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1227: l_log_msg := 'Calling procedure AP_Accounting_Pay_Pkg.Get_Pay_Sum';
1228: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1229: END IF;
1230:
1231: AP_Accounting_Pay_Pkg.Get_Pay_Sum
1232: (p_inv_dist_rec.invoice_distribution_id,

Line 1252: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1248:
1249: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1250: l_log_msg := 'Invoice curr diff than payment curr';
1251: l_log_msg := l_log_msg || ' Converting l_total_paid_amt to invoice curr';
1252: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1253: END IF;
1254:
1255: l_total_paid_amt := GL_Currency_API.Convert_Amount(
1256: p_inv_rec.payment_currency_code,

Line 1303: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1299: END IF;
1300:
1301: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1302: l_log_msg := 'Value of l_prorated_amount = '|| l_prorated_amount;
1303: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1304: END IF;
1305:
1306:
1307: IF (p_inv_dist_rec.line_type_lookup_code <> 'AWT') THEN

Line 1320: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1316: ELSE
1317:
1318: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1319: l_log_msg := 'Calculating prorated amount for cascade adjustment';
1320: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1321: END IF;
1322:
1323: IF p_inv_rec.invoice_amount = 0 THEN
1324: l_prorated_amount := 0;

Line 1435: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1431:
1432:
1433: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1434: l_log_msg := 'Calling procedure Prepay_Dist_Insert';
1435: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1436: END IF;
1437:
1438:
1439: IF p_inv_dist_rec.quantity_variance IS NOT NULL THEN

Line 1496: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1492: l_curr_calling_sequence);
1493:
1494: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1495: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
1496: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1497: END IF;
1498:
1499:
1500: IF (p_prepay_dist_rec.prepay_tax_diff_amount <> 0) THEN

Line 1505: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1501:
1502:
1503: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1504: l_log_msg := 'Calling procedure Prepay_Dist_Tax_Diff';
1505: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1506: END IF;
1507:
1508: -- Creating the tax diff distributions
1509: Prepay_Dist_Tax_Diff

Line 1522: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1518: l_curr_calling_sequence);
1519:
1520: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1521: l_log_msg := 'Procedure Prepay_Dist_Tax_Diff executed';
1522: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1523: END IF;
1524:
1525:
1526: END IF;

Line 1534: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1530: p_inv_rec.invoice_currency_code <> p_inv_rec.base_currency_code) THEN
1531:
1532: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1533: l_log_msg := 'Calling procedure Prepay_Dist_ERV';
1534: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1535: END IF;
1536:
1537: -- Creating ERV distributions
1538: Prepay_Dist_ERV

Line 1551: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1547: l_curr_calling_sequence);
1548:
1549: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1550: l_log_msg := 'Procedure Prepay_Dist_ERV executed';
1551: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1552: END IF;
1553:
1554: END IF;
1555:

Line 1558: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1554: END IF;
1555:
1556: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1557: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
1558: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1559: END IF;
1560:
1561: EXCEPTION
1562: WHEN OTHERS THEN

Line 1603: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1599: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
1600:
1601: -- Logging Infra:
1602: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Tax_Diff';
1603: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1604:
1605:
1606: BEGIN
1607:

Line 1613: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

1609: p_calling_sequence;
1610:
1611: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1612: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1613: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1614: END IF;
1615:
1616:
1617: IF p_calc_mode = 'A' THEN

Line 1640: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1636: ELSE
1637:
1638: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1639: l_log_msg := 'Calculating prorated amount for cascade adjustment';
1640: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1641: END IF;
1642:
1643: IF p_inv_rec.invoice_amount = 0 THEN
1644: l_prorated_amount := 0;

Line 1664: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1660: END IF;
1661:
1662: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1663: l_log_msg := 'Value for l_prorated_amount = '|| l_prorated_amount;
1664: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1665: END IF;
1666:
1667:
1668: g_total_tax_diff_amt := g_total_tax_diff_amt + l_prorated_amount;

Line 1750: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1746:
1747:
1748: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1749: l_log_msg := 'Calling procedure Prepay_Dist_Insert';
1750: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1751: END IF;
1752:
1753: Prepay_Dist_Insert
1754: (l_pad_rec,

Line 1760: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1756:
1757:
1758: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1759: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
1760: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1761: END IF;
1762:
1763: EXCEPTION
1764: WHEN OTHERS THEN

Line 1805: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1801: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
1802:
1803: -- Logging Infra:
1804: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_ERV';
1805: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1806:
1807: BEGIN
1808:
1809:

Line 1816: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

1812:
1813:
1814: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1815: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1816: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1817: END IF;
1818:
1819:
1820: IF p_inv_dist_rec.rcv_transaction_id IS NOT NULL THEN

Line 1845: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1841:
1842:
1843: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1844: l_log_msg := 'Value of l_po_pay_exchange_rate = '||l_po_pay_exchange_rate;
1845: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1846: END IF;
1847:
1848:
1849: /* For Cash Basis ERV is Difference between Payment Exchange Rate and

Line 1859: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1855:
1856:
1857: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1858: l_log_msg := 'Value of l_pay_erv_amount = '||l_pay_erv_amount;
1859: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1860: END IF;
1861:
1862:
1863: /* If the payment accounting is at the at the clearing time, then ERV should be

Line 1875: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1871: END IF;
1872:
1873: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1874: l_log_msg := 'Value of l_clr_erv_amount = '||l_clr_erv_amount;
1875: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1876: END IF;
1877:
1878:
1879: /* In order to back out the encumbrance entries correctly during cash basis

Line 1891: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1887: p_prorated_amount, p_inv_rec.invoice_currency_code);
1888:
1889: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1890: l_log_msg := 'Value of l_inv_erv_amount = '||l_inv_erv_amount;
1891: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1892: END IF;
1893:
1894:
1895: IF (p_inv_dist_rec.line_type_lookup_code IN ('NONREC_TAX', 'REC_TAX')) THEN

Line 1928: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1924: l_pad_rec.base_amount := 0;
1925:
1926: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1927: l_log_msg := 'Calling procedure Prepay_Dist_Insert';
1928: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1929: END IF;
1930:
1931: Prepay_Dist_Insert
1932: (l_pad_rec,

Line 1937: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);

1933: l_curr_calling_sequence);
1934:
1935: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1936: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
1937: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1938: END IF;
1939:
1940:
1941: EXCEPTION

Line 1976: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1972: l_curr_calling_sequence VARCHAR2(2000);
1973:
1974: -- Logging Infra:
1975: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Reverse';
1976: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1977:
1978:
1979: BEGIN
1980:

Line 1987: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

1983:
1984: -- Logging Infra: Procedure level
1985: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1986: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1987: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1988: END IF;
1989:
1990: -- Bug 6698125. Added if condition to correctly reverse the prepay app
1991: -- distributions based on if reversed for prepayment unapplication or

Line 2155: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

2151:
2152: -- Logging Infra: Procedure level
2153: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2154: l_log_msg := 'End of procedure '|| l_procedure_name;
2155: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
2156: END IF;
2157:
2158:
2159: EXCEPTION

Line 2187: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2183: l_curr_calling_sequence VARCHAR2(2000);
2184:
2185: -- Logging Infra:
2186: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Insert';
2187: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2188:
2189: BEGIN
2190:
2191: l_curr_calling_sequence := 'AP_ACCTG_PREPAY_DIST_PKG.Prepay_Dist_Insert<- ' ||

Line 2197: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

2193:
2194: -- Logging Infra: Procedure level
2195: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2196: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2197: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
2198: END IF;
2199:
2200:
2201: INSERT INTO AP_Prepay_App_Dists

Line 2280: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

2276:
2277: -- Logging Infra: Procedure level
2278: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2279: l_log_msg := 'End of procedure '|| l_procedure_name;
2280: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
2281: END IF;
2282:
2283:
2284: EXCEPTION

Line 2311: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2307: l_curr_calling_sequence VARCHAR2(2000);
2308:
2309: -- Logging Infra:
2310: l_procedure_name CONSTANT VARCHAR2(30) := 'Delete_Hist_Dists';
2311: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2312:
2313: BEGIN
2314:
2315: l_curr_calling_sequence := 'AP_Acctg_Prepay_Dist_Pkg.Delete_hist_dists<- ' ||

Line 2321: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

2317:
2318: -- Logging Infra: Procedure level
2319: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2320: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2321: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
2322: END IF;
2323:
2324:
2325: