eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IEX_DELINQUENCY_PUB dependencies on FND_LOG

Line 75: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

71: RETCODE := 0;
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...

Line 93: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

89:
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;

Line 329: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

325:
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:

Line 337: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

333:
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

Line 358: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

354: wf_event.AddParameterToList('NOOFDELUPDATED',
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

Line 370: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

366: COMMIT ;
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.

Line 382: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

378: );
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 ;

Line 549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

545: l_source_module := 'IEX_SCORE_NEW_PVT' ;
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

Line 553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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 <<----------');
555: END IF;
556: -- IF PG_DEBUG < 10 THEN
557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
559: END IF;
560: -- IF PG_DEBUG < 10 THEN
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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'));
563: END IF;
564:
565:

Line 580: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

576: -- verifications.
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

Line 592: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

588: WHERE request_id = p_request_id
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

Line 596: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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
598: ('MANAGE_DELINQUENCIES: ' || 'Object >> ' || v_object || ' Score Id >> ' || v_score);
599: END IF;
600: -- IF PG_DEBUG < 10 THEN

Line 601: 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
602: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
603: END IF;
604: Exception
605: WHEN NO_DATA_FOUND then

Line 610: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

606: ERRBUF := ' No Data Found on IEX_DEL_BUFFERS Table for the Passed Request Id...> '
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:

Line 616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

612: END IF;
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

Line 620: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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
622: ('---------->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
623: END IF;
624: -- IF PG_DEBUG < 10 THEN

Line 625: 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
626: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
627: END IF;
628: return ;
629: End ;

Line 632: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

628: return ;
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

Line 652: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

648: from iex_del_statuses
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

Line 657: 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
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

Line 661: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
663: END IF;
664:
665: -- Everything works only when Score Range is Defined.

Line 724: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

720:
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

Line 728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
730: END IF;
731:
732: if v_debug_level <= 10 then

Line 736: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

732: if v_debug_level <= 10 then
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) ||

Line 746: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

742: END IF;
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:

Line 757: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

753: ERRBUF := ' FIRST SELECT - Error Code = ' || SQLCODE ||
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:

Line 763: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

759: END IF;
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:

Line 786: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

782: -- IEX_CONC_REQUEST_MSG_PKG.LOG_ERROR(p_request_id, 'MANAGE_DELINQUENCIES',ERRBUF);
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

Line 790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
792: END IF;
793: -- IF PG_DEBUG < 10 THEN
794: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 794: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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
796: ('--->> PROCEDURE MANAGE_DELINQUENCIES End (returned) <<--------');
797: END IF;
798: -- IF PG_DEBUG < 10 THEN

Line 799: 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
800: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
801: END IF;
802:
803: Commit;

Line 825: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

821: l_del_update_count := vt_del_id.count ;
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

Line 832: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

828: if v_debug_level <= 10 then
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;

Line 840: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

836: END IF;
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:

Line 852: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

848: ERRBUF := 'INVOICE - Matching Delinquencies Update --> Error Code '
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:

Line 858: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

854: END IF;
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: --

Line 877: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

873: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
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

Line 881: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
883: END IF;
884: -- IF PG_DEBUG < 10 THEN
885: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 885: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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) <<--------');
887: END IF;
888: -- IF PG_DEBUG < 10 THEN
889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
891: END IF;
892:
893: Commit;

Line 904: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

900: if v_debug_level < 11 then
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

Line 908: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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----');
910: END IF;
911:
912: LOOP

Line 923: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

919:
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 ;

Line 1011: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1007: l_del_insert_count := SQL%ROWCOUNT ;
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

Line 1015: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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
1017: ('MANAGE_DELINQUENCIES: ' || 'Number of Rows Inserted --> ' || to_char(SQL%ROWCOUNT));
1018: END IF;
1019: -- IF PG_DEBUG < 10 THEN

Line 1020: 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
1021: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1022: END IF;
1023: /* ================= Debug Message ==================== */
1024:

Line 1029: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1025: Exception
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 ;

Line 1036: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1032: RETCODE := -1 ;
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: --

Line 1053: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1049: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
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;

Line 1076: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1072: elsif v_object = 'IEX_CONTRACTS' then
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

Line 1092: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1088: AND ico.object_code = 'CONTRACTS'
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:

Line 1097: 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
1098: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || v_line);
1099: END IF;
1100:
1101: if v_debug_level < 11 then

Line 1105: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1101: if v_debug_level < 11 then
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) ||

Line 1115: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1111: END IF;
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

Line 1123: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1119: EXCEPTION
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:

Line 1130: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1126: RETCODE := -1 ;
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;

Line 1152: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1148:
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

Line 1159: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1155: if v_debug_level < 11 then
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 ;

Line 1166: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1162: END IF;
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

Line 1174: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1170: EXCEPTION
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;

Line 1180: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1176: END IF;
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;

Line 1195: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1191: ******************************************************************* */
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

Line 1239: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1235: AND idb.score_object_id = ic.cas_id
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;

Line 1245: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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:
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

Line 1253: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1249: if v_debug_level < 11 then
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) ||

Line 1263: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1259: END IF;
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:

Line 1272: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1268: EXCEPTION
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:

Line 1292: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1288: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
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

Line 1334: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1330: l_del_update_count := vt_del_id.count ;
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

Line 1341: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1337: if v_debug_level < 11 then
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;

Line 1349: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1345: END IF;
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:

Line 1359: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1355: WHEN OTHERS THEN
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;

