DBA Data[Home] [Help]

APPS.IEX_DELINQUENCY_PUB dependencies on IEX_DEBUG_PUB

Line 76: IEX_DEBUG_PUB.logMessage('CLEAR_DEL_BUFFERS: ' || 'IEX_DEL_PUB: cleaning del buffers');

72: --SAVEPOINT CLEAN_DEL_BUFFERS_PVT;
73: RETCODE := FND_API.G_RET_STS_SUCCESS;
74: -- IF PG_DEBUG < 10 THEN
75: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
76: IEX_DEBUG_PUB.logMessage('CLEAR_DEL_BUFFERS: ' || 'IEX_DEL_PUB: cleaning del buffers');
77: END IF;
78: --
79: -- Begin - 01/25/2005 - Andre Araujo - This will cause the temp tables space to blow up changing it...
80: --

Line 94: IEX_DEBUG_PUB.logMessage('CLEAR_DEL_BUFFERS: ' || 'IEX_DEL_PUB: cleaning failed due to ' || sqlerrm);

90: Exception
91: When others then
92: -- IF PG_DEBUG < 10 THEN
93: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
94: IEX_DEBUG_PUB.logMessage('CLEAR_DEL_BUFFERS: ' || 'IEX_DEL_PUB: cleaning failed due to ' || sqlerrm);
95: END IF;
96: RETCODE := -1;
97: ERRBUF := sqlerrm;
98:

Line 161: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'PVT: ' || l_api_name || ' start');

157: FND_MSG_PUB.initialize;
158: END IF;
159:
160: -- Debug Message
161: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'PVT: ' || l_api_name || ' start');
162:
163: --
164: -- API body
165: --

Line 169: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Calling Process Inv Payments');

165: --
166:
167: l_num_payments := p_payments_tbl.count;
168:
169: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Calling Process Inv Payments');
170: IEX_PROMISES_BATCH_PUB.CLOSE_PROMISES(P_API_VERSION => l_api_version,
171: P_INIT_MSG_LIST => FND_API.G_FALSE,
172: P_COMMIT => FND_API.G_TRUE,
173: P_VALIDATION_LEVEL => NULL,

Line 179: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Process Inv Payments returns ' || l_return_status);

175: X_MSG_COUNT => l_msg_count,
176: X_MSG_DATA => l_msg_data,
177: P_PAYMENTS_TBL => p_payments_tbl);
178:
179: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Process Inv Payments returns ' || l_return_status);
180:
181: IF l_return_status <> 'S' THEN
182: NULL;
183: -- log error

Line 186: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'pay count is ' || l_num_payments);

182: NULL;
183: -- log error
184: END IF;
185:
186: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'pay count is ' || l_num_payments);
187:
188: -- get all delinquency IDs to be closed
189: IF l_num_payments >= 1 THEN
190: FOR i in 1..l_num_payments LOOP

Line 192: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'before open del cursor');

188: -- get all delinquency IDs to be closed
189: IF l_num_payments >= 1 THEN
190: FOR i in 1..l_num_payments LOOP
191:
192: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'before open del cursor');
193: select delinquency_id into l_del_id
194: from iex_delinquencies
195: where payment_schedule_id = p_payments_tbl(i);
196:

Line 204: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'callling close dunnings');

200: ELSE
201: NULL;
202: END IF;
203:
204: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'callling close dunnings');
205:
206: -- here we will call crystal's API to Close_Dunnings
207: IEX_DUNNING_PUB.Close_Dunning(p_api_version => l_api_version
208: ,p_init_msg_list => FND_API.G_FALSE

Line 216: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Close dunning returns ' || l_return_status);

212: ,x_return_status => l_return_status
213: ,x_msg_count => l_msg_count
214: ,x_msg_data => l_msg_data);
215:
216: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Close dunning returns ' || l_return_status);
217:
218: IF l_return_status <> 'S' THEN
219: NULL;
220: -- log error

Line 223: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'before update');

219: NULL;
220: -- log error
221: END IF;
222:
223: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'before update');
224:
225: -- now update the delinquencies table
226: nCount := l_del_tbl.count;
227:

Line 238: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'after update');

234: WHERE DELINQUENCY_ID = l_del_tbl(j);
235:
236: end if;
237:
238: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'after update');
239: COMMIT;
240:
241: x_return_status := l_return_status;
242:

Line 248: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'PVT: ' || l_api_name || ' end');

