APPS.PA_SWEEPER dependencies on PA_DEBUG

Line 599: PA_DEBUG.init_err_stack('PA_SWEEPER.UPDATE_ACT_ENC_BALANCE');

595: END InitPlSqlTabs2;
596: BEGIN
597:
598: --Initialize the error stack
599: PA_DEBUG.init_err_stack('PA_SWEEPER.UPDATE_ACT_ENC_BALANCE');
600:
601: --Initialize the message table for FND_MSG_PUB
602: fnd_msg_pub.initialize;
603:

Line 604: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);

600:
601: --Initialize the message table for FND_MSG_PUB
602: fnd_msg_pub.initialize;
603:
604: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
605: l_debug_mode := NVL(l_debug_mode, 'N');
606:
607: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
608:

Line 607: pa_debug.set_process('PLSQL','LOG',l_debug_mode);

603:
604: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
605: l_debug_mode := NVL(l_debug_mode, 'N');
606:
607: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
608:
609: --Initialize the return status to success
610: x_return_status := FND_API.G_RET_STS_SUCCESS;
611:

Line 613: pa_debug.g_err_stage := 'Log: Start of Update_Act_Enc_Balance';

609: --Initialize the return status to success
610: x_return_status := FND_API.G_RET_STS_SUCCESS;
611:
612: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
613: pa_debug.g_err_stage := 'Log: Start of Update_Act_Enc_Balance';
614: pa_debug.write_file('LOG',pa_debug.g_err_stage);
615: END IF;
616:
617: pa_funds_control_utils.print_message('Entering Sweeper');

Line 614: pa_debug.write_file('LOG',pa_debug.g_err_stage);

610: x_return_status := FND_API.G_RET_STS_SUCCESS;
611:
612: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
613: pa_debug.g_err_stage := 'Log: Start of Update_Act_Enc_Balance';
614: pa_debug.write_file('LOG',pa_debug.g_err_stage);
615: END IF;
616:
617: pa_funds_control_utils.print_message('Entering Sweeper');
618: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */

Line 635: pa_debug.g_err_stage := 'Log: No. of records to delete ' || l_RowIdTab.count;

631: l_RowIdTab
632: limit rows;
633:
634: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
635: pa_debug.g_err_stage := 'Log: No. of records to delete ' || l_RowIdTab.count;
636: pa_debug.write_file('LOG',pa_debug.g_err_stage);
637: END IF;
638:
639: pa_funds_control_utils.print_message('No. of records to delete = ' || l_RowIdTab.count);

Line 636: pa_debug.write_file('LOG',pa_debug.g_err_stage);

632: limit rows;
633:
634: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
635: pa_debug.g_err_stage := 'Log: No. of records to delete ' || l_RowIdTab.count;
636: pa_debug.write_file('LOG',pa_debug.g_err_stage);
637: END IF;
638:
639: pa_funds_control_utils.print_message('No. of records to delete = ' || l_RowIdTab.count);
640:

Line 643: pa_debug.g_err_stage := 'Log: No records in c_delete_pkts, exit';

639: pa_funds_control_utils.print_message('No. of records to delete = ' || l_RowIdTab.count);
640:
641: if l_RowIdTab.count = 0 then
642: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
643: pa_debug.g_err_stage := 'Log: No records in c_delete_pkts, exit';
644: pa_debug.write_file('LOG',pa_debug.g_err_stage);
645: END IF;
646: pa_funds_control_utils.print_message('No records from c_delete_pkts, exit');
647: exit;

Line 644: pa_debug.write_file('LOG',pa_debug.g_err_stage);

640:
641: if l_RowIdTab.count = 0 then
642: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
643: pa_debug.g_err_stage := 'Log: No records in c_delete_pkts, exit';
644: pa_debug.write_file('LOG',pa_debug.g_err_stage);
645: END IF;
646: pa_funds_control_utils.print_message('No records from c_delete_pkts, exit');
647: exit;
648: end if;

Line 665: pa_debug.g_err_stage := 'Log: Last Deleted ' || to_char(l_rowcount) || ' records from PA_BC_PACKETS older than ' || l_profile_value || ' days';

661: pa_funds_control_utils.print_message('Close c_delete_pkts');
662:
663: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
664: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
665: pa_debug.g_err_stage := 'Log: Last Deleted ' || to_char(l_rowcount) || ' records from PA_BC_PACKETS older than ' || l_profile_value || ' days';
666: pa_debug.write_file('LOG',pa_debug.g_err_stage);
667: END IF;
668: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
669: pa_funds_control_utils.print_message('No of Deleted old packets in pa_bc_packets = ' || to_char(l_rowcount));

Line 666: pa_debug.write_file('LOG',pa_debug.g_err_stage);

662:
663: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
664: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
665: pa_debug.g_err_stage := 'Log: Last Deleted ' || to_char(l_rowcount) || ' records from PA_BC_PACKETS older than ' || l_profile_value || ' days';
666: pa_debug.write_file('LOG',pa_debug.g_err_stage);
667: END IF;
668: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
669: pa_funds_control_utils.print_message('No of Deleted old packets in pa_bc_packets = ' || to_char(l_rowcount));
670:

Line 685: pa_debug.g_err_stage := 'Log: Deleted ' || to_char(l_rowcount) || ' records from GL_BC_PACKETS older than ' || l_profile_value || ' days';