Line 1366: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1362: RETCODE := -1;
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: --

Line 1468: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1464: l_del_insert_count := SQL%ROWCOUNT ;
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

Line 1472: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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));
1474: END IF;
1475: IF PG_DeBUG < 10 THEN
1476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
1478: END IF;
1479: END IF;
1480: -- ================= Debug Message ===========================

Line 1486: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1482: Exception
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 ;

Line 1493: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1489: RETCODE := -1 ;
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: --

Line 1510: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1506: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
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) ;

Line 1528: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1524:
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

Line 1532: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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));
1534: END IF;
1535:
1536: -- Filter out NOCOPY the delinquency ids that are not the Workflow Candidates.

Line 1544: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1540: LOOP
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) ;

Line 1558: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1554: End If ;
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

Line 1562: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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));
1564: END IF;
1565:
1566: -- Launch the Workflow and Close Promises only when required

Line 1572: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1568:
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

Line 1577: 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
1578: IEX_DEBUG_PUB.LOGMESSAGE('MANAGE_DELINQUENCIES: ' || '------------------------------------------------------------');
1579: END IF;
1580: /* ================= Debug Message =========================== */
1581:

Line 1594: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1590: x_msg_count => l_msg_count,
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

Line 1610: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1606: x_msg_data => l_msg_data ,
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 ;

Line 1617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1613:
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

Line 1629: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1625: --
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

Line 1636: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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
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

Line 1647: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1643: LOOP
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;

Line 1658: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1654: UPDATE AR_TRX_BAL_SUMMARY ARS
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;

Line 1664: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1660: END IF;
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:

Line 1669: 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
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;

Line 1678: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1674: LOOP
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;

Line 1689: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1685: UPDATE AR_TRX_BAL_SUMMARY ARS
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;

Line 1695: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1691: END IF;
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.

Line 1751: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1747: x_msg_count => l_msg_count,
1748: x_msg_data => l_msg_data );
1749:
1750:
1751: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1752: if l_return_Status = FND_API.G_RET_STS_SUCCESS THEN
1753: fnd_file.put_line(fnd_file.log,'Business Event raised Successfully');
1754: else
1755: fnd_file.put_line(fnd_file.log,'Business Event not raised ');

Line 1766: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1762: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Business Events Processing Disabled... ' ) ;
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'));

Line 1778: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1774: WHEN Others then
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:

Line 1784: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1780: END IF;
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: --

Line 1798: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1794: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
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;

Line 2005: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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
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;

Line 2012: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2008: RAISE FND_API.G_EXC_ERROR;
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;

Line 2020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2016: ROLLBACK TO IEX_IND_DEL;
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

Line 2069: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2065:
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

Line 2073: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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'));
2075: END IF;
2076: -- get the score id for the engine
2077: Select score_id into l_score_id

Line 2083: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2079: Where request_id = p_request_id and
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

Line 2087: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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);
2089: END IF;
2090:
2091: -- now get the data

Line 2105: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2101:
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

Line 2109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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));
2111: END IF;
2112: end loop;
2113:

Line 2115: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2111: END IF;
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

Line 2138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2134: FROM iex_del_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

Line 2152: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2148: -- End - 01/24/2005 - Andre Araujo - This procedure uses a memory schema uses up all memory available for the session, changing it to chunks
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

Line 2156: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) 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'));
2158: END IF;
2159: Exception
2160: When NO_DATA_FOUND then

Line 2162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2158: END IF;
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;

Line 2169: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2165: RETCODE := -1;
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;

Line 2219: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2215: SELECT PREFERENCE_VALUE FROM IEX_APP_PREFERENCES_VL WHERE PREFERENCE_NAME = 'COLLECTIONS STRATEGY LEVEL';
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

Line 2243: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2239: -- START OF BODY OF API
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

Line 2248: 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');
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);

Line 2260: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2256: end if;
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

Line 2265: 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');
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);

Line 2277: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2273: end if;
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

Line 2282: 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');
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);

Line 2298: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2294: l_days := to_number(nvl(fnd_profile.value('IEX_UWQ_DEFAULT_PENDING_DAYS'), '0'));
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

Line 2302: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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);
2304: END IF;
2305:
2306: -- check for status

Line 2320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2316: end if;
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;

Line 2476: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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
2477: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': nothing to update');
2478: END IF;
2479: end if;
2480:

Line 2535: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2531: SAVEPOINT close_dunn ;
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);

Line 2561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2557: WHEN OTHERS then
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 ;

Line 2568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2564: RETCODE := -1 ;
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);

Line 2610: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2606: WHEN OTHERS then
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 ;

Line 2617: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2613: RETCODE := -1 ;
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);

Line 2649: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2645: WHEN OTHERS then
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 ;

Line 2656: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2652: RETCODE := -1 ;
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);

Line 2703: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2699: WHEN OTHERS then
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 ;

Line 2710: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2706: RETCODE := -1 ;
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);

Line 2722: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2718:
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'));

Line 2733: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2729: Exception
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 ;

Line 2740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2736: RETCODE := -1 ;
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);

Line 2829: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

2825:
2826: G_USER_ID := FND_GLOBAL.User_Id;
2827: G_Batch_Size := to_number(nvl(fnd_profile.value('IEX_BATCH_SIZE'), '1000'));
2828: v_line := '--------------------------------------------------------------' ;
2829: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2830:
2831: END IEX_DELINQUENCY_PUB;