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 12: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

8: G_Total_Dist_Amount NUMBER := 0; --Bug8244163
9: G_Total_awt_amount NUMBER := 0; --Bug9106549
10:
11: -- Logging Infra
12: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
14: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
15: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
16: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

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

9: G_Total_awt_amount NUMBER := 0; --Bug9106549
10:
11: -- Logging Infra
12: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
14: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
15: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
16: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
17: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

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

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

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

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

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

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

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

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

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

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

Line 38: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

34: l_curr_calling_sequence VARCHAR2(2000);
35:
36: -- Logging Infra:
37: l_procedure_name CONSTANT VARCHAR2(30) := 'Update_Gain_Loss_Ind';
38: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
39: l_gain_loss_indicator ap_prepay_history_all.gain_loss_indicator%type;
40: l_gain_loss_indicator_parent ap_prepay_history_all.gain_loss_indicator%type; -- bug9175969
41: l_reversal_adj VARCHAR2(1);
42:

Line 51: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

47: p_calling_sequence;
48:
49:
50: -- Logging Infra: Setting up runtime level
51: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
52:
53: -- Logging Infra: Procedure level
54: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
55: l_log_msg := 'Begin of procedure '|| l_procedure_name;

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

52:
53: -- Logging Infra: Procedure level
54: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
55: l_log_msg := 'Begin of procedure '|| l_procedure_name;
56: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
57: END IF;
58:
59:
60: IF (P_XLA_Event_Rec.event_type_code ='PREPAYMENT APPLICATION ADJ') then -- bug9175969

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

61:
62: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
63: l_log_msg := 'Before getting the Gain/Loss Indicator for the '||
64: 'Related Prepayment Event ';
65: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_log_msg);
66: END IF;
67:
68: BEGIN
69:

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

84: END;
85:
86: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
87: l_log_msg := 'The Gain/Loss Indicator Fetched is '|| l_gain_loss_indicator_parent;
88: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_log_msg);
89: END IF;
90:
91: IF l_gain_loss_indicator_parent IS NOT NULL THEN
92:

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

114: END;
115:
116: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
117: l_log_msg := 'The value of l_reversal_adj is: '||l_reversal_adj;
118: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_log_msg);
119: END IF;
120:
121: IF l_reversal_adj = 'N' THEN
122: l_gain_loss_indicator_parent := NULL;

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

123: END IF;
124:
125: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
126: l_log_msg := 'Final value of l_gain_loss_indicator_parent '||l_gain_loss_indicator_parent;
127: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_log_msg);
128: END IF;
129:
130: END IF;
131:

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

168: FROM ap_prepay_history_all aph
169: WHERE APH.Accounting_Event_ID = p_xla_event_rec.event_id;
170:
171: l_log_msg := 'APH.Gain_Loss_Indicator: '|| nvl(l_gain_loss_indicator,'NULL');
172: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
173:
174: EXCEPTION
175: WHEN OTHERS THEN
176: l_log_msg := ' Encountered an Exception:'||SQLERRM||

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

174: EXCEPTION
175: WHEN OTHERS THEN
176: l_log_msg := ' Encountered an Exception:'||SQLERRM||
177: ' while fetching the gain/loss indicator ';
178: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
179: END;
180:
181: END IF;
182:

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

182:
183: -- Logging Infra: Procedure level
184: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
185: l_log_msg := 'End of procedure '|| l_procedure_name;
186: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
187: END IF;
188:
189: EXCEPTION
190: WHEN OTHERS THEN

Line 228: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

224: l_group_number NUMBER;
225:
226: -- Logging:
227: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Hist_Insert';
228: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
229:
230:
231: -- bug9038462,
232: -- 1. changed both parts of the union to ensure

Line 302: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