681: l_rowcount:=sql%rowcount;
682: /*Code Changes for Bug No.2984871 end */
683: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
684: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
685: pa_debug.g_err_stage := 'Log: Deleted ' || to_char(l_rowcount) || ' records from GL_BC_PACKETS older than ' || l_profile_value || ' days';
686: pa_debug.write_file('LOG',pa_debug.g_err_stage);
687: END IF;
688: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
689: pa_funds_control_utils.print_message('No of Deleted old packets in gl_bc_packets = '|| to_char(l_rowcount));

Line 686: pa_debug.write_file('LOG',pa_debug.g_err_stage);

682: /*Code Changes for Bug No.2984871 end */
683: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
684: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
685: pa_debug.g_err_stage := 'Log: Deleted ' || to_char(l_rowcount) || ' records from GL_BC_PACKETS older than ' || l_profile_value || ' days';
686: pa_debug.write_file('LOG',pa_debug.g_err_stage);
687: END IF;
688: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
689: pa_funds_control_utils.print_message('No of Deleted old packets in gl_bc_packets = '|| to_char(l_rowcount));
690:

Line 692: pa_debug.g_err_stage := 'Log: Entering Loop';

688: /* Bug 2984871: Replaced sql%rwocount with l_rowcount in the below statement */
689: pa_funds_control_utils.print_message('No of Deleted old packets in gl_bc_packets = '|| to_char(l_rowcount));
690:
691: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
692: pa_debug.g_err_stage := 'Log: Entering Loop';
693: pa_debug.write_file('LOG',pa_debug.g_err_stage);
694: END IF;
695:
696: --Loop for distinct project in pa_bc_packets

Line 693: pa_debug.write_file('LOG',pa_debug.g_err_stage);

689: pa_funds_control_utils.print_message('No of Deleted old packets in gl_bc_packets = '|| to_char(l_rowcount));
690:
691: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
692: pa_debug.g_err_stage := 'Log: Entering Loop';
693: pa_debug.write_file('LOG',pa_debug.g_err_stage);
694: END IF;
695:
696: --Loop for distinct project in pa_bc_packets
697: FOR eRec in c_pkt_proj LOOP

Line 704: pa_debug.g_err_stage := '*******************************************************';

700: pa_funds_control_utils.print_message('*******************************************************');
701: pa_funds_control_utils.print_message('Inside Project loop ' || to_char(l_project_id));
702:
703: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
704: pa_debug.g_err_stage := '*******************************************************';
705: pa_debug.write_file('LOG',pa_debug.g_err_stage);
706:
707: pa_debug.g_err_stage := 'Log: Inside Loop for Project = ' || to_char(l_project_id);
708: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 705: pa_debug.write_file('LOG',pa_debug.g_err_stage);

701: pa_funds_control_utils.print_message('Inside Project loop ' || to_char(l_project_id));
702:
703: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
704: pa_debug.g_err_stage := '*******************************************************';
705: pa_debug.write_file('LOG',pa_debug.g_err_stage);
706:
707: pa_debug.g_err_stage := 'Log: Inside Loop for Project = ' || to_char(l_project_id);
708: pa_debug.write_file('LOG',pa_debug.g_err_stage);
709: END IF;

Line 707: pa_debug.g_err_stage := 'Log: Inside Loop for Project = ' || to_char(l_project_id);

703: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
704: pa_debug.g_err_stage := '*******************************************************';
705: pa_debug.write_file('LOG',pa_debug.g_err_stage);
706:
707: pa_debug.g_err_stage := 'Log: Inside Loop for Project = ' || to_char(l_project_id);
708: pa_debug.write_file('LOG',pa_debug.g_err_stage);
709: END IF;
710:
711: --Acquire lock on project

Line 708: pa_debug.write_file('LOG',pa_debug.g_err_stage);

704: pa_debug.g_err_stage := '*******************************************************';
705: pa_debug.write_file('LOG',pa_debug.g_err_stage);
706:
707: pa_debug.g_err_stage := 'Log: Inside Loop for Project = ' || to_char(l_project_id);
708: pa_debug.write_file('LOG',pa_debug.g_err_stage);
709: END IF;
710:
711: --Acquire lock on project
712: IF (pa_debug.acquire_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN

Line 712: IF (pa_debug.acquire_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN

708: pa_debug.write_file('LOG',pa_debug.g_err_stage);
709: END IF;
710:
711: --Acquire lock on project
712: IF (pa_debug.acquire_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN
713:
714: pa_funds_control_utils.print_message('Acquired Lock on project '||to_char(l_project_id));
715:
716: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */

Line 717: pa_debug.g_err_stage := 'Log: Lock Acquired for Project = ' || to_char(l_project_id) ;

713:
714: pa_funds_control_utils.print_message('Acquired Lock on project '||to_char(l_project_id));
715:
716: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
717: pa_debug.g_err_stage := 'Log: Lock Acquired for Project = ' || to_char(l_project_id) ;
718: pa_debug.write_file('LOG',pa_debug.g_err_stage);
719: END IF;
720:
721: pa_funds_control_utils.print_message('Open cursor c_bc_packets');

Line 718: pa_debug.write_file('LOG',pa_debug.g_err_stage);

714: pa_funds_control_utils.print_message('Acquired Lock on project '||to_char(l_project_id));
715:
716: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
717: pa_debug.g_err_stage := 'Log: Lock Acquired for Project = ' || to_char(l_project_id) ;
718: pa_debug.write_file('LOG',pa_debug.g_err_stage);
719: END IF;
720:
721: pa_funds_control_utils.print_message('Open cursor c_bc_packets');
722: --Open c_bc_packets cursor

Line 738: pa_debug.g_err_stage := 'Log: Fetched ' || l_count || ' batch';

734: --Call procedure to initialize the tables
735: InitPlSqlTabs;
736:
737: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
738: pa_debug.g_err_stage := 'Log: Fetched ' || l_count || ' batch';
739: pa_debug.write_file('LOG',pa_debug.g_err_stage);
740: END IF;
741:
742: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);

Line 739: pa_debug.write_file('LOG',pa_debug.g_err_stage);

735: InitPlSqlTabs;
736:
737: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
738: pa_debug.g_err_stage := 'Log: Fetched ' || l_count || ' batch';
739: pa_debug.write_file('LOG',pa_debug.g_err_stage);
740: END IF;
741:
742: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);
743:

Line 745: pa_debug.g_err_stage := 'Log: Fetch cursor c_bc_packets';

741:
742: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);
743:
744: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
745: pa_debug.g_err_stage := 'Log: Fetch cursor c_bc_packets';
746: pa_debug.write_file('LOG',pa_debug.g_err_stage);
747: END IF;
748:
749:

