41: IS
42: BEGIN
43: if (p_msg_level >= G_MSG_LEVEL) then
44:
45: FND_LOG.STRING(p_msg_level, G_PKG_NAME, p_msg);
46:
47: end if;
48:
49: EXCEPTION
47: end if;
48:
49: EXCEPTION
50: WHEN OTHERS THEN
51: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR in LogMessage: ' || sqlerrm);
52: END;
53:
54:
55:
123: del.transaction_id in (ams.PRINCIPAL_TRX_ID, ams.INTEREST_TRX_ID, ams.FEE_TRX_ID) and
124: ams.loan_id = loan.loan_id;
125:
126: BEGIN
127: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
128: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Received event ' || p_event.getEventName());
129:
130: /* Established savepoint */
131: SAVEPOINT Delinquency_Create;
124: ams.loan_id = loan.loan_id;
125:
126: BEGIN
127: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
128: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Received event ' || p_event.getEventName());
129:
130: /* Established savepoint */
131: SAVEPOINT Delinquency_Create;
132: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Established savepoint');
128: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Received event ' || p_event.getEventName());
129:
130: /* Established savepoint */
131: SAVEPOINT Delinquency_Create;
132: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Established savepoint');
133:
134: l_request_id := p_event.GetValueForParameter('REQUEST_ID');
135: l_num_del_cr := p_event.GetValueForParameter('NOOFDELCREATED');
136: l_num_del_upd := p_event.GetValueForParameter('NOOFDELUPDATED');
134: l_request_id := p_event.GetValueForParameter('REQUEST_ID');
135: l_num_del_cr := p_event.GetValueForParameter('NOOFDELCREATED');
136: l_num_del_upd := p_event.GetValueForParameter('NOOFDELUPDATED');
137:
138: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Event parameters:');
139: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'request id: ' || l_request_id);
140: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of created del: ' || l_num_del_cr);
141: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of updated del: ' || l_num_del_upd);
142:
135: l_num_del_cr := p_event.GetValueForParameter('NOOFDELCREATED');
136: l_num_del_upd := p_event.GetValueForParameter('NOOFDELUPDATED');
137:
138: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Event parameters:');
139: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'request id: ' || l_request_id);
140: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of created del: ' || l_num_del_cr);
141: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of updated del: ' || l_num_del_upd);
142:
143: if l_request_id is not null then
136: l_num_del_upd := p_event.GetValueForParameter('NOOFDELUPDATED');
137:
138: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Event parameters:');
139: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'request id: ' || l_request_id);
140: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of created del: ' || l_num_del_cr);
141: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of updated del: ' || l_num_del_upd);
142:
143: if l_request_id is not null then
144:
137:
138: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Event parameters:');
139: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'request id: ' || l_request_id);
140: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of created del: ' || l_num_del_cr);
141: LogMessage(FND_LOG.LEVEL_STATEMENT, 'number of updated del: ' || l_num_del_upd);
142:
143: if l_request_id is not null then
144:
145: l_count := 0;
145: l_count := 0;
146:
147: -- fix for bug 10121038
148: l_scoring_engine := NVL(FND_PROFILE.VALUE('LNS_SCORING_ENGINE'), 8);
149: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Scoring engine = ' || l_scoring_engine);
150:
151: /* query for loans trx */
152: open loan_trx_cur(to_number(l_request_id));
153: LOOP
159: l_cust_trx_id;
160: exit when loan_trx_cur%NOTFOUND;
161:
162: l_count := l_count + 1;
163: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Found trx #' || l_count);
164: LogMessage(FND_LOG.LEVEL_STATEMENT, 'cust_trx_id: ' || l_cust_trx_id);
165: LogMessage(FND_LOG.LEVEL_STATEMENT, 'amortization_schedule_id: ' || l_amortization_schedule_id);
166: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_id: ' || l_loan_id);
167: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_number: ' || l_loan_number);
160: exit when loan_trx_cur%NOTFOUND;
161:
162: l_count := l_count + 1;
163: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Found trx #' || l_count);
164: LogMessage(FND_LOG.LEVEL_STATEMENT, 'cust_trx_id: ' || l_cust_trx_id);
165: LogMessage(FND_LOG.LEVEL_STATEMENT, 'amortization_schedule_id: ' || l_amortization_schedule_id);
166: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_id: ' || l_loan_id);
167: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_number: ' || l_loan_number);
168: LogMessage(FND_LOG.LEVEL_STATEMENT, 'org_id: ' || l_org_id);
161:
162: l_count := l_count + 1;
163: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Found trx #' || l_count);
164: LogMessage(FND_LOG.LEVEL_STATEMENT, 'cust_trx_id: ' || l_cust_trx_id);
165: LogMessage(FND_LOG.LEVEL_STATEMENT, 'amortization_schedule_id: ' || l_amortization_schedule_id);
166: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_id: ' || l_loan_id);
167: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_number: ' || l_loan_number);
168: LogMessage(FND_LOG.LEVEL_STATEMENT, 'org_id: ' || l_org_id);
169:
162: l_count := l_count + 1;
163: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Found trx #' || l_count);
164: LogMessage(FND_LOG.LEVEL_STATEMENT, 'cust_trx_id: ' || l_cust_trx_id);
165: LogMessage(FND_LOG.LEVEL_STATEMENT, 'amortization_schedule_id: ' || l_amortization_schedule_id);
166: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_id: ' || l_loan_id);
167: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_number: ' || l_loan_number);
168: LogMessage(FND_LOG.LEVEL_STATEMENT, 'org_id: ' || l_org_id);
169:
170: MO_GLOBAL.INIT('LNS');
163: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Found trx #' || l_count);
164: LogMessage(FND_LOG.LEVEL_STATEMENT, 'cust_trx_id: ' || l_cust_trx_id);
165: LogMessage(FND_LOG.LEVEL_STATEMENT, 'amortization_schedule_id: ' || l_amortization_schedule_id);
166: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_id: ' || l_loan_id);
167: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_number: ' || l_loan_number);
168: LogMessage(FND_LOG.LEVEL_STATEMENT, 'org_id: ' || l_org_id);
169:
170: MO_GLOBAL.INIT('LNS');
171: MO_GLOBAL.set_policy_context('S', l_org_id);
164: LogMessage(FND_LOG.LEVEL_STATEMENT, 'cust_trx_id: ' || l_cust_trx_id);
165: LogMessage(FND_LOG.LEVEL_STATEMENT, 'amortization_schedule_id: ' || l_amortization_schedule_id);
166: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_id: ' || l_loan_id);
167: LogMessage(FND_LOG.LEVEL_STATEMENT, 'loan_number: ' || l_loan_number);
168: LogMessage(FND_LOG.LEVEL_STATEMENT, 'org_id: ' || l_org_id);
169:
170: MO_GLOBAL.INIT('LNS');
171: MO_GLOBAL.set_policy_context('S', l_org_id);
172:
194:
195: -- commiting
196: if l_count > 0 then
197: COMMIT WORK;
198: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
199: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Total processed ' || l_count || ' transactions');
200: else
201: LogMessage(FND_LOG.LEVEL_STATEMENT, 'No loan invoices found - no actions will be performed');
202: end if;
195: -- commiting
196: if l_count > 0 then
197: COMMIT WORK;
198: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
199: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Total processed ' || l_count || ' transactions');
200: else
201: LogMessage(FND_LOG.LEVEL_STATEMENT, 'No loan invoices found - no actions will be performed');
202: end if;
203:
197: COMMIT WORK;
198: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
199: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Total processed ' || l_count || ' transactions');
200: else
201: LogMessage(FND_LOG.LEVEL_STATEMENT, 'No loan invoices found - no actions will be performed');
202: end if;
203:
204: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully processed event ' || p_event.getEventName());
205: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
200: else
201: LogMessage(FND_LOG.LEVEL_STATEMENT, 'No loan invoices found - no actions will be performed');
202: end if;
203:
204: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully processed event ' || p_event.getEventName());
205: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
206: RETURN 'SUCCESS';
207:
208: EXCEPTION
201: LogMessage(FND_LOG.LEVEL_STATEMENT, 'No loan invoices found - no actions will be performed');
202: end if;
203:
204: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully processed event ' || p_event.getEventName());
205: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
206: RETURN 'SUCCESS';
207:
208: EXCEPTION
209: WHEN OTHERS THEN
210: ROLLBACK TO Delinquency_Create;
211:
212: WF_CORE.CONTEXT('LNS_BUS_EVENT_SUB_PVT', 'Delinquency_Create', p_event.getEventName(), p_subscription_guid);
213: WF_EVENT.setErrorInfo(p_event, 'ERROR');
214: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Failed to process event ' || p_event.getEventName());
215:
216: RETURN 'ERROR';
217:
218: END Delinquency_Create;
263: where LOAN_ID = P_LOAN_ID;
264:
265: BEGIN
266:
267: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
268:
269: -- Standard start of API savepoint
270: SAVEPOINT UPDATE_LOAN_STATUS_FROM_IEX;
271: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
267: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
268:
269: -- Standard start of API savepoint
270: SAVEPOINT UPDATE_LOAN_STATUS_FROM_IEX;
271: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
272:
273: -- Standard call to check for call compatibility
274: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: -- Initialize API return status to success
284: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
285:
286: -- START OF BODY OF API
287: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input loan_id = ' || P_LOAN_ID);
288: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input scoring_engine_id = ' || P_SCORING_ENGINE_ID);
289:
290: if P_LOAN_ID is null then
291: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
284: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
285:
286: -- START OF BODY OF API
287: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input loan_id = ' || P_LOAN_ID);
288: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input scoring_engine_id = ' || P_SCORING_ENGINE_ID);
289:
290: if P_LOAN_ID is null then
291: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
292: FND_MESSAGE.SET_TOKEN('PARAMETER', 'LOAN_ID');
311: open loan_version_cur(P_LOAN_ID);
312: fetch loan_version_cur into l_version_number, l_loan_status;
313: close loan_version_cur;
314:
315: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Current status: ' || l_loan_status);
316:
317: if l_loan_status = 'APPROVED' or l_loan_status = 'ACTIVE' or
318: l_loan_status = 'DELINQUENT' or l_loan_status = 'DEFAULT'
319: then
331:
332: l_scoring_engine := P_SCORING_ENGINE_ID;
333: if l_scoring_engine is null then
334: l_scoring_engine := NVL(FND_PROFILE.VALUE('LNS_SCORING_ENGINE'), 8);
335: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Scoring engine = ' || l_scoring_engine);
336: end if;
337:
338: /* calling scoring engine to get new loan status */
339: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Calling collections scoring engine to get new loan status...');
335: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Scoring engine = ' || l_scoring_engine);
336: end if;
337:
338: /* calling scoring engine to get new loan status */
339: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Calling collections scoring engine to get new loan status...');
340:
341: BEGIN
342:
343: IEX_SCOREAPI_PUB.GETSCORESTATUS(
352: X_MSG_DATA => l_msg_data);
353:
354: EXCEPTION
355: WHEN OTHERS THEN
356: LogMessage(FND_LOG.LEVEL_ERROR, 'Collections scoring engine API is not installed. Please install it first.');
357: RAISE FND_API.G_EXC_ERROR;
358: END;
359:
360: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_return_status: ' || l_return_status);
356: LogMessage(FND_LOG.LEVEL_ERROR, 'Collections scoring engine API is not installed. Please install it first.');
357: RAISE FND_API.G_EXC_ERROR;
358: END;
359:
360: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_return_status: ' || l_return_status);
361:
362: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
363:
364: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Call to collections scoring engine failed with following error:');
360: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_return_status: ' || l_return_status);
361:
362: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
363:
364: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Call to collections scoring engine failed with following error:');
365: while (l_indexNo <= l_msg_Count ) loop
366: fnd_msg_pub.get(l_indexNo, 'F', l_msg, l_index);
367: LogMessage(FND_LOG.LEVEL_UNEXPECTED, l_msg);
368: l_indexNo := l_indexNo + 1;
363:
364: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Call to collections scoring engine failed with following error:');
365: while (l_indexNo <= l_msg_Count ) loop
366: fnd_msg_pub.get(l_indexNo, 'F', l_msg, l_index);
367: LogMessage(FND_LOG.LEVEL_UNEXPECTED, l_msg);
368: l_indexNo := l_indexNo + 1;
369: End Loop;
370:
371: RAISE FND_API.G_EXC_ERROR;
371: RAISE FND_API.G_EXC_ERROR;
372:
373: END IF;
374:
375: LogMessage(FND_LOG.LEVEL_STATEMENT, 'New score: ' || l_score);
376: LogMessage(FND_LOG.LEVEL_STATEMENT, 'New status: ' || l_status);
377:
378: -- getting loan version and current loan status
379: open loan_version_cur(P_LOAN_ID);
372:
373: END IF;
374:
375: LogMessage(FND_LOG.LEVEL_STATEMENT, 'New score: ' || l_score);
376: LogMessage(FND_LOG.LEVEL_STATEMENT, 'New status: ' || l_status);
377:
378: -- getting loan version and current loan status
379: open loan_version_cur(P_LOAN_ID);
380: fetch loan_version_cur into l_version_number, l_loan_status;
379: open loan_version_cur(P_LOAN_ID);
380: fetch loan_version_cur into l_version_number, l_loan_status;
381: close loan_version_cur;
382:
383: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Current status: ' || l_loan_status);
384:
385: if l_status is not null and l_loan_status <> l_status then
386:
387: -- updating loan header table
387: -- updating loan header table
388: l_loan_header_rec.loan_id := P_LOAN_ID;
389: l_loan_header_rec.LOAN_STATUS := l_status;
390:
391: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Updating loan header...');
392:
393: LNS_LOAN_HEADER_PUB.UPDATE_LOAN(P_OBJECT_VERSION_NUMBER => l_version_number,
394: P_LOAN_HEADER_REC => l_loan_header_rec,
395: P_INIT_MSG_LIST => FND_API.G_TRUE,
396: X_RETURN_STATUS => l_return_status,
397: X_MSG_COUNT => l_msg_count,
398: X_MSG_DATA => l_msg_data);
399:
400: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_return_status: ' || l_return_status);
401:
402: IF l_return_status = 'S' THEN
403: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully update LNS_LOAN_HEADERS_ALL with status ' || l_status);
404: ELSE
399:
400: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_return_status: ' || l_return_status);
401:
402: IF l_return_status = 'S' THEN
403: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully update LNS_LOAN_HEADERS_ALL with status ' || l_status);
404: ELSE
405: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_LOAN_FAIL');
406: FND_MSG_PUB.Add;
407: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
403: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully update LNS_LOAN_HEADERS_ALL with status ' || l_status);
404: ELSE
405: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_LOAN_FAIL');
406: FND_MSG_PUB.Add;
407: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
408: RAISE FND_API.G_EXC_ERROR;
409: END IF;
410:
411: end if;
413: end if;
414:
415: if P_COMMIT = FND_API.G_TRUE then
416: COMMIT WORK;
417: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
418: end if;
419:
420: -- END OF BODY OF API
421: x_return_status := FND_API.G_RET_STS_SUCCESS;
426: p_encoded => FND_API.G_FALSE,
427: p_count => x_msg_count,
428: p_data => x_msg_data);
429:
430: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
431:
432: EXCEPTION
433: WHEN FND_API.G_EXC_ERROR THEN
434: ROLLBACK TO UPDATE_LOAN_STATUS_FROM_IEX;
433: WHEN FND_API.G_EXC_ERROR THEN
434: ROLLBACK TO UPDATE_LOAN_STATUS_FROM_IEX;
435: x_return_status := FND_API.G_RET_STS_ERROR;
436: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
437: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
439: ROLLBACK TO UPDATE_LOAN_STATUS_FROM_IEX;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
439: ROLLBACK TO UPDATE_LOAN_STATUS_FROM_IEX;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
442: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
443: WHEN OTHERS THEN
444: ROLLBACK TO UPDATE_LOAN_STATUS_FROM_IEX;
445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
446: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
446: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
447: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
448: END IF;
449: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
450: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
451: END;
452:
453:
454:
454:
455: BEGIN
456:
457: G_LOG_ENABLED := 'N';
458: G_MSG_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
459:
460: /* getting msg logging info */
461: G_LOG_ENABLED := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
462: /*
460: /* getting msg logging info */
461: G_LOG_ENABLED := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
462: /*
463: if (G_LOG_ENABLED = 'N') then
464: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;
465: else
466: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
467: end if;
468: */
462: /*
463: if (G_LOG_ENABLED = 'N') then
464: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;
465: else
466: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
467: end if;
468: */
469: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_LOG_ENABLED: ' || G_LOG_ENABLED);
470: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_MSG_LEVEL: ' || G_MSG_LEVEL);
465: else
466: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
467: end if;
468: */
469: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_LOG_ENABLED: ' || G_LOG_ENABLED);
470: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_MSG_LEVEL: ' || G_MSG_LEVEL);
471:
472: END LNS_BUS_EVENT_SUB_PVT; -- Package body
466: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
467: end if;
468: */
469: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_LOG_ENABLED: ' || G_LOG_ENABLED);
470: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_MSG_LEVEL: ' || G_MSG_LEVEL);
471:
472: END LNS_BUS_EVENT_SUB_PVT; -- Package body