298:
299: l_curr_calling_sequence := p_calling_sequence ||
300: ' -> AP_ACCTG_PREPAY_DISTS_PKG.PREPAY_HIST_INSERT';
301:
302: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
303:
304: l_log_msg :='Begin of procedure '||l_procedure_name;
305: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
306: FND_LOG.STRING(G_LEVEL_PROCEDURE,

Line 306: FND_LOG.STRING(G_LEVEL_PROCEDURE,

302: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
303:
304: l_log_msg :='Begin of procedure '||l_procedure_name;
305: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
306: FND_LOG.STRING(G_LEVEL_PROCEDURE,
307: G_MODULE_NAME || l_procedure_name,
308: l_log_msg);
309: END IF;
310:

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

320: l_log_msg := 'CUR: C_Prepay_History: prepay_invoice_id = '||
321: l_prepay_invoice_id
322: || ' Prepay_Line_Number = ' || l_prepay_line_number
323: || ' Invoice_Line_Number = ' ||l_invoice_line_number;
324: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
325: END IF;
326:
327:
328: BEGIN

Line 407: FND_LOG.STRING(G_LEVEL_PROCEDURE,

403:
404: l_log_msg :='End of procedure '||l_procedure_name;
405:
406: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
407: FND_LOG.STRING(G_LEVEL_PROCEDURE,
408: G_MODULE_NAME || l_procedure_name,
409: l_log_msg);
410: END IF;
411:

Line 456: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

452:
453:
454: -- Logging Infra:
455: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Appl';
456: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
457:
458: -- BUG # 7688509
459: -- condition: historical_flag =Y
460: -- and event is 'INVOICE ADJUSTMENT'

Line 490: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

486: l_curr_calling_sequence := 'AP_ACCTG_PREPAY_DIST_PKG.Prepay_Dist_Appl<- ' ||
487: p_calling_sequence;
488:
489: -- Logging Infra: Setting up runtime level
490: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
491:
492: -- Logging Infra: Procedure level
493: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
494: l_log_msg := 'Begin of procedure '|| l_procedure_name;

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

491:
492: -- Logging Infra: Procedure level
493: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
494: l_log_msg := 'Begin of procedure '|| l_procedure_name;
495: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
496: END IF;
497:
498: -- Bug Fix 5634515
499: -- deleting previous unprocessed prepayment history records for invoice

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

502:
503: -- Logging Infra: Procedure level
504: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
505: l_log_msg := 'calling procedure Prepay_Hist_Insert ';
506: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
507: END IF;
508:
509: /* Bug 4996808. Inserting into the prepayment history table */
510: Prepay_Hist_Insert (P_Invoice_ID,

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

524: l_log_msg := 'CUR: Prepay_History: prepay_history_id = '||
525: l_prepay_hist_rec.prepay_history_id
526: || ' Prepay_Invoice_ID = ' || l_prepay_hist_rec.Prepay_Invoice_ID
527: || ' Invoice_ID = ' ||l_prepay_hist_rec.Invoice_ID;
528: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
529: END IF;
530:
531: -- 9322009, added the following code to recreate the incorrect dist
532: -- links for the upgraded prepayment application events, so the the

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

570: ' Accounting_Event_Id : '||l_accounting_event_id||
571: ' Posted_Flag : '||l_posted_flag||
572: ' historical_flag : '||l_historical_flag||
573: ' upg_batch_id : '||l_upg_batch_id;
574: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
575: END IF;
576:
577:
578:

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

582: l_upg_batch_id <> -9999) THEN
583:
584: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
585: l_log_msg := 'Proceeding to call the Upg_Dist_Links_Insert procedure';
586: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
587: END IF;
588:
589: SAVEPOINT before_reupgrade;
590: BEGIN

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

596: EXCEPTION
597: WHEN OTHERS THEN
598: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
599: l_log_msg := 'Upg_Dist_Links_Insert encountered exception '||SQLERRM;
600: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
601: END IF;
602:
603: ROLLBACK TO before_reupgrade;
604: END;

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

613:
614:
615: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
616: l_log_msg := 'CUR: Invoice_Header: Invoice_ID = '|| l_prepay_hist_rec.invoice_id;
617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
618: END IF;
619:
620:
621: /* Get the prepayment invoice header info */

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

625:
626: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
627: l_log_msg := 'Check the Payment Type Flag on the Payment for Prepay Invoice_id '||
628: l_prepay_hist_rec.prepay_invoice_id;
629: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
630: END IF;
631:
632: BEGIN
633:

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

646: l_payment_type_flag := 'Q';
647: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
648: l_log_msg := ' Encountered an Exception '||SQLERRM||
649: ' when Fetching the Payment Type Flag';
650: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
651: END IF;
652:
653: END;
654:

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

659: END IF;
660:
661: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
662: l_log_msg := 'Obtained l_pay_trx_type as '||l_pay_trx_type;
663: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
664: END IF;
665:
666: /* Get the payment history info */
667: OPEN Payment_History

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

673:
674: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
675: l_log_msg := 'CUR: Payment_History for payment: Payment_History_ID = '||
676: l_pay_hist_rec.payment_history_id;
677: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
678: END IF;
679:
680:
681: /* Get the clearing payment history info */

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

688:
689: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
690: l_log_msg := 'CUR: Payment_History for clearing: Payment_History_ID = '||
691: l_clr_hist_rec.payment_history_id;
692: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
693: END IF;
694:
695:
696: /* Get the prepay distributions for this event */

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

708: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
709: l_log_msg := 'CUR: Prepay_Dists: Invoice_ID = '||l_prepay_dist_rec.invoice_id
710: ||' Invoice_Distribution_ID = '||l_prepay_dist_rec.invoice_distribution_id
711: ||' Prepay_Distribution_ID = '||l_prepay_dist_rec.prepay_distribution_id;
712: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
713: END IF;
714:
715:
716: IF l_prepay_dist_rec.parent_reversal_id IS NOT NULL THEN

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

718: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
719: l_log_msg := 'CUR: Prepay_Dists: Invoice_Distribution_ID = '
720: ||l_prepay_dist_rec.invoice_distribution_id
721: ||' Parent_Reversal_ID = '||l_prepay_dist_rec.parent_reversal_id;
722: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
723: END IF;
724:
725: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
726: l_log_msg := 'Calling procedure Prepay_Dist_Reverse for prepay dist: '

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

724:
725: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
726: l_log_msg := 'Calling procedure Prepay_Dist_Reverse for prepay dist: '
727: || l_prepay_dist_rec.invoice_distribution_id;
728: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
729: END IF;
730:
731:
732: /* Creating prepayment appl dists for unapplication by reversing the prepay appl

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

743:
744:
745: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
746: l_log_msg := 'Procedure Prepay_Dist_Reverse executed';
747: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
748: END IF;
749:
750: ELSE
751:

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

833: l_log_msg := 'Final pay/prepay event for Invoice_ID '||l_prepay_dist_rec.invoice_id;
834: ELSE
835: l_log_msg := 'Not final pay/prepay event for Invoice_ID '||l_prepay_dist_rec.invoice_id;
836: END IF;
837: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
838: END IF;
839:
840: --8244163 This query exists 3 places in this package pls make sure that
841: --you are modifying in all the places

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

869:
870: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
871: l_log_msg := 'CUR: Invoice_Dists: Invoice_Distribution_ID = '
872: ||l_inv_dist_rec.invoice_distribution_id;
873: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
874: END IF;
875:
876:
877: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

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

876:
877: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
878: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '
879: || l_inv_dist_rec.invoice_distribution_id;
880: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
881: END IF;
882:
883: -- BUG # 7688509
884: -- condition: historical_flag =Y

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

919:
920:
921: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
922: l_log_msg := 'Procedure Prepay_Dist_Proc executed';
923: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
924: END IF;
925:
926: END LOOP;
927: CLOSE Invoice_Dists;

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

933:
934: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
935: l_log_msg := 'Calling procedure P_Acctg_Pay_Round_Pkg.Do_Rounding for Invoice_ID: '
936: || l_inv_rec.invoice_id;
937: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
938: END IF;
939:
940: -- bug 7611160
941: SELECT asp.base_currency_code

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

963:
964: --END IF;
965: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
966: l_log_msg := 'Procedure P_Acctg_Pay_Round_Pkg.Do_Rounding executed';
967: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
968: END IF;
969:
970: END IF;
971: END LOOP;

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

976:
977: -- Logging Infra: Procedure level
978: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
979: l_log_msg := 'End of procedure '|| l_procedure_name;
980: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
981: END IF;
982:
983:
984: EXCEPTION

Line 1026: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1022: l_prepay_dist_cnt NUMBER;
1023:
1024: -- Logging Infra:
1025: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Cascade_Adj';
1026: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1027:
1028: -- Bug 6698125. Added adj cursor to get the prepay history record
1029: -- related to prepayment adjustment type events.
1030: CURSOR Prepay_History_Adj

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

1133:
1134: -- Logging Infra: Procedure level
1135: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1136: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1137: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1138: END IF;
1139:
1140:
1141: /* Get the prepayment history header info */

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

1150: || ' Prepay_Invoice_ID = ' || l_prepay_hist_rec.Prepay_Invoice_ID
1151: || ' Invoice_ID = ' ||l_prepay_hist_rec.Invoice_ID
1152: || ' Related_Event_ID = ' ||l_prepay_hist_rec.related_prepay_app_event_id
1153: || ' Inv_Adj_Event_ID = ' ||l_prepay_hist_rec.invoice_adjustment_event_id;
1154: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1155: END IF;
1156:
1157:
1158: /* Get the standard invoice header info */

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

1162:
1163:
1164: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1165: l_log_msg := 'CUR: Invoice_Header: Invoice_ID = '|| l_prepay_hist_rec.invoice_id;
1166: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1167: END IF;
1168:
1169:
1170: /* Get the prepayment invoice header info */

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

1173: CLOSE Invoice_Header;
1174:
1175: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1176: l_log_msg := 'CUR: Prepay Invoice_Header: Invoice_ID = '|| l_prepay_inv_rec.invoice_id;
1177: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1178: END IF;
1179:
1180:
1181: /* Get the payment history info */

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

1188:
1189: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1190: l_log_msg := 'CUR: Payment_History for payment: Payment_History_ID = '||
1191: l_pay_hist_rec.payment_history_id;
1192: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1193: END IF;
1194:
1195:
1196: /* Get the clearing payment history info */

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

1203:
1204: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1205: l_log_msg := 'CUR: Payment_History for clearing: Payment_History_ID = '||
1206: l_clr_hist_rec.payment_history_id;
1207: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1208: END IF;
1209:
1210:
1211: /* Get the prepay dists based on the related event id */

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

1221: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1222: l_log_msg := 'CUR: Prepay_Dists: Invoice_ID = '||l_prepay_dist_rec.invoice_id
1223: ||' Invoice_Distribution_ID = '||l_prepay_dist_rec.invoice_distribution_id
1224: ||' Prepay_Distribution_ID = '||l_prepay_dist_rec.prepay_distribution_id;
1225: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1226: END IF;
1227: --8244163 This query exists 3 places in this package pls make sure that
1228: --you are modifying in all the places
1229: SELECT SUM(NVL(AID.Amount,0)),

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

1257: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1258: l_log_msg := 'CUR: Invoice_Dists: Invoice_Distribution_ID = '
1259: ||l_inv_dist_rec.invoice_distribution_id
1260: || ' Reversal_Flag = ' ||l_inv_dist_rec.reversal_flag;
1261: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1262: END IF;
1263:
1264: -- in bug 7488981 call to prepay_dist_reverse was made with null parent_reversal_id
1265: -- therefore the following check is added to check that

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

1280:
1281: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1282: l_log_msg := 'Calling procedure Prepay_Dist_Reverse for dist: '
1283: || l_inv_dist_rec.invoice_distribution_id;
1284: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1285: END IF;
1286:
1287: Prepay_Dist_Reverse
1288: (l_prepay_hist_rec,

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

1294: l_curr_calling_sequence);
1295:
1296: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1297: l_log_msg := 'Procedure Prepay_Dist_Reverse executed';
1298: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1299: END IF;
1300:
1301: ELSE
1302:

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

1302:
1303: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1304: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '
1305: || l_inv_dist_rec.invoice_distribution_id;
1306: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1307: END IF;
1308:
1309: -- Prorate only those awt distributions that were created during the invoice time
1310: IF (l_inv_dist_rec.awt_invoice_payment_id IS NULL) THEN

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

1323: END IF;
1324:
1325: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1326: l_log_msg := 'Procedure Prepay_Dist_Proc executed';
1327: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1328: END IF;
1329:
1330: END IF;
1331:

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

1339: WHERE AID.Accounting_Event_ID = l_prepay_hist_rec.invoice_adjustment_event_id;
1340:
1341: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1342: l_log_msg := 'l_inv_adj_amount = ' ||l_inv_adj_amount;
1343: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1344: END IF;
1345:
1346: /* Check if there is any change to the invoice liability. If there is
1347: a change then we need to adjust the payment hist distributions for the

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

1382:
1383: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1384: l_log_msg := 'CUR: Inv_Adj_Dists: Invoice_Distribution_ID = '
1385: ||l_inv_dist_rec.invoice_distribution_id;
1386: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1387: END IF;
1388:
1389: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1390: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '

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

1388:
1389: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1390: l_log_msg := 'Calling procedure Prepay_Dist_Proc for dist: '
1391: ||l_inv_dist_rec.invoice_distribution_id;
1392: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1393: END IF;
1394:
1395: Prepay_Dist_Proc(l_pay_hist_rec,
1396: l_clr_hist_rec,

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

1405: l_curr_calling_sequence);
1406:
1407: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1408: l_log_msg := 'Procedure Prepay_Dist_Proc executed';
1409: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1410: END IF;
1411:
1412:
1413: END LOOP;

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

1456:
1457:
1458: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1459: l_log_msg := 'Updating the prorated prepaid amounts';
1460: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1461: END IF;
1462:
1463: IF NVL(l_sum_prepaid_amount, 0) <> l_prepay_dist_rec.amount THEN -- added for bug12858105
1464:

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

1565: AND NVL(l_sum_tax_diff_amount,0) <> l_prepay_dist_rec.prepay_tax_diff_amount THEN -- added for bug12858105
1566:
1567: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1568: l_log_msg := 'Updating the prorated tax diff amounts';
1569: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1570: END IF;
1571:
1572:
1573: /* Updating the prorated tax diff amounts for any rounding */

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

1683:
1684: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1685: l_log_msg := 'Calling procedure P_Acctg_Pay_Round_Pkg.Do_Rounding for Invoice_ID: '
1686: || l_inv_rec.invoice_id;
1687: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1688: END IF;
1689:
1690: AP_Acctg_Pay_Round_Pkg.Do_Rounding
1691: (NULL, --p_xla_event_rec,

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

1699: l_curr_calling_sequence);
1700:
1701: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1702: l_log_msg := 'Procedure P_Acctg_Pay_Round_Pkg.Do_Rounding executed';
1703: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
1704: END IF;
1705:
1706: END IF; --l_rounding_adjust_id = p_xla_event_rec.event_id 8201141
1707:

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

1709: CLOSE Prepay_Adj_Dists;
1710:
1711: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1712: l_log_msg := 'Calling procedure AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind';
1713: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1714: END IF;
1715:
1716: AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind
1717: (p_xla_event_rec,

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

1718: l_curr_calling_sequence);
1719:
1720: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1721: l_log_msg := 'Procedure AP_Acctg_Prepay_Dist_Pkg.Updated_Gain_Loss_Ind executed';
1722: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1723: END IF;
1724:
1725:
1726: EXCEPTION

Line 1783: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1779: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
1780:
1781: -- Logging Infra:
1782: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Proc';
1783: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1784: l_total_inv_amount NUMBER; --Bug9106549
1785: l_total_awt_amount NUMBER; --Bug9106549
1786:
1787:

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

1792:
1793:
1794: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1795: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1796: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1797: END IF;
1798: --Bug 8244163 Calculating l_total_inv_amt = total invoice amt with out AWT / PREPAY lines
1799: --Replacing p_inv_rec.invoice_amount with g_total_inv_amount. Because invoice_amount will be
1800: --adjusted when prepayment application is happened with option "prepayment on Invoice"

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

1832: IF p_final_payment = TRUE THEN
1833:
1834: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1835: l_log_msg := 'Calling procedure AP_Accounting_Pay_Pkg.Get_Pay_Sum';
1836: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1837: END IF;
1838:
1839: AP_Accounting_Pay_Pkg.Get_Pay_Sum
1840: (p_inv_dist_rec.invoice_distribution_id,

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

1856:
1857: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1858: l_log_msg := 'Invoice curr diff than payment curr';
1859: l_log_msg := l_log_msg || ' Converting l_total_paid_amt to invoice curr';
1860: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1861: END IF;
1862:
1863: l_total_paid_amt := GL_Currency_API.Convert_Amount(
1864: p_inv_rec.payment_currency_code,

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

1948: END IF;
1949:
1950: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1951: l_log_msg := 'Value of l_prorated_amount = '|| l_prorated_amount;
1952: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1953: END IF;
1954:
1955:
1956: IF (p_inv_dist_rec.line_type_lookup_code <> 'AWT') THEN

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

1965: ELSE
1966:
1967: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1968: l_log_msg := 'Calculating prorated amount for cascade adjustment';
1969: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1970: END IF;
1971:
1972: IF g_total_inv_amount = 0 THEN --8244163
1973: l_prorated_amount := 0;

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

2098:
2099:
2100: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2101: l_log_msg := 'Calling procedure Prepay_Dist_Insert';
2102: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2103: END IF;
2104:
2105:
2106: IF p_inv_dist_rec.quantity_variance IS NOT NULL THEN

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

2159: l_curr_calling_sequence);
2160:
2161: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2162: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
2163: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2164: END IF;
2165:
2166:
2167: IF (p_prepay_dist_rec.prepay_tax_diff_amount <> 0) THEN

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

2168:
2169:
2170: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2171: l_log_msg := 'Calling procedure Prepay_Dist_Tax_Diff';
2172: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2173: END IF;
2174:
2175: -- Creating the tax diff distributions
2176: Prepay_Dist_Tax_Diff

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

2185: l_curr_calling_sequence);
2186:
2187: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2188: l_log_msg := 'Procedure Prepay_Dist_Tax_Diff executed';
2189: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2190: END IF;
2191:
2192:
2193: END IF;

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

2197: p_inv_rec.invoice_currency_code <> p_inv_rec.base_currency_code) THEN
2198:
2199: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2200: l_log_msg := 'Calling procedure Prepay_Dist_ERV';
2201: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2202: END IF;
2203:
2204: -- Creating ERV distributions
2205: Prepay_Dist_ERV

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

2214: l_curr_calling_sequence);
2215:
2216: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2217: l_log_msg := 'Procedure Prepay_Dist_ERV executed';
2218: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2219: END IF;
2220:
2221: END IF;
2222:

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

2221: END IF;
2222:
2223: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2224: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
2225: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2226: END IF;
2227:
2228: EXCEPTION
2229: WHEN OTHERS THEN

Line 2270: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2266: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
2267:
2268: -- Logging Infra:
2269: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Tax_Diff';
2270: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2271:
2272:
2273: BEGIN
2274:

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

2276: p_calling_sequence;
2277:
2278: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2279: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2280: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
2281: END IF;
2282:
2283:
2284: IF p_calc_mode = 'A' THEN

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

2303: ELSE
2304:
2305: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2306: l_log_msg := 'Calculating prorated amount for cascade adjustment';
2307: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2308: END IF;
2309:
2310: IF g_total_inv_amount = 0 THEN
2311: l_prorated_amount := 0;

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

2327: END IF;
2328:
2329: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2330: l_log_msg := 'Value for l_prorated_amount = '|| l_prorated_amount;
2331: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2332: END IF;
2333:
2334:
2335: g_total_tax_diff_amt := g_total_tax_diff_amt + l_prorated_amount;

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

2413:
2414:
2415: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2416: l_log_msg := 'Calling procedure Prepay_Dist_Insert';
2417: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2418: END IF;
2419:
2420: Prepay_Dist_Insert
2421: (l_pad_rec,

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

2423:
2424:
2425: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2426: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
2427: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2428: END IF;
2429:
2430: EXCEPTION
2431: WHEN OTHERS THEN

Line 2472: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2468: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
2469:
2470: -- Logging Infra:
2471: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_ERV';
2472: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2473:
2474: BEGIN
2475:
2476:

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

2479:
2480:
2481: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2482: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2483: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
2484: END IF;
2485:
2486:
2487: IF p_inv_dist_rec.rcv_transaction_id IS NOT NULL THEN

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

2508:
2509:
2510: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2511: l_log_msg := 'Value of l_po_pay_exchange_rate = '||l_po_pay_exchange_rate;
2512: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2513: END IF;
2514:
2515:
2516: /* For Cash Basis ERV is Difference between Payment Exchange Rate and

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

2522:
2523:
2524: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2525: l_log_msg := 'Value of l_pay_erv_amount = '||l_pay_erv_amount;
2526: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2527: END IF;
2528:
2529:
2530: /* If the payment accounting is at the at the clearing time, then ERV should be

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

2538: END IF;
2539:
2540: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2541: l_log_msg := 'Value of l_clr_erv_amount = '||l_clr_erv_amount;
2542: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2543: END IF;
2544:
2545:
2546: /* In order to back out the encumbrance entries correctly during cash basis

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

2554: p_prorated_amount, p_inv_rec.invoice_currency_code);
2555:
2556: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2557: l_log_msg := 'Value of l_inv_erv_amount = '||l_inv_erv_amount;
2558: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2559: END IF;
2560:
2561:
2562: IF (p_inv_dist_rec.line_type_lookup_code IN ('NONREC_TAX', 'REC_TAX')) THEN

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

2591: l_pad_rec.base_amount := 0;
2592:
2593: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2594: l_log_msg := 'Calling procedure Prepay_Dist_Insert';
2595: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2596: END IF;
2597:
2598: Prepay_Dist_Insert
2599: (l_pad_rec,

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

2600: l_curr_calling_sequence);
2601:
2602: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2603: l_log_msg := 'Procedure Prepay_Dist_Insert executed';
2604: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
2605: END IF;
2606:
2607:
2608: EXCEPTION

Line 2643: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2639: l_curr_calling_sequence VARCHAR2(2000);
2640:
2641: -- Logging Infra:
2642: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Reverse';
2643: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2644:
2645:
2646: BEGIN
2647:

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

2650:
2651: -- Logging Infra: Procedure level
2652: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2653: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2654: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
2655: END IF;
2656:
2657: -- Bug 6698125. Added if condition to correctly reverse the prepay app
2658: -- distributions based on if reversed for prepayment unapplication or

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

2839:
2840: -- Logging Infra: Procedure level
2841: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2842: l_log_msg := 'End of procedure '|| l_procedure_name;
2843: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
2844: END IF;
2845:
2846:
2847: EXCEPTION

Line 2875: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2871: l_curr_calling_sequence VARCHAR2(2000);
2872:
2873: -- Logging Infra:
2874: l_procedure_name CONSTANT VARCHAR2(30) := 'Prepay_Dist_Insert';
2875: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2876:
2877: BEGIN
2878:
2879: l_curr_calling_sequence := 'AP_ACCTG_PREPAY_DIST_PKG.Prepay_Dist_Insert<- ' ||

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

2881:
2882: -- Logging Infra: Procedure level
2883: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2884: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2885: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
2886: END IF;
2887:
2888:
2889: INSERT INTO AP_Prepay_App_Dists

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

2964:
2965: -- Logging Infra: Procedure level
2966: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2967: l_log_msg := 'End of procedure '|| l_procedure_name;
2968: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
2969: END IF;
2970:
2971:
2972: EXCEPTION

Line 3006: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

3002: l_curr_calling_sequence VARCHAR2(2000);
3003:
3004: -- Logging Infra:
3005: l_procedure_name CONSTANT VARCHAR2(30) := 'Delete_Hist_Dists';
3006: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
3007:
3008: BEGIN
3009:
3010: l_curr_calling_sequence := 'AP_Acctg_Prepay_Dist_Pkg.Delete_hist_dists<- ' ||

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

3012:
3013: -- Logging Infra: Procedure level
3014: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3015: l_log_msg := 'Begin of procedure '|| l_procedure_name;
3016: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
3017: END IF;
3018:
3019: -- Bug fix 5634515
3020: -- rewrite the query to delete the correct prepay application dist record.

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

3027:
3028: -- Logging Infra: Procedure level
3029: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3030: l_log_msg := 'Begin of procedure '|| l_procedure_name;
3031: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
3032: END IF;
3033:
3034: -- bug9038462, the previous bug tags have been retained, but for the sake
3035: -- of code cleanliness, I am removing the old sqls used for deletions. Please

Line 3100: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

3096: l_curr_calling_sequence VARCHAR2(2000);
3097:
3098: -- Logging Infra:
3099: l_procedure_name CONSTANT VARCHAR2(30) := 'Upg_Dist_Links_Insert';
3100: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
3101:
3102:
3103: BEGIN
3104:

Line 3112: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||

3108:
3109: -- Logging Infra: Procedure level
3110: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3111: l_log_msg := 'Begin of procedure '|| l_procedure_name;
3112: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||
3113: '.begin', l_log_msg);
3114: END IF;
3115:
3116: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

3114: END IF;
3115:
3116: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3117: l_log_msg := 'Deleting xla_distribution_links';
3118: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
3119: END IF;
3120:
3121: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3122: l_log_msg := ' Printing the details of the parameters '||

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

3122: l_log_msg := ' Printing the details of the parameters '||
3123: ' P_Invoice_ID : '||P_Invoice_ID||
3124: ' P_Prepay_History_ID : '||P_Prepay_History_ID||
3125: ' P_Accounting_Event_ID : '||P_Accounting_Event_ID;
3126: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
3127: END IF;
3128:
3129: DELETE FROM xla_distribution_links
3130: WHERE application_id = 200

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

3146: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3147: l_log_msg := ' Number of XLA distribution LInks Deleted :'||l_rowcount||
3148: ' Now Inserting xla_distribution_links for event '||
3149: p_accounting_event_id;
3150: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
3151: END IF;
3152:
3153:
3154: INSERT INTO XLA_Distribution_Links t1

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

3547: l_rowcount := SQL%ROWCOUNT;
3548:
3549: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3550: l_log_msg := 'Number of records Inserted in XDL '||l_rowcount;
3551: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
3552: END IF;
3553:
3554: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3555: l_log_msg := 'End of procedure '||l_procedure_name;

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

3552: END IF;
3553:
3554: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3555: l_log_msg := 'End of procedure '||l_procedure_name;
3556: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end',l_log_msg);
3557: END IF;
3558:
3559:
3560: EXCEPTION