Line 746: pa_debug.write_file('LOG',pa_debug.g_err_stage);

742: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);
743:
744: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
745: pa_debug.g_err_stage := 'Log: Fetch cursor c_bc_packets';
746: pa_debug.write_file('LOG',pa_debug.g_err_stage);
747: END IF;
748:
749:
750: pa_funds_control_utils.print_message('Fetch cursor c_bc_packets');

Line 819: pa_debug.g_err_stage := 'Log: No. of records fetched ' || l_PktIdTab.count;

815: ,l_PktDocDistTypeTab
816: LIMIT rows;
817:
818: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
819: pa_debug.g_err_stage := 'Log: No. of records fetched ' || l_PktIdTab.count;
820: pa_debug.write_file('LOG',pa_debug.g_err_stage);
821: END IF;
822:
823: pa_funds_control_utils.print_message('No. of records fetched = ' || l_PktIdTab.count);

Line 820: pa_debug.write_file('LOG',pa_debug.g_err_stage);

816: LIMIT rows;
817:
818: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
819: pa_debug.g_err_stage := 'Log: No. of records fetched ' || l_PktIdTab.count;
820: pa_debug.write_file('LOG',pa_debug.g_err_stage);
821: END IF;
822:
823: pa_funds_control_utils.print_message('No. of records fetched = ' || l_PktIdTab.count);
824:

Line 828: pa_debug.g_err_stage := 'Log: No records in c_bc_packets, exit';

824:
825: --If no rows fetched, exit
826: IF l_PktIdTab.count = 0 THEN
827: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
828: pa_debug.g_err_stage := 'Log: No records in c_bc_packets, exit';
829: pa_debug.write_file('LOG',pa_debug.g_err_stage);
830: END IF;
831: pa_funds_control_utils.print_message('No records from c_bc_packets, exit');
832: EXIT;

Line 829: pa_debug.write_file('LOG',pa_debug.g_err_stage);

825: --If no rows fetched, exit
826: IF l_PktIdTab.count = 0 THEN
827: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
828: pa_debug.g_err_stage := 'Log: No records in c_bc_packets, exit';
829: pa_debug.write_file('LOG',pa_debug.g_err_stage);
830: END IF;
831: pa_funds_control_utils.print_message('No records from c_bc_packets, exit');
832: EXIT;
833: END IF;

Line 838: pa_debug.g_err_stage := 'Log: Before update of balances';

834:
835: pa_funds_control_utils.print_message('In c_bc_packets loop');
836:
837: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
838: pa_debug.g_err_stage := 'Log: Before update of balances';
839: pa_debug.write_file('LOG',pa_debug.g_err_stage);
840: END IF;
841:
842: pa_funds_control_utils.print_message('Before update of balances');

Line 839: pa_debug.write_file('LOG',pa_debug.g_err_stage);

835: pa_funds_control_utils.print_message('In c_bc_packets loop');
836:
837: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
838: pa_debug.g_err_stage := 'Log: Before update of balances';
839: pa_debug.write_file('LOG',pa_debug.g_err_stage);
840: END IF;
841:
842: pa_funds_control_utils.print_message('Before update of balances');
843:

Line 876: pa_debug.g_err_stage := 'Log: Updating Balances , Index = '|| i || ' RowCount = ' || SQL%BULK_ROWCOUNT(i) ||' Pkt Id ' || l_PktBcPktTab(i);

872:
873: --Collect no of records updated and store the packet id in another table
874: for i in l_PktIdTab.FIRST..l_PktIdTab.LAST loop
875: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
876: pa_debug.g_err_stage := 'Log: Updating Balances , Index = '|| i || ' RowCount = ' || SQL%BULK_ROWCOUNT(i) ||' Pkt Id ' || l_PktBcPktTab(i);
877: pa_debug.write_file('LOG',pa_debug.g_err_stage);
878: END IF;
879: pa_funds_control_utils.print_message('Updating Balances ' || SQL%BULK_ROWCOUNT(i) ||' Pkt Id ' || l_PktBcPktTab(i));
880:

Line 877: pa_debug.write_file('LOG',pa_debug.g_err_stage);