244: -- End of API body
245: --
246:
247: -- Debug Message
248: IEX_DEBUG_PUB.LogMessage(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'PVT: ' || l_api_name || ' end');
249:
250: -- Standard call to get message count and if count is 1, get message info.
251: FND_MSG_PUB.Count_And_Get
252: ( p_count => x_msg_count,

Line 330: IEX_DEBUG_PUB.logMessage( 'Start Raise Delinquency Event Concurrent program');

326: l_request_id :=p_request_id;
327: l_del_create_count := p_del_create_count ;
328: l_del_update_count := p_del_update_count ;
329: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
330: IEX_DEBUG_PUB.logMessage( 'Start Raise Delinquency Event Concurrent program');
331: IEX_DEBUG_PUB.logMessage('Program Run Date:'||SYSDATE);
332: END IF;
333:
334:

Line 331: IEX_DEBUG_PUB.logMessage('Program Run Date:'||SYSDATE);

327: l_del_create_count := p_del_create_count ;
328: l_del_update_count := p_del_update_count ;
329: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
330: IEX_DEBUG_PUB.logMessage( 'Start Raise Delinquency Event Concurrent program');
331: IEX_DEBUG_PUB.logMessage('Program Run Date:'||SYSDATE);
332: END IF;
333:
334:
335: select iex_del_wf_s.nextval INTO l_seq from dual;

Line 338: IEX_DEBUG_PUB.logMessage(' EVENT KEY ' ||l_key );

334:
335: select iex_del_wf_s.nextval INTO l_seq from dual;
336: l_key := l_event_name ||'-'||l_request_id || '-'||l_seq;
337: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
338: IEX_DEBUG_PUB.logMessage(' EVENT KEY ' ||l_key );
339: IEX_DEBUG_PUB.logMessage(
340: ' request_id =' ||l_request_id
341: ||'No of Del Created = ' ||l_del_create_count
342: ||'No of Del Updated =' ||l_del_update_count

Line 339: IEX_DEBUG_PUB.logMessage(

335: select iex_del_wf_s.nextval INTO l_seq from dual;
336: l_key := l_event_name ||'-'||l_request_id || '-'||l_seq;
337: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
338: IEX_DEBUG_PUB.logMessage(' EVENT KEY ' ||l_key );
339: IEX_DEBUG_PUB.logMessage(
340: ' request_id =' ||l_request_id
341: ||'No of Del Created = ' ||l_del_create_count
342: ||'No of Del Updated =' ||l_del_update_count
343: );

Line 359: IEX_DEBUG_PUB.logMessage(' Before Launching Event ');

355: to_char(l_del_update_count),
356: l_parameter_list);
357:
358: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
359: IEX_DEBUG_PUB.logMessage(' Before Launching Event ');
360: END IF;
361:
362: wf_event.raise(p_event_name => l_event_name
363: ,p_event_key => l_key

Line 371: IEX_DEBUG_PUB.logMessage( 'End Raise Delinquency Event program');

367:
368: l_parameter_list.DELETE;
369:
370: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
371: IEX_DEBUG_PUB.logMessage( 'End Raise Delinquency Event program');
372: END IF;
373:
374: -- Standard call to get message count and if count is 1, get message info.
375: FND_MSG_PUB.Count_And_Get

Line 383: IEX_DEBUG_PUB.logMessage('Raise Delinquency Event Concurrent program raised exception '

379:
380: EXCEPTION
381: WHEN OTHERS THEN
382: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
383: IEX_DEBUG_PUB.logMessage('Raise Delinquency Event Concurrent program raised exception '
384: || sqlerrm);
385: END IF;
386: x_msg_count := 1 ;
387: x_msg_data := sqlerrm ;

Line 550: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

546: l_enable_business_events := FND_PROFILE.VALUE('IEX_ENABLE_CUST_STATUS_EVENT') ;
547:
548: -- IF PG_DEBUG < 10 THEN
549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
550: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
551: END IF;
552: -- IF PG_DEBUG < 10 THEN
553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
554: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES Start <<----------');

Line 554: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES Start <<----------');

550: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
551: END IF;
552: -- IF PG_DEBUG < 10 THEN
553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
554: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES Start <<----------');
555: END IF;
556: -- IF PG_DEBUG < 10 THEN
557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
558: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 558: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

554: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES Start <<----------');
555: END IF;
556: -- IF PG_DEBUG < 10 THEN
557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
558: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
559: END IF;
560: -- IF PG_DEBUG < 10 THEN
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
562: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

Line 562: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

558: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
559: END IF;
560: -- IF PG_DEBUG < 10 THEN
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
562: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
563: END IF;
564:
565:
566: RETCODE := 0 ;

Line 581: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'finding bridge ' || p_request_id);

577:
578: Begin
579: -- IF PG_DEBUG < 10 THEN
580: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
581: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'finding bridge ' || p_request_id);
582: END IF;
583: SELECT score_object_code,
584: score_id
585: INTO v_object,

Line 593: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

589: AND rownum = 1 ;
590:
591: -- IF PG_DEBUG < 10 THEN
592: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
593: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
594: END IF;
595: -- IF PG_DEBUG < 10 THEN
596: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
597: IEX_DEBUG_PUB.LOGMESSAGE

Line 597: IEX_DEBUG_PUB.LOGMESSAGE

593: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
594: END IF;
595: -- IF PG_DEBUG < 10 THEN
596: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
597: IEX_DEBUG_PUB.LOGMESSAGE
598: ('MANAGE_DELINQUENCIES: ' || 'Object >> ' || v_object || ' Score Id >> ' || v_score);
599: END IF;
600: -- IF PG_DEBUG < 10 THEN
601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 602: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

598: ('MANAGE_DELINQUENCIES: ' || 'Object >> ' || v_object || ' Score Id >> ' || v_score);
599: END IF;
600: -- IF PG_DEBUG < 10 THEN
601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
602: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
603: END IF;
604: Exception
605: WHEN NO_DATA_FOUND then
606: ERRBUF := ' No Data Found on IEX_DEL_BUFFERS Table for the Passed Request Id...> '

Line 611: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

607: || to_char(p_Request_id) ;
608: RETCODE := 1;
609: -- IF PG_DEBUG < 10 THEN
610: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
611: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
612: END IF;
613: ROLLBACK TO del_sp;
614:
615: -- IF PG_DEBUG < 10 THEN

Line 617: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

613: ROLLBACK TO del_sp;
614:
615: -- IF PG_DEBUG < 10 THEN
616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
617: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
618: END IF;
619: -- IF PG_DEBUG < 10 THEN
620: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
621: IEX_DEBUG_PUB.LOGMESSAGE

Line 621: IEX_DEBUG_PUB.LOGMESSAGE

617: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
618: END IF;
619: -- IF PG_DEBUG < 10 THEN
620: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
621: IEX_DEBUG_PUB.LOGMESSAGE
622: ('---------->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
623: END IF;
624: -- IF PG_DEBUG < 10 THEN
625: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 626: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

622: ('---------->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
623: END IF;
624: -- IF PG_DEBUG < 10 THEN
625: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
626: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
627: END IF;
628: return ;
629: End ;
630:

Line 633: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Score Id = ' || v_score || ' Object Code = ' || v_object);

629: End ;
630:
631: -- IF PG_DEBUG < 10 THEN
632: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
633: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Score Id = ' || v_score || ' Object Code = ' || v_object);
634: END IF;
635:
636: Select --fnd_profile.value('ORG_ID'), --Commneted for MOAC
637: fnd_profile.value('USER_ID'),

Line 653: IEX_DEBUG_PUB.LOGMESSAGE

649: where score_id = v_score ;
650:
651: -- IF PG_DEBUG < 10 THEN
652: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
653: IEX_DEBUG_PUB.LOGMESSAGE
654: ('MANAGE_DELINQUENCIES: ' || 'Org Id = ' || v_org_id || ' Score Range Count = ' || v_score_range);
655: END IF;
656: -- IF PG_DEBUG < 10 THEN
657: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 658: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Debug Level = ' || to_char(v_debug_level));

654: ('MANAGE_DELINQUENCIES: ' || 'Org Id = ' || v_org_id || ' Score Range Count = ' || v_score_range);
655: END IF;
656: -- IF PG_DEBUG < 10 THEN
657: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
658: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Debug Level = ' || to_char(v_debug_level));
659: END IF;
660: -- IF PG_DEBUG < 10 THEN
661: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
662: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 662: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

658: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Debug Level = ' || to_char(v_debug_level));
659: END IF;
660: -- IF PG_DEBUG < 10 THEN
661: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
662: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
663: END IF;
664:
665: -- Everything works only when Score Range is Defined.
666: If v_score_range > 0 then

Line 725: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Row Count after Update Select ');

721:
722: /* ================= Debug Message ====================*/
723: -- IF PG_DEBUG < 10 THEN
724: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
725: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Row Count after Update Select ');
726: END IF;
727: -- IF PG_DEBUG < 10 THEN
728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
729: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 729: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

725: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Row Count after Update Select ');
726: END IF;
727: -- IF PG_DEBUG < 10 THEN
728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
729: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
730: END IF;
731:
732: if v_debug_level <= 10 then
733: for i in 1..vt_del_id.count

Line 737: IEX_DEBUG_PUB.LOGMESSAGE

733: for i in 1..vt_del_id.count
734: LOOP
735: -- IF PG_DEBUG < 10 THEN
736: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
737: IEX_DEBUG_PUB.LOGMESSAGE
738: ('MANAGE_DELINQUENCIES: ' || ' Pmt Schd Id = ' || to_char(vt_pmt_schd_id(i))||
739: ' Delinquency Id = ' || to_char(vt_del_id(i)) ||
740: ' Buf Status = ' || vt_buf_status(i) ||
741: 'Del Status = ' || vt_del_status(i));

Line 747: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

743: END LOOP ;
744: End If ;
745: -- IF PG_DEBUG < 10 THEN
746: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
747: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
748: END IF;
749: /*================= Debug Message ====================== */
750:
751: Exception

Line 758: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

754: ' Error Msg ' || SQLERRM ;
755: RETCODE := -1;
756: -- IF PG_DEBUG < 10 THEN
757: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
758: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
759: END IF;
760: ROLLBACK TO del_sp;
761:
762: -- IF PG_DEBUG < 10 THEN

Line 764: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');

760: ROLLBACK TO del_sp;
761:
762: -- IF PG_DEBUG < 10 THEN
763: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
764: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');
765: END IF;
766:
767:
768: --

Line 787: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> '||to_char(SQL%ROWCOUNT));

783: -- End - Andre Araujo - 09/30/2004- Remove obsolete logging
784:
785: -- IF PG_DEBUG < 10 THEN
786: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
787: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> '||to_char(SQL%ROWCOUNT));
788: END IF;
789: -- IF PG_DEBUG < 10 THEN
790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
791: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 791: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

787: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> '||to_char(SQL%ROWCOUNT));
788: END IF;
789: -- IF PG_DEBUG < 10 THEN
790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
791: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
792: END IF;
793: -- IF PG_DEBUG < 10 THEN
794: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
795: IEX_DEBUG_PUB.LOGMESSAGE

Line 795: IEX_DEBUG_PUB.LOGMESSAGE

791: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
792: END IF;
793: -- IF PG_DEBUG < 10 THEN
794: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
795: IEX_DEBUG_PUB.LOGMESSAGE
796: ('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
797: END IF;
798: -- IF PG_DEBUG < 10 THEN
799: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 800: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

796: ('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
797: END IF;
798: -- IF PG_DEBUG < 10 THEN
799: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
800: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
801: END IF;
802:
803: Commit;
804: return;

Line 826: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

822:
823: /* ================= Debug Message ================== */
824: -- IF PG_DEBUG < 10 THEN
825: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
826: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
827: END IF;
828: if v_debug_level <= 10 then
829: FOR i in 1..vt_del_id.count
830: LOOP

Line 833: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Rows Updated for ' ||

829: FOR i in 1..vt_del_id.count
830: LOOP
831: -- IF PG_DEBUG < 10 THEN
832: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
833: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Rows Updated for ' ||
834: to_char(vt_del_id(i)) || ' is ' ||
835: to_char(SQL%BULK_ROWCOUNT(i)));
836: END IF;
837: END LOOP ;

Line 841: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

837: END LOOP ;
838: End If ;
839: -- IF PG_DEBUG < 10 THEN
840: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
841: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
842: END IF;
843: /* ================= Debug Message =========================== */
844:
845: Exception

Line 853: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

849: || SQLCODE || ' Error Mesg ' || SQLERRM ;
850: RETCODE := -1;
851: -- IF PG_DEBUG < 10 THEN
852: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
853: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
854: END IF;
855: ROLLBACK TO del_sp ;
856:
857: -- IF PG_DEBUG < 10 THEN

Line 859: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');

855: ROLLBACK TO del_sp ;
856:
857: -- IF PG_DEBUG < 10 THEN
858: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
859: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');
860: END IF;
861:
862: --
863: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks

Line 878: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleted Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));

874: --
875:
876: -- IF PG_DEBUG < 10 THEN
877: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
878: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleted Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
879: END IF;
880: -- IF PG_DEBUG < 10 THEN
881: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
882: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 882: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

878: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleted Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
879: END IF;
880: -- IF PG_DEBUG < 10 THEN
881: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
882: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
883: END IF;
884: -- IF PG_DEBUG < 10 THEN
885: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
886: IEX_DEBUG_PUB.LOGMESSAGE('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');

Line 886: IEX_DEBUG_PUB.LOGMESSAGE('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');

882: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
883: END IF;
884: -- IF PG_DEBUG < 10 THEN
885: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
886: IEX_DEBUG_PUB.LOGMESSAGE('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
887: END IF;
888: -- IF PG_DEBUG < 10 THEN
889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
890: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 890: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

886: IEX_DEBUG_PUB.LOGMESSAGE('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
887: END IF;
888: -- IF PG_DEBUG < 10 THEN
889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
890: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
891: END IF;
892:
893: Commit;
894: return;

Line 905: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------- Insert Candidate Rows ----------');

901: Open dbg_test ;
902:
903: -- IF PG_DEBUG < 10 THEN
904: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
905: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------- Insert Candidate Rows ----------');
906: END IF;
907: -- IF PG_DEBUG < 10 THEN
908: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
909: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '----cust----pmt schd----status----');

Line 909: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '----cust----pmt schd----status----');

905: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------- Insert Candidate Rows ----------');
906: END IF;
907: -- IF PG_DEBUG < 10 THEN
908: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
909: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '----cust----pmt schd----status----');
910: END IF;
911:
912: LOOP
913: FETCH dbg_test

Line 924: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || to_char(dbg_cust) || ' ---- ' ||

920: EXIT WHEN dbg_test%NOTFOUND ;
921:
922: -- IF PG_DEBUG < 10 THEN
923: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
924: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || to_char(dbg_cust) || ' ---- ' ||
925: to_char(dbg_object_id) || ' ---- ' ||dbg_status);
926: END IF;
927: END LOOP ;
928:

Line 1012: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1008:
1009: /* ================= Debug Message ==================== */
1010: -- IF PG_DEBUG < 10 THEN
1011: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1012: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1013: END IF;
1014: -- IF PG_DEBUG < 10 THEN
1015: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1016: IEX_DEBUG_PUB.LOGMESSAGE

Line 1016: IEX_DEBUG_PUB.LOGMESSAGE

1012: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1013: END IF;
1014: -- IF PG_DEBUG < 10 THEN
1015: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1016: IEX_DEBUG_PUB.LOGMESSAGE
1017: ('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));
1018: END IF;
1019: -- IF PG_DEBUG < 10 THEN
1020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1021: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1017: ('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));
1018: END IF;
1019: -- IF PG_DEBUG < 10 THEN
1020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1021: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1022: END IF;
1023: /* ================= Debug Message ==================== */
1024:
1025: Exception

Line 1030: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1026: WHEN OTHERS then
1027: ERRBUF := 'INSERT - Error Code = ' || SQLCODE || ' Error Msg ' || SQLERRM ;
1028: -- IF PG_DEBUG < 10 THEN
1029: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1030: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1031: END IF;
1032: RETCODE := -1 ;
1033: ROLLBACK TO del_sp ;
1034:

Line 1037: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');

1033: ROLLBACK TO del_sp ;
1034:
1035: -- IF PG_DEBUG < 10 THEN
1036: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1037: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');
1038: END IF;
1039:
1040: --
1041: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks

Line 1054: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' ||

1050: --
1051:
1052: -- IF PG_DEBUG < 10 THEN
1053: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1054: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' ||
1055: to_char(SQL%ROWCOUNT));
1056: END IF;
1057: Commit;
1058: return;

Line 1077: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_CONTRACTS: ' || 'Starting Contract..... ');

1073:
1074: begin
1075:
1076: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1077: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_CONTRACTS: ' || 'Starting Contract..... ');
1078: END IF;
1079:
1080: SELECT ico.object_id, ids.del_status, ico.delinquency_status
1081: BULK COLLECT INTO vt_contract_id, vt_buf_status, vt_del_status

Line 1093: IEX_DEBUG_PUB.LOGMESSAGE

1089: AND idb.request_id = p_request_id;
1090: null;
1091:
1092: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1093: IEX_DEBUG_PUB.LOGMESSAGE
1094: ('MANAGE_DELINQUENCIES: ' || 'CONTRACT - Row Count after Update Select ' || to_char(vt_contract_id.COUNT));
1095: END IF;
1096:
1097: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1098: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1094: ('MANAGE_DELINQUENCIES: ' || 'CONTRACT - Row Count after Update Select ' || to_char(vt_contract_id.COUNT));
1095: END IF;
1096:
1097: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1098: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1099: END IF;
1100:
1101: if v_debug_level < 11 then
1102: for i in 1..vt_del_id.count

Line 1106: IEX_DEBUG_PUB.LOGMESSAGE

1102: for i in 1..vt_del_id.count
1103: LOOP
1104:
1105: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1106: IEX_DEBUG_PUB.LOGMESSAGE
1107: ('MANAGE_DELINQUENCIES: ' || ' CONTRACT Id = ' || to_char(vt_contract_id(i))||
1108: ' Delinquency Id = ' || to_char(vt_del_id(i)) ||
1109: ' Buf Status = ' || vt_buf_status(i) ||
1110: 'Del Status = ' || vt_del_status(i));

Line 1116: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1112: END LOOP ;
1113: End If ;
1114:
1115: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1116: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1117: END IF;
1118:
1119: EXCEPTION
1120: WHEN OTHERS THEN

Line 1124: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1120: WHEN OTHERS THEN
1121: ERRBUF := 'CONTRACT - Matching Delinquencies Select -->' || SQLCODE || ' Error Msg ' || SQLERRM ;
1122:
1123: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1124: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1125: END IF;
1126: RETCODE := -1 ;
1127:
1128: ROLLBACK TO del_sp ;

Line 1131: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));

