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_ACCOUNTING_PAY_PKG dependencies on FND_LOG

Line 5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1: PACKAGE BODY AP_ACCOUNTING_PAY_PKG AS
2: /* $Header: apacpayb.pls 120.47.12020000.3 2012/10/04 06:34:19 rseeta ship $ */
3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

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

2: /* $Header: apacpayb.pls 120.47.12020000.3 2012/10/04 06:34:19 rseeta ship $ */
3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

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

3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

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

4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_ACCOUNTING_PAY_PKG.';

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

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

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

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

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

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

Line 58: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

54: -- Logging Infra:
55: l_ledger_id NUMBER;
56: l_entity_id NUMBER;
57: l_procedure_name CONSTANT VARCHAR2(30) := 'Do_Pay_Accounting';
58: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
59:
60: BEGIN
61:
62: l_curr_calling_sequence := 'AP_Accounting_Pay_Pkg.Do_Pay_Accounting<- ' ||

Line 66: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

62: l_curr_calling_sequence := 'AP_Accounting_Pay_Pkg.Do_Pay_Accounting<- ' ||
63: p_calling_sequence;
64:
65: -- Logging Infra: Setting up runtime level
66: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
67:
68: -- Logging Infra: Procedure level
69: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
70: l_log_msg := 'Begin of procedure '|| l_procedure_name;

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

67:
68: -- Logging Infra: Procedure level
69: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
70: l_log_msg := 'Begin of procedure '|| l_procedure_name;
71: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
72: END IF;
73:
74:
75: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

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

74:
75: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
76: l_log_msg := 'Calling procedure Prorate_Historical_Dists to create '||
77: 'Prepay App dists for the historical non Accounted Dists';
78: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
79: END IF;
80:
81: Prorate_Historical_Dists(l_curr_calling_sequence);
82:

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

81: Prorate_Historical_Dists(l_curr_calling_sequence);
82:
83: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
84: l_log_msg := 'Calling procedure AP_Acctg_Pay_Dist_Pkg.Primary_Pay_Events';
85: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
86: END IF;
87:
88: -- We need to delete the payment hist distributions and prepay appl hist distributions
89: -- which were created during the draft mode of the accounting process

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

93:
94:
95: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
96: l_log_msg := 'Procedure AP_Acctg_Pay_Dist_Pkg.Primary_Pay_Events executed';
97: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
98: END IF;
99:
100: OPEN xla_events_cur;
101: LOOP

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

107:
108: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
109: l_log_msg := 'CUR: xla_events_cur: entity_code = '|| l_xla_event_rec.entity_code
110: || ' document_id = ' || l_xla_event_rec.source_id_int_1;
111: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
112: END IF;
113:
114: -- Get the base currency code into global variable
115: IF (l_xla_event_rec.entity_code = 'AP_PAYMENTS') THEN

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

144: 'REFUND RECORDED')) THEN
145:
146: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
147: l_log_msg := 'Calling procedure AP_Acctg_Pay_Dist_Pkg.Primary_Pay_Events';
148: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
149: END IF;
150:
151:
152: AP_Acctg_Pay_Dist_Pkg.Primary_Pay_Events

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

155:
156:
157: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
158: l_log_msg := 'Procedure AP_Acctg_Pay_Dist_Pkg.Primary_Pay_Events executed';
159: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
160: END IF;
161:
162: ELSIF l_xla_event_rec.event_type_code IN ('MANUAL PAYMENT ADJUSTED',
163: 'MANUAL REFUND ADJUSTED',

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

164: 'UPGRADED MANUAL PMT ADJUSTED') THEN
165:
166: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
167: l_log_msg := 'Calling procedure AP_Acctg_Pay_Dist_Pkg.Manual_Pay_Adj_Events';
168: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
169: END IF;
170:
171: AP_Acctg_Pay_Dist_Pkg.Manual_Pay_Adj_Events
172: (l_xla_event_rec,

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

173: l_curr_calling_sequence);
174:
175: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
176: l_log_msg := 'Procedure AP_Acctg_Pay_Dist_Pkg.Manual_Pay_Adj_Events executed';
177: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
178: END IF;
179:
180: ELSIF l_xla_event_rec.event_type_code IN ('PAYMENT ADJUSTED',
181: 'PAYMENT MATURITY ADJUSTED',

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

183: 'REFUND ADJUSTED') THEN
184:
185: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
186: l_log_msg := 'Calling procedure AP_Acctg_Pay_Dist_Pkg.Pay_Dist_Cascade_Adj_Events';
187: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
188: END IF;
189:
190: AP_Acctg_Pay_Dist_Pkg.Pay_Dist_Cascade_Adj_Events
191: (l_xla_event_rec,

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

192: l_curr_calling_sequence);
193:
194: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
195: l_log_msg := 'Procedure AP_Acctg_Pay_Dist_Pkg.Pay_Dist_Cascade_Adj_Events executed';
196: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
197: END IF;
198:
199: ELSIF l_xla_event_rec.event_type_code IN ('PAYMENT CANCELLED',
200: 'PAYMENT MATURITY REVERSED',

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

202: 'REFUND CANCELLED') THEN
203:
204: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
205: l_log_msg := 'Calling procedure AP_Acctg_Pay_Dist_Pkg.Cancel_Primary_Pay_Events';
206: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
207: END IF;
208:
209: AP_Acctg_Pay_Dist_Pkg.Cancel_Primary_Pay_Events
210: (l_xla_event_rec,

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

212:
213:
214: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
215: l_log_msg := 'Procedure AP_Acctg_Pay_Dist_Pkg.Cancel_Primary_Pay_Events executed';
216: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
217: END IF;
218:
219: ELSIF l_xla_event_rec.event_type_code IN ('PREPAYMENT APPLICATION ADJ') THEN
220:

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

219: ELSIF l_xla_event_rec.event_type_code IN ('PREPAYMENT APPLICATION ADJ') THEN
220:
221: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
222: l_log_msg := 'Calling procedure AP_Acctg_Prepay_Dist_Pkg.Prepay_Dist_Cascade_Adj';
223: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
224: END IF;
225:
226: AP_Acctg_Prepay_Dist_Pkg.Prepay_Dist_Cascade_Adj
227: (l_xla_event_rec,

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

228: l_curr_calling_sequence);
229:
230: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
231: l_log_msg := 'Procedure AP_Acctg_Prepay_Dist_Pkg.Prepay_Dist_Cascade_Adj executed';
232: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
233: END IF;
234:
235: -- bug9716573
236: -- added the condition of budgetary control flag to ensure that the

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

252:
253: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
254: l_log_msg := 'Budgetary Control flag for the Event_ID: '||l_xla_event_rec.event_id||
255: ' is: '||l_budgetary_control_flag;
256: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
257: END IF;
258: EXCEPTION
259: WHEN OTHERS THEN
260: l_budgetary_control_flag := 'N';

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

263: IF l_budgetary_control_flag = 'N' THEN
264:
265: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
266: l_log_msg := 'Calling procedure AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind';
267: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
268: END IF;
269:
270: AP_Acctg_Prepay_Dist_Pkg.Update_Gain_Loss_Ind
271: (l_xla_event_rec,

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

272: l_curr_calling_sequence);
273:
274: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
275: l_log_msg := 'Procedure AP_Acctg_Prepay_Dist_Pkg.Updated_Gain_Loss_Ind executed';
276: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
277: END IF;
278:
279: END IF;
280:

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

293: --Bug 8670681
294:
295: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
296: l_log_msg := 'Calling procedure AP_ACCTG_PAY_ROUND_PKG.Final_Cash';
297: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
298: END IF;
299:
300: AP_ACCTG_PAY_ROUND_PKG.Final_Cash
301: (l_xla_event_rec,

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

302: l_curr_calling_sequence);
303:
304: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
305: l_log_msg := 'Procedure procedure AP_ACCTG_PAY_ROUND_PKG.Final_Cash executed';
306: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
307: END IF;
308:
309: END IF; --8288996 ends
310: EXCEPTION

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

334: ' will not be accounted due to error: '|| SQLERRM;
335:
336: fnd_file.put_line(FND_FILE.LOG, l_log_msg);
337: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
338: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
339: END IF;
340: END IF;
341: END; --end bug 9936620
342: END LOOP;

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

344:
345: -- Logging Infra: Procedure level
346: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
347: l_log_msg := 'End of procedure '|| l_procedure_name;
348: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
349: END IF;
350:
351: -- Commenting out the commit since the commit is issued during the post processing of the
352: -- accounting process

Line 382: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

378: l_curr_calling_sequence VARCHAR2(2000);
379:
380: -- Logging Infra:
381: l_procedure_name CONSTANT VARCHAR2(30) := 'Do_Pay_Accounting';
382: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
383:
384: BEGIN
385:
386: l_curr_calling_sequence := 'AP_Accounting_Pay_Pkg.Do_Pay_Accounting<- ' ||

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

388:
389: -- Logging Infra: Procedure level
390: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
391: l_log_msg := 'Begin of procedure '|| l_procedure_name;
392: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
393: END IF;
394:
395:
396: -- Bug 5098657. Added the where condition for both the delete statements

Line 1210: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1206: l_curr_calling_sequence VARCHAR2(2000);
1207: l_total_awt NUMBER; --Bug 9166188
1208:
1209: l_procedure_name CONSTANT VARCHAR2(30) := 'is_final_payment';
1210: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1211:
1212: BEGIN
1213:
1214:

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

1238: 'P_Payment_Amount=' || P_Payment_Amount ||
1239: 'P_Discount_Amount=' ||P_Discount_Amount ||
1240: 'P_Prepay_Amount =' || P_Prepay_Amount ||
1241: 'P_Transaction_Type =' || P_Transaction_Type;
1242: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1243: END IF;
1244:
1245:
1246: IF (P_Transaction_Type IN ('PAYMENT CLEARED')) THEN

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

1279:
1280: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1281: l_log_msg := 'transaction type is payment clearing and ' ||
1282: 'l_paid_acctd_amt=' || l_paid_acctd_amt;
1283: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1284: END IF;
1285:
1286: ELSIF (P_Transaction_Type IN ('PAYMENT MATURED')) THEN
1287:

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

1309:
1310: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1311: l_log_msg := 'transaction type is payment matruity and ' ||
1312: 'l_paid_acctd_amt=' || l_paid_acctd_amt;
1313: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1314: END IF;
1315:
1316:
1317: ELSE

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

1341:
1342: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1343: l_log_msg := 'transaction type is payment created or others ' ||
1344: 'l_paid_acctd_amt=' || l_paid_acctd_amt;
1345: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1346: END IF;
1347:
1348: END IF;
1349:

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

1369:
1370: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1371: l_log_msg := 'there is a prepay application and ' ||
1372: 'l_prepaid_acctd_amt =' || l_prepaid_acctd_amt;
1373: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1374: END IF;
1375:
1376:
1377: IF (p_inv_rec.invoice_currency_code <> p_inv_rec.payment_currency_code) THEN

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

1401: AND AID.invoice_includes_prepay_flag = 'Y';
1402: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1403: l_log_msg := 'Total amount of distributions having invoice_includes_prepay_flag as Y ' ||
1404: 'l_inv_inc_prepay_pay =' || l_inv_inc_prepay_pay;
1405: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1406: END IF;
1407:
1408: IF (p_inv_rec.invoice_currency_code <> p_inv_rec.payment_currency_code) THEN
1409:

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

1450: 'p_inv_rec.pay_curr_invoice_amount' || p_inv_rec.pay_curr_invoice_amount ||
1451: 'p_inv_rec.invoice_amount ' || p_inv_rec.invoice_amount ||
1452: 'l_total_awt '||l_total_awt;
1453:
1454: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1455: END IF;
1456:
1457: --bug8613795
1458: --Bug 9166188

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

1463: l_final_payment := TRUE;
1464:
1465: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1466: l_log_msg := 'This is a final payment after comparison';
1467: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1468: END IF;
1469:
1470: END IF;
1471:

Line 1507: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1503: l_base_amount NUMBER := 0 ;
1504: l_curr_calling_sequence VARCHAR2(2000);
1505:
1506: l_procedure_name CONSTANT VARCHAR2(30) := 'Get_Base_Amount';
1507: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1508:
1509: BEGIN
1510:
1511: l_curr_calling_sequence := 'AP_ACCOUNTING_PAY_PKG.Get_Base_Amount<-'

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

1520: 'P_base_currency_code =' || P_base_currency_code ||
1521: 'P_exchange_rate_type =' || P_exchange_rate_type ||
1522: 'P_exchange_rate_date =' || P_exchange_rate_date ||
1523: 'P_exchange_rate =' || P_exchange_rate ;
1524: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1525: END IF;
1526:
1527: IF ( P_currency_code = P_base_currency_code ) THEN
1528:

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

1527: IF ( P_currency_code = P_base_currency_code ) THEN
1528:
1529: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1530: l_log_msg := 'base currency code = transaction currency code';
1531: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1532:
1533: END IF;
1534:
1535: l_base_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(P_amount,

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

1542:
1543: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1544:
1545: l_log_msg := 'exchange rate type is not user and it is a fixed rate';
1546: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1547:
1548: END IF;
1549:
1550: l_base_amount := GL_Currency_API.Convert_Amount(P_currency_code,

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

1556:
1557: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1558:
1559: l_log_msg := 'not a fix rate, and not a same currency code';
1560: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1561:
1562: END IF;
1563:
1564:

Line 1647: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1643:
1644:
1645: TYPE num_tab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
1646: l_inv_id_tab NUM_TAB;
1647: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1648: l_procedure_name CONSTANT VARCHAR2(30) := 'Prorate_Historical_Dists';
1649: --bug12686836
1650: l_prepay_dist_tab NUM_TAB;
1651: l_invoice_id AP_INVOICES_ALL.Invoice_ID%TYPE;

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

1659: || P_calling_sequence;
1660:
1661: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1662: l_log_msg := 'Begin of the Procedure Prorate_Historical_Dists';
1663: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1664: END IF;
1665:
1666: l_debug_info := 'before the loop for invoices begins';
1667: OPEN Aprvd_UnPrtd_His_Inv;

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

1678: BEGIN
1679:
1680: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1681: l_log_msg := 'Processing the Invoice_id '||l_inv_id_tab(i);
1682: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1683: END IF;
1684:
1685: l_debug_info := 'processing the invoice_id '||l_inv_id_tab(i);
1686: l_invoice_id := l_inv_id_tab(i);

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

1707:
1708: l_rowcount := SQL%ROWCOUNT;
1709: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1710: l_log_msg := 'Number of records updated to not encumbered '||l_rowcount;
1711: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1712: END IF;
1713:
1714:
1715: Ap_Acctg_Prepay_Dist_Pkg.Prepay_Dist_Appl

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

1729:
1730: l_rowcount := SQL%ROWCOUNT;
1731: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1732: l_log_msg := 'Number of records updated back to encumbered '||l_rowcount;
1733: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1734: END IF;
1735:
1736:
1737: EXCEPTION

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

1738: WHEN OTHERS THEN
1739: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1740: l_log_msg := 'Encountered an Exception '||SQLERRM||
1741: 'while Processing the Invoice_id '||l_inv_id_tab(i);
1742: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1743: END IF;
1744: ROLLBACK TO Before_Invoice;
1745: END;
1746:

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

1751: CLOSE Aprvd_UnPrtd_His_Inv;
1752:
1753: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1754: l_log_msg := 'End of the Procedure Prorate_Historical_Dists';
1755: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1756: END IF;
1757:
1758:
1759: EXCEPTION

Line 1797: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1793:
1794: l_curr_calling_sequence VARCHAR2(2000);
1795:
1796: l_procedure_name CONSTANT VARCHAR2(30) := 'is_final_event';
1797: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1798:
1799: BEGIN
1800:
1801: l_curr_calling_sequence := 'AP_ACCOUNTING_PAY_PKG.Is_Final_Payment<-' ||

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

1805: l_log_msg := 'Begin of is_final_event function call and parameters are' ||
1806: 'p_inv_rec.invoice_id =' || p_inv_rec.invoice_id ||
1807: 'p_xla_event_rec.event_type_code =' || p_xla_event_rec.event_type_code ||
1808: 'p_prepay_app_dist_id =' || p_prepay_app_dist_id;
1809: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1810: END IF;
1811:
1812: SELECT DECODE(COUNT(*), 0, 'N', 'Y')
1813: INTO l_unacctg_events_exist

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

1939: l_final_event := TRUE;
1940: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1941: l_log_msg := 'Final event='||p_xla_event_rec.event_id||
1942: ' OR Final prepay dist='||p_prepay_app_dist_id;
1943: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1944: END IF;
1945: ELSE
1946:
1947: l_final_event := FALSE;

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

1947: l_final_event := FALSE;
1948: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1949: l_log_msg := 'Event ='||p_xla_event_rec.event_id||' is NOT final event'||
1950: ' OR prepay dist='||p_prepay_app_dist_id||' is NOT final prepay dist';
1951: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1952: END IF;
1953: END IF;
1954:
1955: RETURN l_final_event;

Line 1974: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1970:
1971: l_procedure_name CONSTANT VARCHAR2(30) := 'is_upgrade_proration_exists';
1972:
1973: l_curr_calling_sequence VARCHAR2(2000);
1974: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1975:
1976: l_upg_appl_actg_for_prep_dist NUMBER;
1977: l_upg_pay_actg_for_inv NUMBER;
1978: l_upg_appl_actg_for_inv NUMBER;

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

1983: l_curr_calling_sequence := 'AP_ACCOUNTING_PAY_PKG.is_upgrade_proration_exists<-' ||P_Calling_Sequence;
1984:
1985: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1986: l_log_msg := 'Check is_upgrade_proration_exists for : '|| P_Rounding_Method;
1987: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1988: END IF;
1989:
1990:
1991: IF P_Rounding_Method=G_FINAL_APPL THEN

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

2007: and rownum = 1;
2008:
2009: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2010: l_log_msg := 'l_upg_appl_actg_for_prep_dist = ' ||l_upg_appl_actg_for_prep_dist;
2011: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
2012: END IF;
2013:
2014: IF l_upg_appl_actg_for_prep_dist = 0 THEN
2015: return FALSE;

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

2020: ELSIF P_Rounding_Method=G_FINAL_PAY THEN
2021:
2022: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2023: l_log_msg := 'p_transaction_type = ' ||p_transaction_type;
2024: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
2025: END IF;
2026:
2027: IF (p_transaction_type IN ('PAYMENT CLEARED', 'PAYMENT CLEARING ADJUSTED')) THEN
2028:

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

2124: END IF;
2125:
2126: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2127: l_log_msg := 'l_upg_pay_actg_for_inv = ' ||l_upg_pay_actg_for_inv;
2128: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
2129: END IF;
2130:
2131: -- check for non-reversed, upgrade prepay application accounting w.r.t invoice_id
2132: select count(1)

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

2145: and rownum = 1;
2146:
2147: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2148: l_log_msg := 'l_upg_appl_actg_for_inv = ' ||l_upg_appl_actg_for_inv;
2149: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
2150: END IF;
2151:
2152: IF l_upg_pay_actg_for_inv = 0 and l_upg_appl_actg_for_inv = 0 then
2153: return FALSE;

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

2177: and rownum = 1;
2178:
2179: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2180: l_log_msg := 'l_upg_pay_all_actg_for_inv = ' ||l_upg_pay_all_actg_for_inv;
2181: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
2182: END IF;
2183:
2184: IF l_upg_pay_all_actg_for_inv = 0 then
2185: return FALSE;