873: --Collect no of records updated and store the packet id in another table
874: for i in l_PktIdTab.FIRST..l_PktIdTab.LAST loop
875: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
876: pa_debug.g_err_stage := 'Log: Updating Balances , Index = '|| i || ' RowCount = ' || SQL%BULK_ROWCOUNT(i) ||' Pkt Id ' || l_PktBcPktTab(i);
877: pa_debug.write_file('LOG',pa_debug.g_err_stage);
878: END IF;
879: pa_funds_control_utils.print_message('Updating Balances ' || SQL%BULK_ROWCOUNT(i) ||' Pkt Id ' || l_PktBcPktTab(i));
880:
881: --If no. of rec updated not = 0 then place packet id in another table.

Line 888: pa_debug.g_err_stage := 'Log: Num = ' || num || ' Status Pkt Id = ' || l_StsUpdPktIdTab(num) || ' Bc Pkt = ' || l_StsUpdBcPktIdTab(num);

884: num := num + 1;
885: l_StsUpdPktIdTab(num) := l_PktIdTab(i);
886: l_StsUpdBcPktIdTab(num) := l_PktBcPktTab(i);
887: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
888: pa_debug.g_err_stage := 'Log: Num = ' || num || ' Status Pkt Id = ' || l_StsUpdPktIdTab(num) || ' Bc Pkt = ' || l_StsUpdBcPktIdTab(num);
889: pa_debug.write_file('LOG',pa_debug.g_err_stage);
890: END IF;
891: pa_funds_control_utils.print_message('Status Packet Id = ' || l_StsUpdPktIdTab(num)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(num));
892: end if;

Line 889: pa_debug.write_file('LOG',pa_debug.g_err_stage);

885: l_StsUpdPktIdTab(num) := l_PktIdTab(i);
886: l_StsUpdBcPktIdTab(num) := l_PktBcPktTab(i);
887: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
888: pa_debug.g_err_stage := 'Log: Num = ' || num || ' Status Pkt Id = ' || l_StsUpdPktIdTab(num) || ' Bc Pkt = ' || l_StsUpdBcPktIdTab(num);
889: pa_debug.write_file('LOG',pa_debug.g_err_stage);
890: END IF;
891: pa_funds_control_utils.print_message('Status Packet Id = ' || l_StsUpdPktIdTab(num)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(num));
892: end if;
893: end loop;

Line 896: pa_debug.g_err_stage := 'Log: Updated Records = ' || l_StsUpdPktIdTab.count;

892: end if;
893: end loop;
894:
895: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
896: pa_debug.g_err_stage := 'Log: Updated Records = ' || l_StsUpdPktIdTab.count;
897: pa_debug.write_file('LOG',pa_debug.g_err_stage);
898: END IF;
899:
900: --The below loop is only for debugging. Can be removed, if log file is huge.

Line 897: pa_debug.write_file('LOG',pa_debug.g_err_stage);

893: end loop;
894:
895: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
896: pa_debug.g_err_stage := 'Log: Updated Records = ' || l_StsUpdPktIdTab.count;
897: pa_debug.write_file('LOG',pa_debug.g_err_stage);
898: END IF;
899:
900: --The below loop is only for debugging. Can be removed, if log file is huge.
901: if l_StsUpdPktIdTab.count<>0 then

Line 904: pa_debug.g_err_stage := 'Log: No of Status updates = ' || l_StsUpdPktIdTab(i)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(i);

900: --The below loop is only for debugging. Can be removed, if log file is huge.
901: if l_StsUpdPktIdTab.count<>0 then
902: for i in l_StsUpdPktIdTab.FIRST..l_StsUpdPktIdTab.LAST loop
903: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
904: pa_debug.g_err_stage := 'Log: No of Status updates = ' || l_StsUpdPktIdTab(i)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(i);
905: pa_debug.write_file('LOG',pa_debug.g_err_stage);
906: END IF;
907: pa_funds_control_utils.print_message('No of Status updates = ' || l_StsUpdPktIdTab(i)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(i));
908: end loop;

Line 905: pa_debug.write_file('LOG',pa_debug.g_err_stage);

901: if l_StsUpdPktIdTab.count<>0 then
902: for i in l_StsUpdPktIdTab.FIRST..l_StsUpdPktIdTab.LAST loop
903: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
904: pa_debug.g_err_stage := 'Log: No of Status updates = ' || l_StsUpdPktIdTab(i)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(i);
905: pa_debug.write_file('LOG',pa_debug.g_err_stage);
906: END IF;
907: pa_funds_control_utils.print_message('No of Status updates = ' || l_StsUpdPktIdTab(i)|| ' Bc Pkt = ' || l_StsUpdBcPktIdTab(i));
908: end loop;
909: end if;

Line 912: pa_debug.g_err_stage := 'Log: After Update of balances';

908: end loop;
909: end if;
910:
911: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
912: pa_debug.g_err_stage := 'Log: After Update of balances';
913: pa_debug.write_file('LOG',pa_debug.g_err_stage);
914:
915: pa_debug.g_err_stage := 'Log: Before Insert into commitments';
916: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 913: pa_debug.write_file('LOG',pa_debug.g_err_stage);

909: end if;
910:
911: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
912: pa_debug.g_err_stage := 'Log: After Update of balances';
913: pa_debug.write_file('LOG',pa_debug.g_err_stage);
914:
915: pa_debug.g_err_stage := 'Log: Before Insert into commitments';
916: pa_debug.write_file('LOG',pa_debug.g_err_stage);
917: END IF;

Line 915: pa_debug.g_err_stage := 'Log: Before Insert into commitments';