1127:
1128: ROLLBACK TO del_sp ;
1129:
1130: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1131: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
1132: END IF;
1133:
1134: Commit;
1135: return;

Line 1153: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1149: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Number Of Contracts Updated..>> '|| vt_contract_id.count) ;
1150: l_del_update_count := vt_del_id.count ;
1151:
1152: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1153: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1154: END IF;
1155: if v_debug_level < 11 then
1156: FOR i in 1..vt_del_id.count
1157: LOOP

Line 1160: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Rows Updated for ' || to_char(vt_del_id(i)) || ' is ' ||

1156: FOR i in 1..vt_del_id.count
1157: LOOP
1158:
1159: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1160: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Rows Updated for ' || to_char(vt_del_id(i)) || ' is ' ||
1161: to_char(SQL%BULK_ROWCOUNT(i)));
1162: END IF;
1163: END LOOP ;
1164: End If ;

Line 1167: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1163: END LOOP ;
1164: End If ;
1165:
1166: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1167: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1168: END IF;
1169:
1170: EXCEPTION
1171: WHEN OTHERS THEN

Line 1175: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1171: WHEN OTHERS THEN
1172: ERRBUF := 'CONTRACT Updating... - Matching Delinquencies Update --> ' || SQLCODE || ' Error Msg ' || SQLERRM ;
1173:
1174: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1175: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1176: END IF;
1177: RETCODE := -1;
1178: ROLLBACK TO del_sp;
1179:

Line 1181: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');

1177: RETCODE := -1;
1178: ROLLBACK TO del_sp;
1179:
1180: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1181: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');
1182: END IF;
1183: CLEAR_BUFFERS2(p_request_id);
1184: Commit;
1185: return;

Line 1196: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Starting Cases ');

1192: BEGIN
1193:
1194: -- IF PG_DEBUG < 10 THEN
1195: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1196: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Starting Cases ');
1197: END IF;
1198:
1199: -- Selects All the matching rows between buffer and Delinquencies table
1200: -- except when the statuses are same or when buffer status is PREDELINQUENT

Line 1240: IEX_DEBUG_PUB.LOGMESSAGE

1236: AND idb.request_id = p_request_id;
1237: /* ================= Debug Message ====================*/
1238:
1239: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1240: IEX_DEBUG_PUB.LOGMESSAGE
1241: -- ('MANAGE_DELINQUENCIES: ' || 'CASE - Row Count after Update Select ' || to_char(vt_del_id.COUNT));
1242: ('MANAGE_DELINQUENCIES: ' || 'CASE - Row Count after Update Select ' || to_char(vt_case_id.COUNT));
1243: END IF;
1244:

Line 1246: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1242: ('MANAGE_DELINQUENCIES: ' || 'CASE - Row Count after Update Select ' || to_char(vt_case_id.COUNT));
1243: END IF;
1244:
1245: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1246: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1247: END IF;
1248:
1249: if v_debug_level < 11 then
1250: for i in 1..vt_del_id.count

Line 1254: IEX_DEBUG_PUB.LOGMESSAGE

1250: for i in 1..vt_del_id.count
1251: LOOP
1252:
1253: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1254: IEX_DEBUG_PUB.LOGMESSAGE
1255: ('MANAGE_DELINQUENCIES: ' || ' Case Id = ' || to_char(vt_case_id(i))||
1256: ' Delinquency Id = ' || to_char(vt_del_id(i)) ||
1257: ' Buf Status = ' || vt_buf_status(i) ||
1258: 'Del Status = ' || vt_del_status(i));

Line 1264: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1260: END LOOP ;
1261: End If ;
1262:
1263: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1264: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1265: END IF;
1266: /*================= Debug Message ====================== */
1267:
1268: EXCEPTION

Line 1273: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1269: WHEN OTHERS THEN
1270: ERRBUF := 'CASE - Matching Delinquencies Select -->' || SQLCODE || ' Error Msg ' || SQLERRM ;
1271:
1272: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1273: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1274: END IF;
1275: RETCODE := -1 ;
1276:
1277: ROLLBACK TO del_sp ;

Line 1293: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));

1289: --
1290:
1291: -- IF PG_DEBUG < 10 THEN
1292: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1293: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
1294: END IF;
1295:
1296: -- Begin - Andre Araujo - 09/30/2004- Remove obsolete logging
1297: -- IEX_CONC_REQUEST_MSG_PKG.LOG_ERROR(p_request_id, 'MANAGE_DELINQUENCIES',ERRBUF) ;

Line 1335: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1331:
1332: /* ================= Debug Message =========================*/
1333: -- IF PG_DEBUG < 10 THEN
1334: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1335: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1336: END IF;
1337: if v_debug_level < 11 then
1338: FOR i in 1..vt_del_id.count
1339: LOOP

Line 1342: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Rows Updated for ' ||

1338: FOR i in 1..vt_del_id.count
1339: LOOP
1340: -- IF PG_DEBUG < 10 THEN
1341: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1342: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Rows Updated for ' ||
1343: to_char(vt_del_id(i)) || ' is ' ||
1344: to_char(SQL%BULK_ROWCOUNT(i)));
1345: END IF;
1346: END LOOP ;

Line 1350: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1346: END LOOP ;
1347: End If ;
1348: -- IF PG_DEBUG < 10 THEN
1349: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1350: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1351: END IF;
1352: /* ================= Debug Message =========================== */
1353:
1354: EXCEPTION

Line 1360: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1356: ERRBUF := 'CASE - Matching Delinquencies Update --> ' ||
1357: SQLCODE || ' Error Msg ' || SQLERRM ;
1358: -- IF PG_DEBUG < 10 THEN
1359: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1360: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1361: END IF;
1362: RETCODE := -1;
1363: ROLLBACK TO del_sp;
1364:

Line 1367: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');

1363: ROLLBACK TO del_sp;
1364:
1365: -- IF PG_DEBUG < 10 THEN
1366: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1367: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');
1368: END IF;
1369:
1370: --
1371: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks

Line 1469: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1465:
1466: -- ================= Debug Message ========================
1467: -- IF PG_DEBUG < 10 THEN
1468: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1469: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1470: END IF;
1471: -- IF PG_DEBUG < 10 THEN
1472: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1473: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));

Line 1473: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));

1469: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1470: END IF;
1471: -- IF PG_DEBUG < 10 THEN
1472: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1473: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));
1474: END IF;
1475: IF PG_DeBUG < 10 THEN
1476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1477: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

Line 1477: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);

1473: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));
1474: END IF;
1475: IF PG_DeBUG < 10 THEN
1476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1477: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1478: END IF;
1479: END IF;
1480: -- ================= Debug Message ===========================
1481:

Line 1487: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1483: WHEN OTHERS then
1484: ERRBUF := 'INSERT - Error Code = ' || SQLCODE || ' Error Msg ' || SQLERRM ;
1485: -- IF PG_DEBUG < 10 THEN
1486: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1487: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1488: END IF;
1489: RETCODE := -1 ;
1490: ROLLBACK TO del_sp ;
1491:

Line 1494: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'CASE INSERT >> Deleting Buffer Table after RollBack due to Error');

1490: ROLLBACK TO del_sp ;
1491:
1492: -- IF PG_DEBUG < 10 THEN
1493: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1494: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'CASE INSERT >> Deleting Buffer Table after RollBack due to Error');
1495: END IF;
1496:
1497: --
1498: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks

Line 1511: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));

1507: --
1508:
1509: -- IF PG_DEBUG < 10 THEN
1510: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1511: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
1512: END IF;
1513: -- Begin - Andre Araujo - 09/30/2004- Remove obsolete logging
1514: --IEX_CONC_REQUEST_MSG_PKG.LOG_ERROR(p_request_id, 'MANAGE_DELINQUENCIES',ERRBUF) ;
1515: -- End - Andre Araujo - 09/30/2004- Remove obsolete logging

Line 1529: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Calling the Work Flow........ ');

1525:
1526: -- ______________________ CALLING THE WORKFLOW __________________________
1527: -- IF PG_DEBUG < 10 THEN
1528: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1529: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Calling the Work Flow........ ');
1530: END IF;
1531: -- IF PG_DEBUG < 10 THEN
1532: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1533: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Delinquency Table Count After Mangement Process ' || to_char(vt_del_id.count));

Line 1533: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Delinquency Table Count After Mangement Process ' || to_char(vt_del_id.count));

1529: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Calling the Work Flow........ ');
1530: END IF;
1531: -- IF PG_DEBUG < 10 THEN
1532: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1533: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Delinquency Table Count After Mangement Process ' || to_char(vt_del_id.count));
1534: END IF;
1535:
1536: -- Filter out NOCOPY the delinquency ids that are not the Workflow Candidates.
1537: if vt_del_id.count > 0 then

Line 1545: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Del Id for Workflow >> ' || to_char(vt_del_id(ct)));

1541: if vt_del_status(ct) IN (vf_delinquent, vf_predelinquent)
1542: AND (vt_buf_status(ct) = vf_current) THEN
1543: -- F PG_DEBUG < 10 THEN
1544: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1545: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Del Id for Workflow >> ' || to_char(vt_del_id(ct)));
1546: END IF;
1547: if vt_wf_del_id.COUNT = 0 then
1548: vt_wf_del_id(1) := vt_del_id(ct) ;
1549: else

Line 1559: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '------------------------------------------------------------');

1555:
1556: -- ================= Debug Message ===========================
1557: -- IF PG_DEBUG < 10 THEN
1558: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1559: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '------------------------------------------------------------');
1560: END IF;
1561: -- IF PG_DEBUG < 10 THEN
1562: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1563: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of WorlFlow Candidate Rows --> ' || to_char(vt_wf_del_id.COUNT));

Line 1563: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of WorlFlow Candidate Rows --> ' || to_char(vt_wf_del_id.COUNT));

1559: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '------------------------------------------------------------');
1560: END IF;
1561: -- IF PG_DEBUG < 10 THEN
1562: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1563: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Number of WorlFlow Candidate Rows --> ' || to_char(vt_wf_del_id.COUNT));
1564: END IF;
1565:
1566: -- Launch the Workflow and Close Promises only when required
1567: if vt_wf_del_id.COUNT > 0 then

Line 1573: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Delinquency Id --> ' || to_char(vt_wf_del_id(p)));

1569: FOR p in 1..vt_wf_del_id.COUNT
1570: LOOP
1571: -- IF PG_DEBUG < 10 THEN
1572: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1573: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Delinquency Id --> ' || to_char(vt_wf_del_id(p)));
1574: END IF;
1575: END LOOP ;
1576: -- IF PG_DEBUG < 10 THEN
1577: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1578: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '------------------------------------------------------------');

1574: END IF;
1575: END LOOP ;
1576: -- IF PG_DEBUG < 10 THEN
1577: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1578: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '------------------------------------------------------------');
1579: END IF;
1580: /* ================= Debug Message =========================== */
1581:
1582:

Line 1595: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'WorlFlow Status --> ' || l_return_status);

1591: x_msg_data => l_msg_data);
1592:
1593: -- IF PG_DEBUG < 10 THEN
1594: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1595: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'WorlFlow Status --> ' || l_return_status);
1596: END IF;
1597:
1598: -- Close the Promises
1599: IEX_PROMISES_BATCH_PUB.CLOSE_PROMISES

Line 1611: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Close Promises Status --> ' || l_return_status);

1607: p_delinq_tbl => vt_wf_del_id );
1608:
1609: -- IF PG_DEBUG < 10 THEN
1610: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1611: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Close Promises Status --> ' || l_return_status);
1612: END IF;
1613:
1614: End If ;
1615:

Line 1618: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table');

1614: End If ;
1615:
1616: -- IF PG_DEBUG < 10 THEN
1617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1618: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table');
1619: END IF;
1620: --
1621: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
1622: --

Line 1630: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleted Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));

1626: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
1627: --
1628: -- IF PG_DEBUG < 10 THEN
1629: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1630: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleted Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
1631: END IF;
1632:
1633: if not isRefreshProgramsRunning then -- Added for bug#7133605 by schekuri on 17-Jun-2008 --Added by PNAVEENK
1634: --Bug5237039. Fix by LKKUMAR on 25-May-2006. Start

Line 1637: IEX_DEBUG_PUB.LOGMESSAGE('Starting to update ar_trx_bal_summary with reference_1 = 1...');

1633: if not isRefreshProgramsRunning then -- Added for bug#7133605 by schekuri on 17-Jun-2008 --Added by PNAVEENK
1634: --Bug5237039. Fix by LKKUMAR on 25-May-2006. Start
1635: FND_FILE.PUT_LINE(FND_FILE.LOG,'Starting to update ar_trx_bal_summary....'); --Added by PNAVEENK
1636: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1637: IEX_DEBUG_PUB.LOGMESSAGE('Starting to update ar_trx_bal_summary with reference_1 = 1...');
1638: END IF;
1639:
1640: if vt_del_id.count > 0 then -- 6785378
1641: BEGIN

Line 1648: IEX_DEBUG_PUB.LOGMESSAGE('Exit after Updating ar_trx_bal_summary with reference_1 = 1...');

1644: FETCH c_cust_account_id_1 BULK COLLECT INTO
1645: l_cust_account_id_1 LIMIT G_BATCH_SIZE;
1646: IF l_cust_account_id_1.count = 0 THEN
1647: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1648: IEX_DEBUG_PUB.LOGMESSAGE('Exit after Updating ar_trx_bal_summary with reference_1 = 1...');
1649: END IF;
1650: CLOSE c_cust_account_id_1;
1651: EXIT;
1652: ELSE

Line 1659: IEX_DEBUG_PUB.LOGMESSAGE(SQL%ROWCOUNT || ' Rows updated in ar_trx_bal_summary with reference_1 = 1');

1655: SET REFERENCE_1 = 1
1656: WHERE CUST_ACCOUNT_ID = l_cust_account_id_1(I);
1657:
1658: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1659: IEX_DEBUG_PUB.LOGMESSAGE(SQL%ROWCOUNT || ' Rows updated in ar_trx_bal_summary with reference_1 = 1');
1660: END IF;
1661: END IF;
1662: END LOOP;
1663: EXCEPTION WHEN OTHERS THEN

Line 1665: IEX_DEBUG_PUB.LOGMESSAGE(SQLERRM || ' Error while updating ar_trx_bal_summary with reference_1 = 1');

1661: END IF;
1662: END LOOP;
1663: EXCEPTION WHEN OTHERS THEN
1664: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1665: IEX_DEBUG_PUB.LOGMESSAGE(SQLERRM || ' Error while updating ar_trx_bal_summary with reference_1 = 1');
1666: END IF;
1667: END;
1668:
1669: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1670: IEX_DEBUG_PUB.LOGMESSAGE('Starting to update ar_trx_bal_summary with reference_1 = Null...');

1666: END IF;
1667: END;
1668:
1669: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1670: IEX_DEBUG_PUB.LOGMESSAGE('Starting to update ar_trx_bal_summary with reference_1 = Null...');
1671: END IF;
1672: BEGIN
1673: OPEN c_cust_account_id_n;
1674: LOOP

Line 1679: IEX_DEBUG_PUB.LOGMESSAGE('Exit after Update ar_trx_bal_summary on complete with reference_1 = Null...');

1675: FETCH c_cust_account_id_n BULK COLLECT INTO
1676: l_cust_account_id_n LIMIT G_BATCH_SIZE;
1677: IF l_cust_account_id_n.count = 0 THEN
1678: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1679: IEX_DEBUG_PUB.LOGMESSAGE('Exit after Update ar_trx_bal_summary on complete with reference_1 = Null...');
1680: END IF;
1681: CLOSE c_cust_account_id_n;
1682: EXIT;
1683: ELSE

Line 1690: IEX_DEBUG_PUB.LOGMESSAGE(SQL%ROWCOUNT || 'Rows updated in ar_trx_bal_summary with reference_1 = Null');

1686: SET REFERENCE_1 = Null
1687: WHERE CUST_ACCOUNT_ID = l_cust_account_id_n(I);
1688: FND_FILE.PUT_LINE(FND_FILE.LOG,SQL%ROWCOUNT || ' Rows updated in ar_trx_bal_summary with reference_1 = NULL');
1689: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1690: IEX_DEBUG_PUB.LOGMESSAGE(SQL%ROWCOUNT || 'Rows updated in ar_trx_bal_summary with reference_1 = Null');
1691: END IF;
1692: END IF;
1693: END LOOP;
1694: EXCEPTION WHEN OTHERS THEN

Line 1696: IEX_DEBUG_PUB.LOGMESSAGE(SQLERRM || ' Error while updating ar_trx_bal_summary with reference_1 = Null');

1692: END IF;
1693: END LOOP;
1694: EXCEPTION WHEN OTHERS THEN
1695: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1696: IEX_DEBUG_PUB.LOGMESSAGE(SQLERRM || ' Error while updating ar_trx_bal_summary with reference_1 = Null');
1697: END IF;
1698: END;
1699: --Bug5237039. Fix by LKKUMAR on 25-May-2006. End.
1700: end if; -- 6785378

Line 1767: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');

1763: End If ;
1764: End If ;
1765:
1766: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1767: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1768: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES End <<----------');
1769: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1770: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1771: END IF;

Line 1768: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES End <<----------');

1764: End If ;
1765:
1766: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1767: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1768: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES End <<----------');
1769: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1770: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1771: END IF;
1772:

Line 1769: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');

1765:
1766: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1767: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1768: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES End <<----------');
1769: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1770: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1771: END IF;
1772:
1773: EXCEPTION

Line 1770: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

1766: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1767: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1768: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE MANAGE_DELINQUENCIES End <<----------');
1769: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '--------------------------------------------------------------');
1770: IEX_DEBUG_PUB.logMessage('MANAGE_DELINQUENCIES: ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1771: END IF;
1772:
1773: EXCEPTION
1774: WHEN Others then

Line 1779: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);

1775: RETCODE := -1 ;
1776: ERRBUF := 'MANAGE_DELINQUENCIES >> WHEN OTHERS - ERROR - ' || SQLCODE || ' ' || SQLERRM ;
1777: -- IF PG_DEBUG < 10 THEN
1778: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1779: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || ERRBUF);
1780: END IF;
1781: ROLLBACK TO del_sp ;
1782:
1783: -- IF PG_DEBUG < 10 THEN

Line 1785: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');

1781: ROLLBACK TO del_sp ;
1782:
1783: -- IF PG_DEBUG < 10 THEN
1784: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1785: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deleting Buffer Table after RollBack due to Error');
1786: END IF;
1787:
1788: --
1789: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks

Line 1799: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));

1795: --
1796:
1797: -- IF PG_DEBUG < 10 THEN
1798: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1799: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || 'Deletd Buffer Row Count >> ' || to_char(SQL%ROWCOUNT));
1800: END IF;
1801:
1802: Commit;
1803: END MANAGE_DELINQUENCIES;

Line 1930: IEX_DEBUG_PUB.LOGMESSAGE('In for Current invoice insertion....');

1926: END LOOP ;
1927: --Begin Bug 6446848 08-Dec-2008 barathsr
1928: else
1929:
1930: IEX_DEBUG_PUB.LOGMESSAGE('In for Current invoice insertion....');
1931:
1932: select IEX_DELINQUENCIES_S.NEXTVAL
1933: into l_deln_id
1934: from dual;

Line 1945: IEX_DEBUG_PUB.LOGMESSAGE('Org_id--->'||l_org_id);

1941: into l_org_id,l_cust_acct_id,l_cust_site_use_id --29/12
1942: from ar_payment_schedules_all
1943: where payment_schedule_id= p_object_id_tbl(i);
1944:
1945: IEX_DEBUG_PUB.LOGMESSAGE('Org_id--->'||l_org_id);
1946: IEX_DEBUG_PUB.LOGMESSAGE('Cust_account_id-->'||l_cust_acct_id);
1947: IEX_DEBUG_PUB.LOGMESSAGE('Customer_site_use_id-->'||l_cust_site_use_id);
1948: INSERT INTO IEX_DELINQUENCIES_ALL
1949: (DELINQUENCY_ID ,

Line 1946: IEX_DEBUG_PUB.LOGMESSAGE('Cust_account_id-->'||l_cust_acct_id);

1942: from ar_payment_schedules_all
1943: where payment_schedule_id= p_object_id_tbl(i);
1944:
1945: IEX_DEBUG_PUB.LOGMESSAGE('Org_id--->'||l_org_id);
1946: IEX_DEBUG_PUB.LOGMESSAGE('Cust_account_id-->'||l_cust_acct_id);
1947: IEX_DEBUG_PUB.LOGMESSAGE('Customer_site_use_id-->'||l_cust_site_use_id);
1948: INSERT INTO IEX_DELINQUENCIES_ALL
1949: (DELINQUENCY_ID ,
1950: LAST_UPDATE_DATE ,

Line 1947: IEX_DEBUG_PUB.LOGMESSAGE('Customer_site_use_id-->'||l_cust_site_use_id);

1943: where payment_schedule_id= p_object_id_tbl(i);
1944:
1945: IEX_DEBUG_PUB.LOGMESSAGE('Org_id--->'||l_org_id);
1946: IEX_DEBUG_PUB.LOGMESSAGE('Cust_account_id-->'||l_cust_acct_id);
1947: IEX_DEBUG_PUB.LOGMESSAGE('Customer_site_use_id-->'||l_cust_site_use_id);
1948: INSERT INTO IEX_DELINQUENCIES_ALL
1949: (DELINQUENCY_ID ,
1950: LAST_UPDATE_DATE ,
1951: LAST_UPDATED_BY ,

Line 1980: IEX_DEBUG_PUB.LOGMESSAGE('Error in CURRENT invoice selection/insertion activity.....');

1976: p_source_module,
1977: l_cust_site_use_id) ; --29/12
1978: exception
1979: when others then --29/12
1980: IEX_DEBUG_PUB.LOGMESSAGE('Error in CURRENT invoice selection/insertion activity.....');
1981: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1982: end;--29/12
1983: end loop;
1984: end if;

Line 1999: IEX_DEBUG_PUB.LogMessage('PUB: ' || l_api_name || ' end');

1995: ROLLBACK TO IEX_IND_DEL ;
1996: END IF;
1997:
1998: -- Debug Message
1999: IEX_DEBUG_PUB.LogMessage('PUB: ' || l_api_name || ' end');
2000: IEX_DEBUG_PUB.LogMessage('End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2001: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2002:
2003: EXCEPTION

Line 2000: IEX_DEBUG_PUB.LogMessage('End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

1996: END IF;
1997:
1998: -- Debug Message
1999: IEX_DEBUG_PUB.LogMessage('PUB: ' || l_api_name || ' end');
2000: IEX_DEBUG_PUB.LogMessage('End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2001: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2002:
2003: EXCEPTION
2004: WHEN FND_API.G_EXC_ERROR THEN

Line 2006: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: Create_Ind_Delinquency: Expected Error ' || sqlerrm);

2002:
2003: EXCEPTION
2004: WHEN FND_API.G_EXC_ERROR THEN
2005: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2006: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: Create_Ind_Delinquency: Expected Error ' || sqlerrm);
2007: END IF;
2008: RAISE FND_API.G_EXC_ERROR;
2009: ROLLBACK TO IEX_IND_DEL;
2010:

Line 2013: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: Create_Ind_Delinquency: Unexpected Error ' || sqlerrm);

2009: ROLLBACK TO IEX_IND_DEL;
2010:
2011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2012: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2013: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: Create_Ind_Delinquency: Unexpected Error ' || sqlerrm);
2014: END IF;
2015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2016: ROLLBACK TO IEX_IND_DEL;
2017:

Line 2021: IEX_DEBUG_PUB.LOGMESSAGE(v_error_msg) ;

2017:
2018: WHEN OTHERS THEN
2019: v_error_msg := SQLCODE || ' Error Msg ' || SQLERRM ;
2020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2021: IEX_DEBUG_PUB.LOGMESSAGE(v_error_msg) ;
2022: END IF;
2023: ROLLBACK TO IEX_IND_DEL;
2024: -- Begin - Andre Araujo - 09/30/2004- Remove obsolete logging
2025: --IEX_CONC_REQUEST_MSG_PKG.LOG_ERROR(-9999, 'CREATE_IND_DELINQUENCIES', v_error_msg) ;

Line 2070: iex_debug_pub.logMessage('IEX_DELINQUENCY_PUB.SCORE_DELINQUENCIES');

2066: RETCODE := 0;
2067:
2068: -- IF PG_DEBUG < 10 THEN
2069: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2070: iex_debug_pub.logMessage('IEX_DELINQUENCY_PUB.SCORE_DELINQUENCIES');
2071: END IF;
2072: -- IF PG_DEBUG < 10 THEN
2073: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2074: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'StartTime: ' || to_char(sysdate, 'DD-MON-YYYY HH:MI:SS'));

Line 2074: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'StartTime: ' || to_char(sysdate, 'DD-MON-YYYY HH:MI:SS'));

2070: iex_debug_pub.logMessage('IEX_DELINQUENCY_PUB.SCORE_DELINQUENCIES');
2071: END IF;
2072: -- IF PG_DEBUG < 10 THEN
2073: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2074: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'StartTime: ' || to_char(sysdate, 'DD-MON-YYYY HH:MI:SS'));
2075: END IF;
2076: -- get the score id for the engine
2077: Select score_id into l_score_id
2078: from iex_del_buffers

Line 2084: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'ScoreID is ' || l_score_id);

2080: rownum = 1;
2081:
2082: -- IF PG_DEBUG < 10 THEN
2083: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2084: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'ScoreID is ' || l_score_id);
2085: END IF;
2086: -- IF PG_DEBUG < 10 THEN
2087: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2088: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'bridge value is ' || p_request_id);

Line 2088: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'bridge value is ' || p_request_id);

2084: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'ScoreID is ' || l_score_id);
2085: END IF;
2086: -- IF PG_DEBUG < 10 THEN
2087: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2088: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'bridge value is ' || p_request_id);
2089: END IF;
2090:
2091: -- now get the data
2092: open c_scores(p_request_id);

Line 2106: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || v_score_objects(i));

2102: for i in 1..nCount
2103: loop
2104: -- IF PG_DEBUG < 10 THEN
2105: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2106: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || v_score_objects(i));
2107: END IF;
2108: -- IF PG_DEBUG < 10 THEN
2109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2110: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || v_score_values(i));

Line 2110: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || v_score_values(i));

2106: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || v_score_objects(i));
2107: END IF;
2108: -- IF PG_DEBUG < 10 THEN
2109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2110: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || v_score_values(i));
2111: END IF;
2112: end loop;
2113:
2114: -- IF PG_DEBUG < 10 THEN

Line 2116: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'Count is ' || nCount);

2112: end loop;
2113:
2114: -- IF PG_DEBUG < 10 THEN
2115: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2116: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'Count is ' || nCount);
2117: END IF;
2118: FORALL r in 1..nCount
2119: UPDATE IEX_DELINQUENCIES_ALL
2120: SET SCORE_ID = l_score_id,

Line 2139: IEX_DEBUG_PUB.logMessage('SCORE_DELINQUENCIES: ' || 'Deleting from buffers');

2135: WHERE request_id = p_request_id;
2136: */
2137: -- IF PG_DEBUG < 10 THEN
2138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2139: IEX_DEBUG_PUB.logMessage('SCORE_DELINQUENCIES: ' || 'Deleting from buffers');
2140: END IF;
2141: --
2142: -- Begin - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
2143: --

Line 2153: iex_debug_pub.logMessage('IEX_DELINQUENCY_PUB.SCORE_DELINQUENCIES');

2149: --
2150:
2151: -- IF PG_DEBUG < 10 THEN
2152: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2153: iex_debug_pub.logMessage('IEX_DELINQUENCY_PUB.SCORE_DELINQUENCIES');
2154: END IF;
2155: -- IF PG_DEBUG < 10 THEN
2156: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2157: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'ENDTime: ' || to_char(sysdate, 'DD-MON-YYYY HH:MI:SS'));

Line 2157: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'ENDTime: ' || to_char(sysdate, 'DD-MON-YYYY HH:MI:SS'));

2153: iex_debug_pub.logMessage('IEX_DELINQUENCY_PUB.SCORE_DELINQUENCIES');
2154: END IF;
2155: -- IF PG_DEBUG < 10 THEN
2156: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2157: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'ENDTime: ' || to_char(sysdate, 'DD-MON-YYYY HH:MI:SS'));
2158: END IF;
2159: Exception
2160: When NO_DATA_FOUND then
2161: -- IF PG_DEBUG < 10 THEN

Line 2163: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'no data found ' || sqlerrm);

2159: Exception
2160: When NO_DATA_FOUND then
2161: -- IF PG_DEBUG < 10 THEN
2162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2163: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'no data found ' || sqlerrm);
2164: END IF;
2165: RETCODE := -1;
2166: ERRBUF := sqlerrm;
2167: When others then

Line 2170: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'other error ' || sqlerrm);

2166: ERRBUF := sqlerrm;
2167: When others then
2168: -- IF PG_DEBUG < 10 THEN
2169: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2170: iex_debug_pub.logMessage('SCORE_DELINQUENCIES: ' || 'other error ' || sqlerrm);
2171: END IF;
2172: RETCODE := -1;
2173: ERRBUF := sqlerrm;
2174:

Line 2220: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': start');

2216:
2217: begin
2218:
2219: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2220: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': start');
2221: END IF;
2222:
2223: -- Standard start of API savepoint
2224: SAVEPOINT SHOW_IN_UWQ_PVT;

Line 2244: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new uwq status: ' || P_UWQ_STATUS);

2240:
2241: -- validating uwq status
2242: l_validation_item := 'P_UWQ_STATUS';
2243: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2244: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new uwq status: ' || P_UWQ_STATUS);
2245: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2246: END IF;
2247: if P_UWQ_STATUS is null then
2248: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 2245: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);

2241: -- validating uwq status
2242: l_validation_item := 'P_UWQ_STATUS';
2243: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2244: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new uwq status: ' || P_UWQ_STATUS);
2245: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2246: END IF;
2247: if P_UWQ_STATUS is null then
2248: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2249: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');

Line 2249: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');

2245: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2246: END IF;
2247: if P_UWQ_STATUS is null then
2248: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2249: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
2250: END IF;
2251: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2252: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);
2253: FND_MESSAGE.SET_TOKEN('API_PARAMETER', l_validation_item);

Line 2261: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': count of P_DELINQUENCY_ID_TBL: ' || P_DELINQUENCY_ID_TBL.count);

2257:
2258: -- validating table of promises
2259: l_validation_item := 'P_DELINQUENCY_ID_TBL';
2260: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2261: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': count of P_DELINQUENCY_ID_TBL: ' || P_DELINQUENCY_ID_TBL.count);
2262: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2263: END IF;
2264: if P_DELINQUENCY_ID_TBL.count = 0 then
2265: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 2262: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);

2258: -- validating table of promises
2259: l_validation_item := 'P_DELINQUENCY_ID_TBL';
2260: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2261: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': count of P_DELINQUENCY_ID_TBL: ' || P_DELINQUENCY_ID_TBL.count);
2262: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2263: END IF;
2264: if P_DELINQUENCY_ID_TBL.count = 0 then
2265: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2266: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');

Line 2266: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');

2262: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2263: END IF;
2264: if P_DELINQUENCY_ID_TBL.count = 0 then
2265: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2266: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
2267: END IF;
2268: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2269: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);
2270: FND_MESSAGE.SET_TOKEN('API_PARAMETER', l_validation_item);

Line 2278: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': P_NO_DAYS: ' || P_NO_DAYS);

2274:
2275: -- validating p_days
2276: l_validation_item := 'P_NO_DAYS';
2277: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2278: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': P_NO_DAYS: ' || P_NO_DAYS);
2279: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2280: END IF;
2281: if P_NO_DAYS is not null and P_NO_DAYS < 0 then
2282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 2279: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);

2275: -- validating p_days
2276: l_validation_item := 'P_NO_DAYS';
2277: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2278: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': P_NO_DAYS: ' || P_NO_DAYS);
2279: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2280: END IF;
2281: if P_NO_DAYS is not null and P_NO_DAYS < 0 then
2282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2283: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');

Line 2283: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');

2279: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
2280: END IF;
2281: if P_NO_DAYS is not null and P_NO_DAYS < 0 then
2282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2283: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
2284: END IF;
2285: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2286: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);
2287: FND_MESSAGE.SET_TOKEN('API_PARAMETER', l_validation_item);

Line 2299: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': number of days: ' || l_days);

2295: else
2296: l_days := P_NO_DAYS;
2297: end if;
2298: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2299: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': number of days: ' || l_days);
2300: END IF;
2301: l_set_status_date := sysdate + l_days;
2302: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2303: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': set status date: ' || l_set_status_date);

Line 2303: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': set status date: ' || l_set_status_date);

2299: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': number of days: ' || l_days);
2300: END IF;
2301: l_set_status_date := sysdate + l_days;
2302: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2303: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': set status date: ' || l_set_status_date);
2304: END IF;
2305:
2306: -- check for status
2307: if P_UWQ_STATUS = 'ACTIVE' then

Line 2321: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_active_date: ' || l_uwq_active_date);

2317:
2318: nCount := p_delinquency_id_tbl.count;
2319: if nCount > 0 then
2320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2321: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_active_date: ' || l_uwq_active_date);
2322: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_complete_date: ' || l_uwq_complete_date);
2323: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': updating promise details...');
2324: END IF;
2325: FORALL i in 1..nCount

Line 2322: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_complete_date: ' || l_uwq_complete_date);

2318: nCount := p_delinquency_id_tbl.count;
2319: if nCount > 0 then
2320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2321: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_active_date: ' || l_uwq_active_date);
2322: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_complete_date: ' || l_uwq_complete_date);
2323: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': updating promise details...');
2324: END IF;
2325: FORALL i in 1..nCount
2326: update iex_delinquencies_all

Line 2323: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': updating promise details...');

2319: if nCount > 0 then
2320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2321: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_active_date: ' || l_uwq_active_date);
2322: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_complete_date: ' || l_uwq_complete_date);
2323: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': updating promise details...');
2324: END IF;
2325: FORALL i in 1..nCount
2326: update iex_delinquencies_all
2327: set UWQ_STATUS = P_UWQ_STATUS,

Line 2339: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Strateg Level = ' || l_level);

2335: -- start of fix for bug 5874874 gnramasa 25-Apr-07
2336: OPEN c_get_level;
2337: FETCH c_get_level INTO l_level;
2338: CLOSE c_get_level;
2339: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Strateg Level = ' || l_level);
2340:
2341: IF l_level = 'CUSTOMER' THEN
2342:
2343: FORALL i in 1..nCount

Line 2472: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Updated ' || SQL%ROWCOUNT || ' rows in IEX_DLN_UWQ_SUMMARY');

2468: where delinquency_id = p_delinquency_id_tbl(i));
2469:
2470: END IF;
2471:
2472: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Updated ' || SQL%ROWCOUNT || ' rows in IEX_DLN_UWQ_SUMMARY');
2473: -- end of fix for bug 5874874 gnramasa 25-Apr-07
2474:
2475: else
2476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 2477: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': nothing to update');

2473: -- end of fix for bug 5874874 gnramasa 25-Apr-07
2474:
2475: else
2476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2477: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': nothing to update');
2478: END IF;
2479: end if;
2480:
2481: -- END OF BODY OF API

Line 2536: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2532: RETCODE := 0 ;
2533:
2534: -- IF PG_DEBUG < 10 THEN
2535: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2536: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2537: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS Start <<----------');
2538: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2539: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2540: END IF;

Line 2537: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS Start <<----------');

2533:
2534: -- IF PG_DEBUG < 10 THEN
2535: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2536: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2537: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS Start <<----------');
2538: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2539: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2540: END IF;
2541:

Line 2538: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2534: -- IF PG_DEBUG < 10 THEN
2535: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2536: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2537: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS Start <<----------');
2538: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2539: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2540: END IF;
2541:
2542: if dunning_level in ('ALL', 'DELINQUENCY') then

Line 2539: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2535: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2536: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2537: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS Start <<----------');
2538: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2539: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2540: END IF;
2541:
2542: if dunning_level in ('ALL', 'DELINQUENCY') then
2543: Begin

Line 2562: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Delinquency : ' || ERRBUF);

2558: ERRBUF := 'CLOSE DUNNINGS << DELINQUENCY >> Error Code = '
2559: || SQLCODE || ' Error Msg ' || SQLERRM ;
2560: -- IF PG_DEBUG < 10 THEN
2561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2562: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Delinquency : ' || ERRBUF);
2563: END IF;
2564: RETCODE := -1 ;
2565: ROLLBACK TO close_dunn ;
2566:

Line 2569: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2565: ROLLBACK TO close_dunn ;
2566:
2567: -- IF PG_DEBUG < 10 THEN
2568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2569: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2570: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2571: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2572: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2573: END IF;

Line 2570: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');

2566:
2567: -- IF PG_DEBUG < 10 THEN
2568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2569: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2570: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2571: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2572: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2573: END IF;
2574: End ;

Line 2571: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2567: -- IF PG_DEBUG < 10 THEN
2568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2569: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2570: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2571: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2572: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2573: END IF;
2574: End ;
2575: end if ;

Line 2572: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2569: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2570: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2571: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2572: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2573: END IF;
2574: End ;
2575: end if ;
2576:

Line 2611: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Bill To : ' || ERRBUF);

2607: ERRBUF := 'CLOSE DUNNINGS << BILL_TO >> Error Code = '
2608: || SQLCODE || ' Error Msg ' || SQLERRM ;
2609: -- IF PG_DEBUG < 10 THEN
2610: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2611: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Bill To : ' || ERRBUF);
2612: END IF;
2613: RETCODE := -1 ;
2614: ROLLBACK TO close_dunn ;
2615:

Line 2618: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2614: ROLLBACK TO close_dunn ;
2615:
2616: -- IF PG_DEBUG < 10 THEN
2617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2618: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2619: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2620: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2621: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2622: END IF;

Line 2619: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');

2615:
2616: -- IF PG_DEBUG < 10 THEN
2617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2618: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2619: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2620: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2621: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2622: END IF;
2623: End ;

Line 2620: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2616: -- IF PG_DEBUG < 10 THEN
2617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2618: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2619: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2620: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2621: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2622: END IF;
2623: End ;
2624: end if ;

Line 2621: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2618: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2619: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2620: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2621: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2622: END IF;
2623: End ;
2624: end if ;
2625: -- clchang updated 04/18/2003 for BILL_TO level -- end

Line 2650: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Account : ' || ERRBUF);

2646: ERRBUF := 'CLOSE DUNNINGS << ACCOUNT >> Error Code = '
2647: || SQLCODE || ' Error Msg ' || SQLERRM ;
2648: -- IF PG_DEBUG < 10 THEN
2649: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2650: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Account : ' || ERRBUF);
2651: END IF;
2652: RETCODE := -1 ;
2653: ROLLBACK TO close_dunn ;
2654:

Line 2657: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2653: ROLLBACK TO close_dunn ;
2654:
2655: -- IF PG_DEBUG < 10 THEN
2656: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2657: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2658: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2659: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2660: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2661: END IF;

Line 2658: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');

2654:
2655: -- IF PG_DEBUG < 10 THEN
2656: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2657: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2658: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2659: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2660: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2661: END IF;
2662: End ;

Line 2659: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2655: -- IF PG_DEBUG < 10 THEN
2656: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2657: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2658: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2659: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2660: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2661: END IF;
2662: End ;
2663: end if ;

Line 2660: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2656: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2657: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2658: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2659: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2660: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2661: END IF;
2662: End ;
2663: end if ;
2664:

Line 2704: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Customer : ' || ERRBUF);

2700: ERRBUF := 'CLOSE DUNNINGS << CUSTOMER >> Error Code = '
2701: || SQLCODE || ' Error Msg ' || SQLERRM ;
2702: -- IF PG_DEBUG < 10 THEN
2703: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2704: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS for Customer : ' || ERRBUF);
2705: END IF;
2706: RETCODE := -1 ;
2707: ROLLBACK TO close_dunn ;
2708:

Line 2711: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2707: ROLLBACK TO close_dunn ;
2708:
2709: -- IF PG_DEBUG < 10 THEN
2710: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2711: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2712: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2713: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2714: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2715: END IF;

Line 2712: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');

2708:
2709: -- IF PG_DEBUG < 10 THEN
2710: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2711: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2712: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2713: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2714: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2715: END IF;
2716: End ;

Line 2713: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2709: -- IF PG_DEBUG < 10 THEN
2710: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2711: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2712: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2713: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2714: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2715: END IF;
2716: End ;
2717: end if ;

Line 2714: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2710: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2711: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2712: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2713: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2714: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2715: END IF;
2716: End ;
2717: end if ;
2718:

Line 2723: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);

2719: Commit;
2720:
2721: -- IF PG_DEBUG < 10 THEN
2722: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2723: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2724: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End NORMAL <<----------');
2725: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2726: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2727: END IF;

Line 2724: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End NORMAL <<----------');

2720:
2721: -- IF PG_DEBUG < 10 THEN
2722: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2723: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2724: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End NORMAL <<----------');
2725: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2726: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2727: END IF;
2728:

Line 2725: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);

2721: -- IF PG_DEBUG < 10 THEN
2722: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2723: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2724: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End NORMAL <<----------');
2725: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2726: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2727: END IF;
2728:
2729: Exception

Line 2726: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2722: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2723: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2724: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End NORMAL <<----------');
2725: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || v_line);
2726: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2727: END IF;
2728:
2729: Exception
2730: WHEN OTHERS then

Line 2734: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || ERRBUF);

2730: WHEN OTHERS then
2731: ERRBUF := 'CLOSE DUNNINGS - Error Code = ' || SQLCODE || ' Error Msg ' || SQLERRM ;
2732: -- IF PG_DEBUG < 10 THEN
2733: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2734: IEX_DEBUG_PUB.LOGMESSAGE('CLOSE_DUNNINGS : ' || ERRBUF);
2735: END IF;
2736: RETCODE := -1 ;
2737: ROLLBACK TO close_dunn ;
2738:

Line 2741: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2737: ROLLBACK TO close_dunn ;
2738:
2739: -- IF PG_DEBUG < 10 THEN
2740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2741: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2742: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2743: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2744: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2745: END IF;

Line 2742: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');

2738:
2739: -- IF PG_DEBUG < 10 THEN
2740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2741: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2742: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2743: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2744: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2745: END IF;
2746: END ;

Line 2743: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));

2739: -- IF PG_DEBUG < 10 THEN
2740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2741: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2742: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2743: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2744: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2745: END IF;
2746: END ;
2747:

Line 2744: IEX_DEBUG_PUB.LOGMESSAGE(v_line);

2740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2741: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2742: IEX_DEBUG_PUB.LOGMESSAGE('---------->> PROCEDURE CLOSE_DUNNINGS End ERROR <<----------');
2743: IEX_DEBUG_PUB.logMessage('CLOSE_DUNNINGS : ' || 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
2744: IEX_DEBUG_PUB.LOGMESSAGE(v_line);
2745: END IF;
2746: END ;
2747:
2748: --

Line 2779: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: cleaning delinquency buffers +');

2775: l_truncate_table VARCHAR2(60);
2776:
2777: Begin
2778:
2779: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: cleaning delinquency buffers +');
2780: FND_FILE.PUT_LINE(FND_FILE.LOG,'IEX_DELINQUENCY_PUB: cleaning delinquency buffers +');
2781:
2782: select count(1) into l_del_count
2783: from fnd_conc_req_summary_v

Line 2788: IEX_DEBUG_PUB.logMessage('Running IEXDLMGB count = ' || l_del_count);

2784: where program_application_id = 695 and
2785: program_short_name in ('IEXDLMGB', 'IEX_SCORE_OBJECTS') and
2786: phase_code in ('P', 'R');
2787:
2788: IEX_DEBUG_PUB.logMessage('Running IEXDLMGB count = ' || l_del_count);
2789: FND_FILE.PUT_LINE(FND_FILE.LOG,'Running IEXDLMGB count = ' || l_del_count);
2790:
2791: if (((p_request = -1) and (l_del_count = 0)) OR ((p_request <> -1) and (l_del_count <= 2))) then
2792: if ((p_request = -1) and (l_del_count = 0)) then

Line 2793: IEX_DEBUG_PUB.logMessage('IEX: Clear Delinquency Buffers Table cp is running and IEX: Scoring Engine Harness cp is not running, so truncating IEX_DEL_BUFFERS table...');

2789: FND_FILE.PUT_LINE(FND_FILE.LOG,'Running IEXDLMGB count = ' || l_del_count);
2790:
2791: if (((p_request = -1) and (l_del_count = 0)) OR ((p_request <> -1) and (l_del_count <= 2))) then
2792: if ((p_request = -1) and (l_del_count = 0)) then
2793: IEX_DEBUG_PUB.logMessage('IEX: Clear Delinquency Buffers Table cp is running and IEX: Scoring Engine Harness cp is not running, so truncating IEX_DEL_BUFFERS table...');
2794: FND_FILE.PUT_LINE(FND_FILE.LOG,'IEX: Clear Delinquency Buffers Table cp is running and IEX: Scoring Engine Harness cp is not running, so truncating IEX_DEL_BUFFERS table...');
2795: else
2796: IEX_DEBUG_PUB.logMessage('This is the last running instance of IEXDLMGB - truncating IEX_DEL_BUFFERS table...');
2797: FND_FILE.PUT_LINE(FND_FILE.LOG,'This is the last running instance of IEXDLMGB - truncating IEX_DEL_BUFFERS table...');

Line 2796: IEX_DEBUG_PUB.logMessage('This is the last running instance of IEXDLMGB - truncating IEX_DEL_BUFFERS table...');

2792: if ((p_request = -1) and (l_del_count = 0)) then
2793: IEX_DEBUG_PUB.logMessage('IEX: Clear Delinquency Buffers Table cp is running and IEX: Scoring Engine Harness cp is not running, so truncating IEX_DEL_BUFFERS table...');
2794: FND_FILE.PUT_LINE(FND_FILE.LOG,'IEX: Clear Delinquency Buffers Table cp is running and IEX: Scoring Engine Harness cp is not running, so truncating IEX_DEL_BUFFERS table...');
2795: else
2796: IEX_DEBUG_PUB.logMessage('This is the last running instance of IEXDLMGB - truncating IEX_DEL_BUFFERS table...');
2797: FND_FILE.PUT_LINE(FND_FILE.LOG,'This is the last running instance of IEXDLMGB - truncating IEX_DEL_BUFFERS table...');
2798: end if;
2799: select OWNER || '.' || TABLE_NAME into l_truncate_table from sys.all_tables where table_name = 'IEX_DEL_BUFFERS';
2800: EXECUTE IMMEDIATE 'truncate table ' || l_truncate_table;

Line 2801: IEX_DEBUG_PUB.logMessage('Done');

2797: FND_FILE.PUT_LINE(FND_FILE.LOG,'This is the last running instance of IEXDLMGB - truncating IEX_DEL_BUFFERS table...');
2798: end if;
2799: select OWNER || '.' || TABLE_NAME into l_truncate_table from sys.all_tables where table_name = 'IEX_DEL_BUFFERS';
2800: EXECUTE IMMEDIATE 'truncate table ' || l_truncate_table;
2801: IEX_DEBUG_PUB.logMessage('Done');
2802: else
2803: IEX_DEBUG_PUB.logMessage('There are other running instances of IEXDLMGB - quiting');
2804: FND_FILE.PUT_LINE(FND_FILE.LOG,'There are other running instances of IEXDLMGB - quiting');
2805: end if;

Line 2803: IEX_DEBUG_PUB.logMessage('There are other running instances of IEXDLMGB - quiting');

2799: select OWNER || '.' || TABLE_NAME into l_truncate_table from sys.all_tables where table_name = 'IEX_DEL_BUFFERS';
2800: EXECUTE IMMEDIATE 'truncate table ' || l_truncate_table;
2801: IEX_DEBUG_PUB.logMessage('Done');
2802: else
2803: IEX_DEBUG_PUB.logMessage('There are other running instances of IEXDLMGB - quiting');
2804: FND_FILE.PUT_LINE(FND_FILE.LOG,'There are other running instances of IEXDLMGB - quiting');
2805: end if;
2806:
2807: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: cleaning delinquency buffers -');

Line 2807: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: cleaning delinquency buffers -');

2803: IEX_DEBUG_PUB.logMessage('There are other running instances of IEXDLMGB - quiting');
2804: FND_FILE.PUT_LINE(FND_FILE.LOG,'There are other running instances of IEXDLMGB - quiting');
2805: end if;
2806:
2807: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: cleaning delinquency buffers -');
2808: FND_FILE.PUT_LINE(FND_FILE.LOG,'IEX_DELINQUENCY_PUB: cleaning delinquency buffers -');
2809:
2810: Exception
2811: When others then

Line 2812: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: CLEAR_BUFFERS2: cleaning failed due to ' || sqlcode || ' ' || sqlerrm);

2808: FND_FILE.PUT_LINE(FND_FILE.LOG,'IEX_DELINQUENCY_PUB: cleaning delinquency buffers -');
2809:
2810: Exception
2811: When others then
2812: IEX_DEBUG_PUB.logMessage('IEX_DELINQUENCY_PUB: CLEAR_BUFFERS2: cleaning failed due to ' || sqlcode || ' ' || sqlerrm);
2813: FND_FILE.PUT_LINE(FND_FILE.LOG, 'IEX_DELINQUENCY_PUB: CLEAR_BUFFERS2: cleaning failed due to ' || sqlcode || ' ' || sqlerrm);
2814:
2815:
2816: End CLEAR_BUFFERS2;