911: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
912: pa_debug.g_err_stage := 'Log: After Update of balances';
913: pa_debug.write_file('LOG',pa_debug.g_err_stage);
914:
915: pa_debug.g_err_stage := 'Log: Before Insert into commitments';
916: pa_debug.write_file('LOG',pa_debug.g_err_stage);
917: END IF;
918:
919: pa_funds_control_utils.print_message('Inserting Commitments');

Line 916: pa_debug.write_file('LOG',pa_debug.g_err_stage);

912: pa_debug.g_err_stage := 'Log: After Update of balances';
913: pa_debug.write_file('LOG',pa_debug.g_err_stage);
914:
915: pa_debug.g_err_stage := 'Log: Before Insert into commitments';
916: pa_debug.write_file('LOG',pa_debug.g_err_stage);
917: END IF;
918:
919: pa_funds_control_utils.print_message('Inserting Commitments');
920:

Line 1081: pa_debug.g_err_stage := 'Log: No of commitment inserts = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);

1077:
1078: --The below loop is only for debugging. Can be removed, if log file is huge.
1079: for i in l_PktIdTab.first..l_PktIdTab.last loop
1080: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1081: pa_debug.g_err_stage := 'Log: No of commitment inserts = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);
1082: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1083: END IF;
1084: pa_funds_control_utils.print_message('No. of commitment insert = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1085: end loop;

Line 1082: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1078: --The below loop is only for debugging. Can be removed, if log file is huge.
1079: for i in l_PktIdTab.first..l_PktIdTab.last loop
1080: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1081: pa_debug.g_err_stage := 'Log: No of commitment inserts = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);
1082: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1083: END IF;
1084: pa_funds_control_utils.print_message('No. of commitment insert = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1085: end loop;
1086:

Line 1088: pa_debug.g_err_stage := 'Log: After Insert into commitments';

1084: pa_funds_control_utils.print_message('No. of commitment insert = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1085: end loop;
1086:
1087: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1088: pa_debug.g_err_stage := 'Log: After Insert into commitments';
1089: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1090:
1091: pa_debug.g_err_stage := 'Log: Before Update of commitments';
1092: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 1089: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1085: end loop;
1086:
1087: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1088: pa_debug.g_err_stage := 'Log: After Insert into commitments';
1089: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1090:
1091: pa_debug.g_err_stage := 'Log: Before Update of commitments';
1092: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1093: END IF;

Line 1091: pa_debug.g_err_stage := 'Log: Before Update of commitments';

1087: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1088: pa_debug.g_err_stage := 'Log: After Insert into commitments';
1089: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1090:
1091: pa_debug.g_err_stage := 'Log: Before Update of commitments';
1092: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1093: END IF;
1094:
1095: pa_funds_control_utils.print_message('Before update of pa_bc_commitments_all');

Line 1092: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1088: pa_debug.g_err_stage := 'Log: After Insert into commitments';
1089: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1090:
1091: pa_debug.g_err_stage := 'Log: Before Update of commitments';
1092: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1093: END IF;
1094:
1095: pa_funds_control_utils.print_message('Before update of pa_bc_commitments_all');
1096:

Line 1162: pa_debug.g_err_stage := 'Log: No of commitment updates = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);

1158:
1159: --The below loop is only for debugging. Can be removed, if log file is huge.
1160: for i in l_PktIdTab.first..l_PktIdTab.last loop
1161: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1162: pa_debug.g_err_stage := 'Log: No of commitment updates = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);
1163: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1164: END IF;
1165: pa_funds_control_utils.print_message('No. of commitment updates = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1166: end loop;

Line 1163: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1159: --The below loop is only for debugging. Can be removed, if log file is huge.
1160: for i in l_PktIdTab.first..l_PktIdTab.last loop
1161: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1162: pa_debug.g_err_stage := 'Log: No of commitment updates = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);
1163: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1164: END IF;
1165: pa_funds_control_utils.print_message('No. of commitment updates = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1166: end loop;
1167:

Line 1169: pa_debug.g_err_stage := 'Log: After Update of commitments';

1165: pa_funds_control_utils.print_message('No. of commitment updates = ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1166: end loop;
1167:
1168: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1169: pa_debug.g_err_stage := 'Log: After Update of commitments';
1170: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1171:
1172: pa_debug.g_err_stage := 'Log: Before update status_code, balance_posted_flag in c_bc_packets loop '||l_StsUpdPktIdTab.count;
1173: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 1170: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1166: end loop;
1167:
1168: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1169: pa_debug.g_err_stage := 'Log: After Update of commitments';
1170: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1171:
1172: pa_debug.g_err_stage := 'Log: Before update status_code, balance_posted_flag in c_bc_packets loop '||l_StsUpdPktIdTab.count;
1173: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1174: END IF;

Line 1172: pa_debug.g_err_stage := 'Log: Before update status_code, balance_posted_flag in c_bc_packets loop '||l_StsUpdPktIdTab.count;

1168: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1169: pa_debug.g_err_stage := 'Log: After Update of commitments';
1170: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1171:
1172: pa_debug.g_err_stage := 'Log: Before update status_code, balance_posted_flag in c_bc_packets loop '||l_StsUpdPktIdTab.count;
1173: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1174: END IF;
1175:
1176: pa_funds_control_utils.print_message('Before update of status_code');

Line 1173: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1169: pa_debug.g_err_stage := 'Log: After Update of commitments';
1170: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1171:
1172: pa_debug.g_err_stage := 'Log: Before update status_code, balance_posted_flag in c_bc_packets loop '||l_StsUpdPktIdTab.count;
1173: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1174: END IF;
1175:
1176: pa_funds_control_utils.print_message('Before update of status_code');
1177: pa_funds_control_utils.print_message('No. of status updates in c_bc_packets= '||l_StsUpdPktIdTab.count);

Line 1182: pa_debug.write_file('LOG', 'Pkt FIRST = ' || l_StsUpdPktIdTab.FIRST || ' LAST = '|| l_StsUpdPktIdTab.LAST );

1178:
1179: --Update status_code and balance_posted_flag
1180: IF (l_StsUpdPktIdTab.count <> 0) THEN
1181: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1182: pa_debug.write_file('LOG', 'Pkt FIRST = ' || l_StsUpdPktIdTab.FIRST || ' LAST = '|| l_StsUpdPktIdTab.LAST );
1183: pa_debug.write_file('LOG', 'Bc Pkt FIRST = ' || l_StsUpdBcPktIdTab.FIRST || ' LAST = '|| l_StsUpdBcPktIdTab.LAST );
1184: END IF;
1185: FORALL m in l_StsUpdPktIdTab.FIRST..l_StsUpdPktIdTab.LAST
1186: UPDATE pa_bc_packets pbc

Line 1183: pa_debug.write_file('LOG', 'Bc Pkt FIRST = ' || l_StsUpdBcPktIdTab.FIRST || ' LAST = '|| l_StsUpdBcPktIdTab.LAST );

1179: --Update status_code and balance_posted_flag
1180: IF (l_StsUpdPktIdTab.count <> 0) THEN
1181: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1182: pa_debug.write_file('LOG', 'Pkt FIRST = ' || l_StsUpdPktIdTab.FIRST || ' LAST = '|| l_StsUpdPktIdTab.LAST );
1183: pa_debug.write_file('LOG', 'Bc Pkt FIRST = ' || l_StsUpdBcPktIdTab.FIRST || ' LAST = '|| l_StsUpdBcPktIdTab.LAST );
1184: END IF;
1185: FORALL m in l_StsUpdPktIdTab.FIRST..l_StsUpdPktIdTab.LAST
1186: UPDATE pa_bc_packets pbc
1187: SET pbc.status_code = 'X',

Line 1204: pa_debug.g_err_stage := 'Log: No of status update ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);

1200: --The below loop is for debugging, can be removed if log file is huge
1201: if (l_StsUpdPktIdTab.count <> 0) then
1202: for i in l_StsUpdPktIdTab.FIRST..l_StsUpdPktIdTab.LAST loop
1203: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1204: pa_debug.g_err_stage := 'Log: No of status update ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);
1205: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1206: END IF;
1207: pa_funds_control_utils.print_message('No of status update ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1208: end loop;

Line 1205: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1201: if (l_StsUpdPktIdTab.count <> 0) then
1202: for i in l_StsUpdPktIdTab.FIRST..l_StsUpdPktIdTab.LAST loop
1203: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1204: pa_debug.g_err_stage := 'Log: No of status update ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i);
1205: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1206: END IF;
1207: pa_funds_control_utils.print_message('No of status update ' || SQL%BULK_ROWCOUNT(i)||' Pkt Id ' || l_PktBcPktTab(i));
1208: end loop;
1209: end if;

Line 1212: pa_debug.g_err_stage := 'Log: After Update of status_code and balance_posted_flag in c_bc_packets loop';

1208: end loop;
1209: end if;
1210:
1211: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1212: pa_debug.g_err_stage := 'Log: After Update of status_code and balance_posted_flag in c_bc_packets loop';
1213: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1214: END IF;
1215:
1216: --Commit in a batch i.e. 200 rows

Line 1213: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1209: end if;
1210:
1211: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1212: pa_debug.g_err_stage := 'Log: After Update of status_code and balance_posted_flag in c_bc_packets loop';
1213: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1214: END IF;
1215:
1216: --Commit in a batch i.e. 200 rows
1217: commit;

Line 1227: pa_debug.g_err_stage := 'Log: Open cursor c_ins_packets';

1223: pa_funds_control_utils.print_message('Close c_bc_packets');
1224:
1225: CLOSE c_bc_packets;
1226: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1227: pa_debug.g_err_stage := 'Log: Open cursor c_ins_packets';
1228: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1229: END IF;
1230:
1231: pa_funds_control_utils.print_message('Open cursor c_ins_packets');

Line 1228: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1224:
1225: CLOSE c_bc_packets;
1226: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1227: pa_debug.g_err_stage := 'Log: Open cursor c_ins_packets';
1228: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1229: END IF;
1230:
1231: pa_funds_control_utils.print_message('Open cursor c_ins_packets');
1232:

Line 1245: pa_debug.g_err_stage := 'Log: Fetched ' || l_count || ' batch';

1241:
1242: l_count := l_count+1;
1243:
1244: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1245: pa_debug.g_err_stage := 'Log: Fetched ' || l_count || ' batch';
1246: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1247: END IF;
1248:
1249: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);

Line 1246: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1242: l_count := l_count+1;
1243:
1244: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1245: pa_debug.g_err_stage := 'Log: Fetched ' || l_count || ' batch';
1246: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1247: END IF;
1248:
1249: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);
1250:

Line 1252: pa_debug.g_err_stage := 'Log: Fetch cursor c_ins_packets';

1248:
1249: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);
1250:
1251: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1252: pa_debug.g_err_stage := 'Log: Fetch cursor c_ins_packets';
1253: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1254: END IF;
1255:
1256: pa_funds_control_utils.print_message('Fetch cursor c_ins_packets');

Line 1253: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1249: pa_funds_control_utils.print_message('No of cursor batch fetched = ' || l_count);
1250:
1251: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1252: pa_debug.g_err_stage := 'Log: Fetch cursor c_ins_packets';
1253: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1254: END IF;
1255:
1256: pa_funds_control_utils.print_message('Fetch cursor c_ins_packets');
1257:

Line 1281: pa_debug.g_err_stage := 'Log: No. of records fetched = '||l_InsProjectTab.count;

1277: /*,l_InsOrgIdTab*/
1278: LIMIT rows;
1279:
1280: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1281: pa_debug.g_err_stage := 'Log: No. of records fetched = '||l_InsProjectTab.count;
1282: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1283: END IF;
1284:
1285: pa_funds_control_utils.print_message('No. of records fetched = ' || l_InsProjectTab.count);

Line 1282: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1278: LIMIT rows;
1279:
1280: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1281: pa_debug.g_err_stage := 'Log: No. of records fetched = '||l_InsProjectTab.count;
1282: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1283: END IF;
1284:
1285: pa_funds_control_utils.print_message('No. of records fetched = ' || l_InsProjectTab.count);
1286:

Line 1290: pa_debug.g_err_stage := 'Log: No records from cursor c_ins_packets, exit';

1286:
1287: --If no. of records fetched = 0 then exit
1288: IF l_InsProjectTab.count = 0 THEN
1289: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1290: pa_debug.g_err_stage := 'Log: No records from cursor c_ins_packets, exit';
1291: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1292: END IF;
1293: pa_funds_control_utils.print_message('No records from cursor c_ins_packets, exit');
1294: EXIT;

Line 1291: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1287: --If no. of records fetched = 0 then exit
1288: IF l_InsProjectTab.count = 0 THEN
1289: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1290: pa_debug.g_err_stage := 'Log: No records from cursor c_ins_packets, exit';
1291: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1292: END IF;
1293: pa_funds_control_utils.print_message('No records from cursor c_ins_packets, exit');
1294: EXIT;
1295: END IF;

Line 1298: pa_debug.g_err_stage := 'Log: Before inserting balances';

1294: EXIT;
1295: END IF;
1296:
1297: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1298: pa_debug.g_err_stage := 'Log: Before inserting balances';
1299: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1300: END IF;
1301:
1302: pa_funds_control_utils.print_message('Before inserting into pa_bc_balances');

Line 1299: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1295: END IF;
1296:
1297: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1298: pa_debug.g_err_stage := 'Log: Before inserting balances';
1299: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1300: END IF;
1301:
1302: pa_funds_control_utils.print_message('Before inserting into pa_bc_balances');
1303:

Line 1358: pa_debug.g_err_stage := 'Log: After inserting balances';

1354: sysdate
1355: from dual where l_InsDocTypTab(p) in ('EXP', 'AP','PO','REQ','CC_C_CO','CC_P_CO','CC_C_PAY','CC_P_PAY');
1356:
1357: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1358: pa_debug.g_err_stage := 'Log: After inserting balances';
1359: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1360:
1361: pa_debug.g_err_stage := 'Log: Before update status_code and balance_posted_flag in c_ins_packets';
1362: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 1359: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1355: from dual where l_InsDocTypTab(p) in ('EXP', 'AP','PO','REQ','CC_C_CO','CC_P_CO','CC_C_PAY','CC_P_PAY');
1356:
1357: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1358: pa_debug.g_err_stage := 'Log: After inserting balances';
1359: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1360:
1361: pa_debug.g_err_stage := 'Log: Before update status_code and balance_posted_flag in c_ins_packets';
1362: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1363: END IF;

Line 1361: pa_debug.g_err_stage := 'Log: Before update status_code and balance_posted_flag in c_ins_packets';

1357: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1358: pa_debug.g_err_stage := 'Log: After inserting balances';
1359: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1360:
1361: pa_debug.g_err_stage := 'Log: Before update status_code and balance_posted_flag in c_ins_packets';
1362: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1363: END IF;
1364:
1365: pa_funds_control_utils.print_message('Update status_code and balance_posted_flag');

Line 1362: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1358: pa_debug.g_err_stage := 'Log: After inserting balances';
1359: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1360:
1361: pa_debug.g_err_stage := 'Log: Before update status_code and balance_posted_flag in c_ins_packets';
1362: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1363: END IF;
1364:
1365: pa_funds_control_utils.print_message('Update status_code and balance_posted_flag');
1366:

Line 1385: pa_debug.g_err_stage := 'Log: No. of status update in c_ins_packets = ' || SQL%BULK_ROWCOUNT(i);

1381:
1382: --Below loop for debugging, can be removed if log file is huge
1383: for i in l_InsProjectTab.first..l_InsProjectTab.last loop
1384: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1385: pa_debug.g_err_stage := 'Log: No. of status update in c_ins_packets = ' || SQL%BULK_ROWCOUNT(i);
1386: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1387: END IF;
1388: pa_funds_control_utils.print_message('No. of status update in c_ins_packets = ' || SQL%BULK_ROWCOUNT(i));
1389: end loop;

Line 1386: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1382: --Below loop for debugging, can be removed if log file is huge
1383: for i in l_InsProjectTab.first..l_InsProjectTab.last loop
1384: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1385: pa_debug.g_err_stage := 'Log: No. of status update in c_ins_packets = ' || SQL%BULK_ROWCOUNT(i);
1386: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1387: END IF;
1388: pa_funds_control_utils.print_message('No. of status update in c_ins_packets = ' || SQL%BULK_ROWCOUNT(i));
1389: end loop;
1390:

Line 1392: pa_debug.g_err_stage := 'Log: After Update of status_code and balance_posted_flag in c_ins_packets loop';

1388: pa_funds_control_utils.print_message('No. of status update in c_ins_packets = ' || SQL%BULK_ROWCOUNT(i));
1389: end loop;
1390:
1391: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1392: pa_debug.g_err_stage := 'Log: After Update of status_code and balance_posted_flag in c_ins_packets loop';
1393: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1394: END IF;
1395:
1396: --Commit in a batch, i.e. 200 rows

Line 1393: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1389: end loop;
1390:
1391: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1392: pa_debug.g_err_stage := 'Log: After Update of status_code and balance_posted_flag in c_ins_packets loop';
1393: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1394: END IF;
1395:
1396: --Commit in a batch, i.e. 200 rows
1397: commit;

Line 1406: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN

1402: --Close c_ins_packets cursor
1403: CLOSE c_ins_packets;
1404:
1405: --Release lock on project
1406: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN
1407: pa_funds_control_utils.print_message('Releasing lock for '|| l_project_id);
1408: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1409: pa_debug.g_err_stage := 'Log: Finished processing, release lock on Project = ' || to_char(l_project_id);
1410: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 1409: pa_debug.g_err_stage := 'Log: Finished processing, release lock on Project = ' || to_char(l_project_id);

1405: --Release lock on project
1406: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN
1407: pa_funds_control_utils.print_message('Releasing lock for '|| l_project_id);
1408: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1409: pa_debug.g_err_stage := 'Log: Finished processing, release lock on Project = ' || to_char(l_project_id);
1410: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1411: END IF;
1412: null;
1413: END IF;

Line 1410: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1406: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN
1407: pa_funds_control_utils.print_message('Releasing lock for '|| l_project_id);
1408: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1409: pa_debug.g_err_stage := 'Log: Finished processing, release lock on Project = ' || to_char(l_project_id);
1410: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1411: END IF;
1412: null;
1413: END IF;
1414:

Line 1418: pa_debug.g_err_stage := 'Log: Could not acquire lock for Project = '||to_char(l_project_id);

1414:
1415: ELSE
1416: --Unable to acquire user lock
1417: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1418: pa_debug.g_err_stage := 'Log: Could not acquire lock for Project = '||to_char(l_project_id);
1419: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1420: END IF;
1421: END IF;
1422:

Line 1419: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1415: ELSE
1416: --Unable to acquire user lock
1417: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1418: pa_debug.g_err_stage := 'Log: Could not acquire lock for Project = '||to_char(l_project_id);
1419: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1420: END IF;
1421: END IF;
1422:
1423: END LOOP;

Line 1426: pa_debug.g_err_stage := '*******************************************************';

1422:
1423: END LOOP;
1424:
1425: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1426: pa_debug.g_err_stage := '*******************************************************';
1427: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1428:
1429: pa_debug.g_err_stage := 'Log: End of Update_Act_Enc_Balance';
1430: pa_debug.write_file('LOG',pa_debug.g_err_stage);

Line 1427: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1423: END LOOP;
1424:
1425: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1426: pa_debug.g_err_stage := '*******************************************************';
1427: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1428:
1429: pa_debug.g_err_stage := 'Log: End of Update_Act_Enc_Balance';
1430: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1431: END IF;

Line 1429: pa_debug.g_err_stage := 'Log: End of Update_Act_Enc_Balance';

1425: IF l_debug_mode = 'Y' THEN /* added for bug#2672653 */
1426: pa_debug.g_err_stage := '*******************************************************';
1427: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1428:
1429: pa_debug.g_err_stage := 'Log: End of Update_Act_Enc_Balance';
1430: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1431: END IF;
1432:
1433: pa_fck_util.debug_msg('PB:Exiting Sweeper');

Line 1430: pa_debug.write_file('LOG',pa_debug.g_err_stage);

1426: pa_debug.g_err_stage := '*******************************************************';
1427: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1428:
1429: pa_debug.g_err_stage := 'Log: End of Update_Act_Enc_Balance';
1430: pa_debug.write_file('LOG',pa_debug.g_err_stage);
1431: END IF;
1432:
1433: pa_fck_util.debug_msg('PB:Exiting Sweeper');
1434:

Line 1436: PA_DEBUG.Reset_Err_Stack;

1432:
1433: pa_fck_util.debug_msg('PB:Exiting Sweeper');
1434:
1435: --Reset the error stack when returning to the calling program
1436: PA_DEBUG.Reset_Err_Stack;
1437:
1438: EXCEPTION
1439: WHEN OTHERS THEN
1440: --Since release_user_lock always issues a commit, do a

Line 1447: ,p_procedure_name => PA_DEBUG.G_Err_Stack );

1443:
1444: x_return_status := fnd_api.g_ret_sts_unexp_error;
1445:
1446: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_SWEEPER'
1447: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
1448:
1449: x_error_message_code := (SQLCODE||' '||SQLERRM);
1450:
1451: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN

Line 1451: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN

1447: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
1448:
1449: x_error_message_code := (SQLCODE||' '||SQLERRM);
1450:
1451: IF (pa_debug.release_user_lock('SWEEPLOCK:'||to_char(l_project_id)) = 0) THEN
1452: pa_funds_control_utils.print_message('In others Releasing lock for proj '|| l_project_id);
1453: null;
1454: END IF;
1455: