DBA Data[Home] [Help]

APPS.IEX_AGING_BUCKETS_PKG dependencies on FND_LOG

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

496: --
497: -- Get the aging buckets definition.
498: --
499: -- IF PG_DEBUG < 10 THEN
500: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
501: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
502: END IF;
503: -- IF PG_DEBUG < 10 THEN
504: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

500: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
501: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
502: END IF;
503: -- IF PG_DEBUG < 10 THEN
504: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
505: IEX_DEBUG_PUB.LogMessage
506: ('IEX_AGING_BUCKETS_PKG. CALC_AGING_BUCKETS --->> Start <<--- ');
507: END IF;
508: -- IF PG_DEBUG < 10 THEN

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

505: IEX_DEBUG_PUB.LogMessage
506: ('IEX_AGING_BUCKETS_PKG. CALC_AGING_BUCKETS --->> Start <<--- ');
507: END IF;
508: -- IF PG_DEBUG < 10 THEN
509: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
510: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
511: END IF;
512:
513: OPEN c_sel_bucket_data;

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

519: v_bucket_line_type_0,
520: p_bucket_line_id_0,
521: p_bucket_seq_num_0 ;
522: -- IF PG_DEBUG < 10 THEN
523: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
524: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 0 [' || to_char(p_bucket_line_id_0)
525: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_0));
526: END IF;
527:

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

539: p_bucket_line_id_1,
540: p_bucket_seq_num_1 ;
541:
542: -- IF PG_DEBUG < 10 THEN
543: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
544: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 1 [' || to_char(p_bucket_line_id_1)
545: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_1));
546: END IF;
547:

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

562: v_bucket_line_type_2,
563: p_bucket_line_id_2,
564: p_bucket_seq_num_2 ;
565: -- IF PG_DEBUG < 10 THEN
566: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
567: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 2 [' || to_char(p_bucket_line_id_2)
568: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_2));
569: END IF;
570:

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

585: v_bucket_line_type_3,
586: p_bucket_line_id_3,
587: p_bucket_seq_num_3 ;
588: -- IF PG_DEBUG < 10 THEN
589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
590: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 3 [' || to_char(p_bucket_line_id_3)
591: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_3));
592: END IF;
593:

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

608: v_bucket_line_type_4,
609: p_bucket_line_id_4,
610: p_bucket_seq_num_4 ;
611: -- IF PG_DEBUG < 10 THEN
612: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
613: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 4 [' || to_char(p_bucket_line_id_4)
614: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_4));
615: END IF;
616:

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

631: v_bucket_line_type_5,
632: p_bucket_line_id_5,
633: p_bucket_seq_num_5 ;
634: -- IF PG_DEBUG < 10 THEN
635: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
636: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 5 [' || to_char(p_bucket_line_id_5)
637: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_5));
638: END IF;
639:

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

654: v_bucket_line_type_6,
655: p_bucket_line_id_6,
656: p_bucket_seq_num_6 ;
657: -- IF PG_DEBUG < 10 THEN
658: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
659: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' Bucket Line Id 6 [' || to_char(p_bucket_line_id_6)
660: || '] Bucket Seq Num [' || to_char(p_bucket_seq_num_6));
661: END IF;
662:

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

736: END LOOP;
737: CLOSE c_buckets;
738:
739: -- IF PG_DEBUG < 10 THEN
740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
741: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
742: END IF;
743: -- IF PG_DEBUG < 10 THEN
744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
741: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
742: END IF;
743: -- IF PG_DEBUG < 10 THEN
744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
745: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 0 - id [' || to_char(p_bucket_line_id_0)
746: || '] Seq [' || to_char(p_bucket_seq_num_0) || ' Desc [' ||
747: p_bucket_titletop_0 || ' ' || p_bucket_titlebottom_0 || '] Amt [' ||
748: to_char(p_bucket_amount_0));

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

747: p_bucket_titletop_0 || ' ' || p_bucket_titlebottom_0 || '] Amt [' ||
748: to_char(p_bucket_amount_0));
749: END IF;
750: -- IF PG_DEBUG < 10 THEN
751: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
752: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
753: END IF;
754:
755: -- IF PG_DEBUG < 10 THEN

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

752: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
753: END IF;
754:
755: -- IF PG_DEBUG < 10 THEN
756: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
757: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 1 - id [' || to_char(p_bucket_line_id_1)
758: || '] Seq [' || to_char(p_bucket_seq_num_1) || ' Desc [' ||
759: p_bucket_titletop_1 || ' ' || p_bucket_titlebottom_1 || '] Amt [' ||
760: to_char(p_bucket_amount_1));

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

761: END IF;
762:
763:
764: -- IF PG_DEBUG < 10 THEN
765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
766: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
767: END IF;
768: -- IF PG_DEBUG < 10 THEN
769: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
766: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
767: END IF;
768: -- IF PG_DEBUG < 10 THEN
769: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
770: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 2 - id [' || to_char(p_bucket_line_id_2)
771: || '] Seq [' || to_char(p_bucket_seq_num_2) || ' Desc [' ||
772: p_bucket_titletop_2 || ' ' || p_bucket_titlebottom_2 || '] Amt [' ||
773: to_char(p_bucket_amount_2));

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

772: p_bucket_titletop_2 || ' ' || p_bucket_titlebottom_2 || '] Amt [' ||
773: to_char(p_bucket_amount_2));
774: END IF;
775: -- IF PG_DEBUG < 10 THEN
776: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
777: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
778: END IF;
779:
780: -- IF PG_DEBUG < 10 THEN

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

777: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
778: END IF;
779:
780: -- IF PG_DEBUG < 10 THEN
781: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
782: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 3 - id [' || to_char(p_bucket_line_id_3)
783: || '] Seq [' || to_char(p_bucket_seq_num_3) || ' Desc [' ||
784: p_bucket_titletop_3 || ' ' || p_bucket_titlebottom_3 || '] Amt [' ||
785: to_char(p_bucket_amount_3));

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

784: p_bucket_titletop_3 || ' ' || p_bucket_titlebottom_3 || '] Amt [' ||
785: to_char(p_bucket_amount_3));
786: END IF;
787: -- IF PG_DEBUG < 10 THEN
788: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
789: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
790: END IF;
791:
792: -- IF PG_DEBUG < 10 THEN

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

789: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
790: END IF;
791:
792: -- IF PG_DEBUG < 10 THEN
793: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
794: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 4 - id [' || to_char(p_bucket_line_id_4)
795: || '] Seq [' || to_char(p_bucket_seq_num_4) || ' Desc [' ||
796: p_bucket_titletop_4 || ' ' || p_bucket_titlebottom_4 || '] Amt [' ||
797: to_char(p_bucket_amount_4));

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

796: p_bucket_titletop_4 || ' ' || p_bucket_titlebottom_4 || '] Amt [' ||
797: to_char(p_bucket_amount_4));
798: END IF;
799: -- IF PG_DEBUG < 10 THEN
800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
801: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
802: END IF;
803:
804: -- IF PG_DEBUG < 10 THEN

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

801: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
802: END IF;
803:
804: -- IF PG_DEBUG < 10 THEN
805: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
806: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 5 - id [' || to_char(p_bucket_line_id_5)
807: || '] Seq [' || to_char(p_bucket_seq_num_5) || ' Desc [' ||
808: p_bucket_titletop_5 || ' ' || p_bucket_titlebottom_5 || '] Amt [' ||
809: to_char(p_bucket_amount_5));

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

808: p_bucket_titletop_5 || ' ' || p_bucket_titlebottom_5 || '] Amt [' ||
809: to_char(p_bucket_amount_5));
810: END IF;
811: -- IF PG_DEBUG < 10 THEN
812: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
813: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
814: END IF;
815:
816: -- IF PG_DEBUG < 10 THEN

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

813: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
814: END IF;
815:
816: -- IF PG_DEBUG < 10 THEN
817: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
818: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || ' 6 - id [' || to_char(p_bucket_line_id_6)
819: || '] Seq [' || to_char(p_bucket_seq_num_6) || ' Desc [' ||
820: p_bucket_titletop_6 || ' ' || p_bucket_titlebottom_6 || '] Amt [' ||
821: to_char(p_bucket_amount_6));

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

820: p_bucket_titletop_6 || ' ' || p_bucket_titlebottom_6 || '] Amt [' ||
821: to_char(p_bucket_amount_6));
822: END IF;
823: -- IF PG_DEBUG < 10 THEN
824: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
825: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
826: END IF;
827:
828:

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

826: END IF;
827:
828:
829: -- IF PG_DEBUG < 10 THEN
830: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
831: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
832: END IF;
833: -- IF PG_DEBUG < 10 THEN
834: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

830: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
831: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
832: END IF;
833: -- IF PG_DEBUG < 10 THEN
834: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
835: IEX_DEBUG_PUB.LogMessage
836: ('IEX_AGING_BUCKETS_PKG. CALC_AGING_BUCKETS --->> End <<--- ');
837: END IF;
838: -- IF PG_DEBUG < 10 THEN

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

835: IEX_DEBUG_PUB.LogMessage
836: ('IEX_AGING_BUCKETS_PKG. CALC_AGING_BUCKETS --->> End <<--- ');
837: END IF;
838: -- IF PG_DEBUG < 10 THEN
839: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
840: IEX_DEBUG_PUB.LogMessage('calc_aging_buckets: ' || v_line);
841: END IF;
842:
843: --

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

843: --
844: EXCEPTION
845: WHEN OTHERS THEN
846: -- IF PG_DEBUG < 10 THEN
847: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
848: iex_debug_pub.logmessage('EXCEPTION: IEX_PROFILE_AGING_PKG.calc_aging_buckets');
849: END IF;
850: END calc_aging_buckets;
851: --

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

960:
961:
962: BEGIN
963: -- IF PG_DEBUG < 10 THEN
964: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
965: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
966: END IF;
967: -- IF PG_DEBUG < 10 THEN
968: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

964: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
965: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
966: END IF;
967: -- IF PG_DEBUG < 10 THEN
968: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
969: IEX_DEBUG_PUB.LogMessage
970: ('IEX_AGING_BUCKETS_PKG.CALC_CREDITS --->> Start <<--- ');
971: END IF;
972: -- IF PG_DEBUG < 10 THEN

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

969: IEX_DEBUG_PUB.LogMessage
970: ('IEX_AGING_BUCKETS_PKG.CALC_CREDITS --->> Start <<--- ');
971: END IF;
972: -- IF PG_DEBUG < 10 THEN
973: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
974: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
975: END IF;
976:
977: p_credits := 0;

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

996: Close cust_site_credits ;
997: End If ;
998: --
999: -- IF PG_DEBUG < 10 THEN
1000: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1001: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
1002: END IF;
1003: -- IF PG_DEBUG < 10 THEN
1004: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1000: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1001: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
1002: END IF;
1003: -- IF PG_DEBUG < 10 THEN
1004: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1005: IEX_DEBUG_PUB.LogMessage
1006: ('IEX_AGING_BUCKETS_PKG.CALC_CREDITS --->> End <<--- ');
1007: END IF;
1008: -- IF PG_DEBUG < 10 THEN

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

1005: IEX_DEBUG_PUB.LogMessage
1006: ('IEX_AGING_BUCKETS_PKG.CALC_CREDITS --->> End <<--- ');
1007: END IF;
1008: -- IF PG_DEBUG < 10 THEN
1009: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1010: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
1011: END IF;
1012:
1013: EXCEPTION

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

1012:
1013: EXCEPTION
1014: WHEN OTHERS THEN
1015: -- IF PG_DEBUG < 10 THEN
1016: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1017: iex_debug_pub.logmessage('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_credits');
1018: END IF;
1019: -- IF PG_DEBUG < 10 THEN
1020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1016: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1017: iex_debug_pub.logmessage('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_credits');
1018: END IF;
1019: -- IF PG_DEBUG < 10 THEN
1020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1021: iex_debug_pub.logmessage('calc_credits: ' || SQLCODE || ' ---> ' || SQLERRM);
1022: END IF;
1023: if cust_credits%ISOPEN then
1024: CLOSE cust_credits ;

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

1027: CLOSE party_credits ;
1028: End If ;
1029:
1030: -- IF PG_DEBUG < 10 THEN
1031: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1032: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
1033: END IF;
1034: -- IF PG_DEBUG < 10 THEN
1035: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1031: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1032: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
1033: END IF;
1034: -- IF PG_DEBUG < 10 THEN
1035: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1036: IEX_DEBUG_PUB.LogMessage
1037: ('IEX_AGING_BUCKETS_PKG.CALC_CREDITS --->> End with Exception <<--- ');
1038: END IF;
1039: -- IF PG_DEBUG < 10 THEN

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

1036: IEX_DEBUG_PUB.LogMessage
1037: ('IEX_AGING_BUCKETS_PKG.CALC_CREDITS --->> End with Exception <<--- ');
1038: END IF;
1039: -- IF PG_DEBUG < 10 THEN
1040: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1041: IEX_DEBUG_PUB.LogMessage('calc_credits: ' || l_line);
1042: END IF;
1043:
1044: END calc_credits;

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

1287:
1288: EXCEPTION
1289: WHEN OTHERS THEN
1290: -- IF PG_DEBUG < 10 THEN
1291: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1292: iex_debug_pub.logmessage
1293: ('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_receipts');
1294: END IF;
1295: -- IF PG_DEBUG < 10 THEN

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

1292: iex_debug_pub.logmessage
1293: ('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_receipts');
1294: END IF;
1295: -- IF PG_DEBUG < 10 THEN
1296: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1297: iex_debug_pub.logmessage('calc_receipts: ' || SQLCODE || ' ---> ' || SQLERRM);
1298: END IF;
1299: if cust_unapplied_cash%ISOPEN then
1300: CLOSE cust_unapplied_cash ;

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

1303: CLOSE party_unapplied_cash ;
1304: End If ;
1305:
1306: -- IF PG_DEBUG < 10 THEN
1307: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1308: IEX_DEBUG_PUB.LogMessage('calc_receipts: ' || l_line);
1309: END IF;
1310: -- IF PG_DEBUG < 10 THEN
1311: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1307: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1308: IEX_DEBUG_PUB.LogMessage('calc_receipts: ' || l_line);
1309: END IF;
1310: -- IF PG_DEBUG < 10 THEN
1311: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1312: IEX_DEBUG_PUB.LogMessage
1313: ('IEX_AGING_BUCKETS_PKG.CALC_RECEIPTS --->> End with Exception <<---');
1314: END IF;
1315: -- IF PG_DEBUG < 10 THEN

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

1312: IEX_DEBUG_PUB.LogMessage
1313: ('IEX_AGING_BUCKETS_PKG.CALC_RECEIPTS --->> End with Exception <<---');
1314: END IF;
1315: -- IF PG_DEBUG < 10 THEN
1316: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1317: IEX_DEBUG_PUB.LogMessage('calc_receipts: ' || l_line);
1318: END IF;
1319: END calc_receipts;
1320: --

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

1469:
1470: BEGIN
1471:
1472: -- IF PG_DEBUG < 10 THEN
1473: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1474: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1475: END IF;
1476: -- IF PG_DEBUG < 10 THEN
1477: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1473: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1474: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1475: END IF;
1476: -- IF PG_DEBUG < 10 THEN
1477: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1478: IEX_DEBUG_PUB.LogMessage
1479: ('IEX_AGING_BUCKETS_PKG.CALC_risk_receipts --->> Start <<--- ');
1480: END IF;
1481: -- IF PG_DEBUG < 10 THEN

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

1478: IEX_DEBUG_PUB.LogMessage
1479: ('IEX_AGING_BUCKETS_PKG.CALC_risk_receipts --->> Start <<--- ');
1480: END IF;
1481: -- IF PG_DEBUG < 10 THEN
1482: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1483: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1484: END IF;
1485:
1486: p_risk_receipts := 0;

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

1505: Close cust_site_risk_receipts ;
1506: End If ;
1507: --
1508: -- IF PG_DEBUG < 10 THEN
1509: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1510: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1511: END IF;
1512: -- IF PG_DEBUG < 10 THEN
1513: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1509: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1510: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1511: END IF;
1512: -- IF PG_DEBUG < 10 THEN
1513: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1514: IEX_DEBUG_PUB.LogMessage
1515: ('IEX_AGING_BUCKETS_PKG.CALC_risk_receipts --->> End <<--- ');
1516: END IF;
1517: -- IF PG_DEBUG < 10 THEN

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

1514: IEX_DEBUG_PUB.LogMessage
1515: ('IEX_AGING_BUCKETS_PKG.CALC_risk_receipts --->> End <<--- ');
1516: END IF;
1517: -- IF PG_DEBUG < 10 THEN
1518: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1519: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1520: END IF;
1521:
1522: EXCEPTION

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

1521:
1522: EXCEPTION
1523: WHEN OTHERS THEN
1524: -- IF PG_DEBUG < 10 THEN
1525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1526: iex_debug_pub.logmessage('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_risk_receipts');
1527: END IF;
1528: -- IF PG_DEBUG < 10 THEN
1529: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1526: iex_debug_pub.logmessage('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_risk_receipts');
1527: END IF;
1528: -- IF PG_DEBUG < 10 THEN
1529: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1530: iex_debug_pub.logmessage('calc_risk_receipts: ' || SQLCODE || ' ---> ' || SQLERRM);
1531: END IF;
1532: if cust_risk_receipts%ISOPEN then
1533: CLOSE cust_risk_receipts ;

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

1536: CLOSE party_risk_receipts ;
1537: End If ;
1538:
1539: -- IF PG_DEBUG < 10 THEN
1540: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1541: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1542: END IF;
1543: -- IF PG_DEBUG < 10 THEN
1544: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1540: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1541: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1542: END IF;
1543: -- IF PG_DEBUG < 10 THEN
1544: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1545: IEX_DEBUG_PUB.LogMessage
1546: ('IEX_AGING_BUCKETS_PKG.CALC_risk_receipts --->> End with Exception <<--- ');
1547: END IF;
1548: -- IF PG_DEBUG < 10 THEN

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

1545: IEX_DEBUG_PUB.LogMessage
1546: ('IEX_AGING_BUCKETS_PKG.CALC_risk_receipts --->> End with Exception <<--- ');
1547: END IF;
1548: -- IF PG_DEBUG < 10 THEN
1549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1550: IEX_DEBUG_PUB.LogMessage('calc_risk_receipts: ' || l_line);
1551: END IF;
1552:
1553: END calc_risk_receipts;

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

1657:
1658:
1659: BEGIN
1660: -- IF PG_DEBUG < 10 THEN
1661: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1662: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1663: END IF;
1664: -- IF PG_DEBUG < 10 THEN
1665: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1661: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1662: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1663: END IF;
1664: -- IF PG_DEBUG < 10 THEN
1665: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1666: IEX_DEBUG_PUB.LogMessage
1667: ('IEX_AGING_BUCKETS_PKG.CALC_DISPUTE --->> Start <<--- ');
1668: END IF;
1669: -- IF PG_DEBUG < 10 THEN

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

1666: IEX_DEBUG_PUB.LogMessage
1667: ('IEX_AGING_BUCKETS_PKG.CALC_DISPUTE --->> Start <<--- ');
1668: END IF;
1669: -- IF PG_DEBUG < 10 THEN
1670: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1671: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1672: END IF;
1673:
1674: p_dispute := 0;

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

1693: Close cust_site_dispute ;
1694: End If ;
1695: --
1696: -- IF PG_DEBUG < 10 THEN
1697: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1698: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1699: END IF;
1700: -- IF PG_DEBUG < 10 THEN
1701: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1697: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1698: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1699: END IF;
1700: -- IF PG_DEBUG < 10 THEN
1701: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1702: IEX_DEBUG_PUB.LogMessage
1703: ('IEX_AGING_BUCKETS_PKG.CALC_dispute --->> End <<--- ');
1704: END IF;
1705: -- IF PG_DEBUG < 10 THEN

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

1702: IEX_DEBUG_PUB.LogMessage
1703: ('IEX_AGING_BUCKETS_PKG.CALC_dispute --->> End <<--- ');
1704: END IF;
1705: -- IF PG_DEBUG < 10 THEN
1706: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1707: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1708: END IF;
1709:
1710: EXCEPTION

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

1709:
1710: EXCEPTION
1711: WHEN OTHERS THEN
1712: -- IF PG_DEBUG < 10 THEN
1713: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1714: iex_debug_pub.logmessage('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_dispute');
1715: END IF;
1716: -- IF PG_DEBUG < 10 THEN
1717: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1713: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1714: iex_debug_pub.logmessage('EXCEPTION: Iex_Aging_Buckets_Pkg.calc_dispute');
1715: END IF;
1716: -- IF PG_DEBUG < 10 THEN
1717: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1718: iex_debug_pub.logmessage('calc_dispute: ' || SQLCODE || ' ---> ' || SQLERRM);
1719: END IF;
1720: if cust_dispute%ISOPEN then
1721: CLOSE cust_dispute ;

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

1724: CLOSE party_dispute ;
1725: End If ;
1726:
1727: -- IF PG_DEBUG < 10 THEN
1728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1729: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1730: END IF;
1731: -- IF PG_DEBUG < 10 THEN
1732: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1729: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1730: END IF;
1731: -- IF PG_DEBUG < 10 THEN
1732: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1733: IEX_DEBUG_PUB.LogMessage
1734: ('IEX_AGING_BUCKETS_PKG.CALC_dispute --->> End with Exception <<--- ');
1735: END IF;
1736: -- IF PG_DEBUG < 10 THEN

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

1733: IEX_DEBUG_PUB.LogMessage
1734: ('IEX_AGING_BUCKETS_PKG.CALC_dispute --->> End with Exception <<--- ');
1735: END IF;
1736: -- IF PG_DEBUG < 10 THEN
1737: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1738: IEX_DEBUG_PUB.LogMessage('calc_dispute: ' || l_line);
1739: END IF;
1740: END calc_dispute;
1741: --

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

1937:
1938: BEGIN
1939:
1940: -- IF PG_DEBUG < 10 THEN
1941: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1942: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
1943: END IF;
1944: -- IF PG_DEBUG < 10 THEN
1945: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1941: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1942: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
1943: END IF;
1944: -- IF PG_DEBUG < 10 THEN
1945: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1946: IEX_DEBUG_PUB.LogMessage
1947: ('calc_adj_fin_charges: ' || 'IEX_AGING_BUCKETS_PKG.CALC_PENDING_ADJ --->> Start <<--- ');
1948: END IF;
1949: -- IF PG_DEBUG < 10 THEN

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

1946: IEX_DEBUG_PUB.LogMessage
1947: ('calc_adj_fin_charges: ' || 'IEX_AGING_BUCKETS_PKG.CALC_PENDING_ADJ --->> Start <<--- ');
1948: END IF;
1949: -- IF PG_DEBUG < 10 THEN
1950: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1951: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
1952: END IF;
1953:
1954: p_pending_adj := 0;

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

2003:
2004: End If ;
2005: --
2006: -- IF PG_DEBUG < 10 THEN
2007: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2008: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
2009: END IF;
2010: -- IF PG_DEBUG < 10 THEN
2011: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2007: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2008: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
2009: END IF;
2010: -- IF PG_DEBUG < 10 THEN
2011: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2012: IEX_DEBUG_PUB.LogMessage
2013: ('calc_adj_fin_charges: ' || 'IEX_AGING_BUCKETS_PKG.CALC_pending_adj --->> End <<--- ');
2014: END IF;
2015: -- IF PG_DEBUG < 10 THEN

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

2012: IEX_DEBUG_PUB.LogMessage
2013: ('calc_adj_fin_charges: ' || 'IEX_AGING_BUCKETS_PKG.CALC_pending_adj --->> End <<--- ');
2014: END IF;
2015: -- IF PG_DEBUG < 10 THEN
2016: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2017: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
2018: END IF;
2019:
2020: EXCEPTION

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

2019:
2020: EXCEPTION
2021: WHEN OTHERS THEN
2022: -- IF PG_DEBUG < 10 THEN
2023: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2024: iex_debug_pub.logmessage('calc_adj_fin_charges: ' || 'EXCEPTION: Iex_Aging_Buckets_Pkg.calc_pending_adj');
2025: END IF;
2026: -- IF PG_DEBUG < 10 THEN
2027: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2023: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2024: iex_debug_pub.logmessage('calc_adj_fin_charges: ' || 'EXCEPTION: Iex_Aging_Buckets_Pkg.calc_pending_adj');
2025: END IF;
2026: -- IF PG_DEBUG < 10 THEN
2027: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2028: iex_debug_pub.logmessage('calc_adj_fin_charges: ' || SQLCODE || ' ---> ' || SQLERRM);
2029: END IF;
2030:
2031: if cust_adj%ISOPEN then

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

2044:
2045:
2046:
2047: -- IF PG_DEBUG < 10 THEN
2048: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2049: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
2050: END IF;
2051: -- IF PG_DEBUG < 10 THEN
2052: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2048: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2049: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
2050: END IF;
2051: -- IF PG_DEBUG < 10 THEN
2052: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2053: IEX_DEBUG_PUB.LogMessage
2054: ('calc_adj_fin_charges: ' || 'IEX_AGING_BUCKETS_PKG.CALC_pending_adj --->> End with Exception <<--- ');
2055: END IF;
2056: -- IF PG_DEBUG < 10 THEN

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

2053: IEX_DEBUG_PUB.LogMessage
2054: ('calc_adj_fin_charges: ' || 'IEX_AGING_BUCKETS_PKG.CALC_pending_adj --->> End with Exception <<--- ');
2055: END IF;
2056: -- IF PG_DEBUG < 10 THEN
2057: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2058: IEX_DEBUG_PUB.LogMessage('calc_adj_fin_charges: ' || l_line);
2059: END IF;
2060:
2061: END calc_adj_fin_charges;

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

2242: -- derived at this time. Will be implemented later, if required
2243: l_cons_amount Number := 0 ;
2244: Begin
2245: -- IF PG_DEBUG < 10 THEN
2246: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2247: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || l_line);
2248: END IF;
2249: -- IF PG_DEBUG < 10 THEN
2250: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2246: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2247: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || l_line);
2248: END IF;
2249: -- IF PG_DEBUG < 10 THEN
2250: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2251: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES --->> Start <<--- ');
2252: END IF;
2253: -- IF PG_DEBUG < 10 THEN
2254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2250: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2251: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES --->> Start <<--- ');
2252: END IF;
2253: -- IF PG_DEBUG < 10 THEN
2254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2255: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || l_line);
2256: END IF;
2257:
2258:

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

2279: from dual ;
2280:
2281:
2282: -- IF PG_DEBUG < 10 THEN
2283: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2284: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || 'Bucket Id >> ' || p_bucket_id );
2285: END IF;
2286:
2287: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

2296: X_MSG_COUNT => v_msg_count,
2297: X_MSG_DATA => v_msg_data );
2298:
2299: -- IF PG_DEBUG < 10 THEN
2300: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2301: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || 'Functional Currency >> '|| v_currency ||
2302: ' Filter Mode ' || p_filter_mode);
2303: END IF;
2304:

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

2306:
2307: if p_filter_mode IN ('CUST', 'BILLTO') then
2308:
2309: -- IF PG_DEBUG < 10 THEN
2310: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2311: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || 'Filter Mode >> '||
2312: p_filter_mode || ' Start');
2313: END IF;
2314:

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

2318: into v_billto_cust_account_id
2319: from ar_payment_schedules aps
2320: where aps.customer_site_use_id = p_filter_id ;
2321:
2322: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2323: iex_debug_pub.logmessage('Cust Account id for bill to >> '
2324: || v_billto_cust_account_id);
2325: END IF;
2326:

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

2325: END IF;
2326:
2327: Exception
2328: WHEN NO_DATA_FOUND THEN
2329: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2330: iex_debug_pub.logmessage('ERROR >> No Customer Account
2331: for the Passed Bill to id >>' || p_filter_id);
2332: END IF;
2333: WHEN OTHERS then

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

2330: iex_debug_pub.logmessage('ERROR >> No Customer Account
2331: for the Passed Bill to id >>' || p_filter_id);
2332: END IF;
2333: WHEN OTHERS then
2334: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2335: iex_debug_pub.logmessage('ERROR >> When deriving customer
2336: account for the Passed Bill to id >>' || p_filter_id ||
2337: SQLCODE || SQLERRM);
2338: END IF;

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

2414: FETCH AR_AGING_PARTY_CUR
2415: INTO l_customer_id ;
2416: END IF;
2417: -- IF PG_DEBUG < 10 THEN
2418: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2419: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || 'Party Mode Fetch Iteration >> '
2420: || to_char(l_count) || ' Filter Id '||
2421: to_char(p_filter_id));
2422: END IF;

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

2428: EXIT WHEN AR_AGING_PARTY_CUR%NOTFOUND ;
2429: END IF;
2430:
2431: -- IF PG_DEBUG < 10 THEN
2432: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2433: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || 'Mode Party >> Customer >> '
2434: || l_customer_id );
2435: END IF;
2436:

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

2436:
2437: lt_outstanding_balance := 0 ;
2438: -- Call the Aging Procedure for each fetched customer_id
2439: -- IF PG_DEBUG < 10 THEN
2440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2441: IEX_DEBUG_PUB.LogMessage
2442: ('QUERY_AGING_LINES: ' || 'Before Calling calc aging buckets >> Parameters >>');
2443: END IF;
2444: -- IF PG_DEBUG < 10 THEN

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

2441: IEX_DEBUG_PUB.LogMessage
2442: ('QUERY_AGING_LINES: ' || 'Before Calling calc aging buckets >> Parameters >>');
2443: END IF;
2444: -- IF PG_DEBUG < 10 THEN
2445: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2446: IEX_DEBUG_PUB.LogMessage
2447: ('QUERY_AGING_LINES: ' || ' Bucket Id > '|| p_bucket_id
2448: || 'Customer Id > ' || to_char(l_customer_id));
2449: END IF;

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

2501: -- act as common output for both party and cust modes
2502: -- when loading the final output table.
2503:
2504: -- IF PG_DEBUG < 10 THEN
2505: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2506: IEX_DEBUG_PUB.LogMessage
2507: ('QUERY_AGING_LINES: ' || 'Acct Balance >> '|| to_char(lt_outstanding_balance));
2508: END IF;
2509:

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

2510: l_outstanding_balance :=
2511: l_outstanding_balance + lt_outstanding_balance ;
2512:
2513: -- IF PG_DEBUG < 10 THEN
2514: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2515: IEX_DEBUG_PUB.LogMessage
2516: ('QUERY_AGING_LINES: ' || 'Total Balance >> '|| to_char(l_outstanding_balance));
2517: END IF;
2518:

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

2534: l_bucket_seq_num_0 := lt_bucket_seq_num_0 ;
2535: End If ;
2536:
2537: -- IF PG_DEBUG < 10 THEN
2538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2539: IEX_DEBUG_PUB.LogMessage
2540: ('QUERY_AGING_LINES: ' || 'Bucket 0 >> '||lt_bucket_titletop_0 || ' '
2541: || lt_bucket_titlebottom_0);
2542: END IF;

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

2557: if (l_bucket_seq_num_1) is NULL then
2558: l_bucket_seq_num_1 := lt_bucket_seq_num_1 ;
2559: End If ;
2560: -- IF PG_DEBUG < 10 THEN
2561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2562: IEX_DEBUG_PUB.LogMessage
2563: ('QUERY_AGING_LINES: ' || 'Bucket 1 >> '||lt_bucket_titletop_1 || ' '
2564: || lt_bucket_titlebottom_1);
2565: END IF;

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

2599: if (l_bucket_seq_num_3) is NULL then
2600: l_bucket_seq_num_3 := lt_bucket_seq_num_3 ;
2601: End If ;
2602: -- IF PG_DEBUG < 10 THEN
2603: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2604: IEX_DEBUG_PUB.LogMessage
2605: ('QUERY_AGING_LINES: ' || 'Bucket 3 >> '||lt_bucket_titletop_3 || ' '
2606: || lt_bucket_titlebottom_3);
2607: END IF;

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

2671: END IF;
2672: Exception
2673: WHEN OTHERS Then
2674: -- IF PG_DEBUG < 10 THEN
2675: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2676: IEX_DEBUG_PUB.LogMessage
2677: ('QUERY_AGING_LINES: ' || 'When Others Party Mode >> '||SQLCODE
2678: || ' ==> ' ||SQLERRM);
2679: END IF;

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

2689: End ;
2690: End If ;
2691:
2692: -- IF PG_DEBUG < 10 THEN
2693: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2694: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Loading Buckets into Table of Records');
2695: END IF;
2696:
2697: -- Load the Derived values into PL/SQL table

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

2709: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2710: := l_bucket_seq_num_0 ;
2711:
2712: -- IF PG_DEBUG < 10 THEN
2713: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2714: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || l_line);
2715: END IF;
2716: -- IF PG_DEBUG < 10 THEN
2717: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2713: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2714: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || l_line);
2715: END IF;
2716: -- IF PG_DEBUG < 10 THEN
2717: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2718: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 1 Bucket Name ' ||
2719: x_bucket_lines_tbl(l_cnt).bucket_line ||
2720: ' Amount = ' || to_char(l_bucket_amount_0) ||
2721: '] Line Id = ['|| to_char(l_bucket_line_id_0) ||

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

2740: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2741: := l_bucket_seq_num_1 ;
2742:
2743: -- IF PG_DEBUG < 10 THEN
2744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2745: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 2 Bucket Name [' ||
2746: x_bucket_lines_tbl(l_cnt).bucket_line ||
2747: '] Amount = [' || to_char(l_bucket_amount_1) ||
2748: '] Line Id = ['|| to_char(l_bucket_line_id_1) ||

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

2766: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2767: := l_bucket_seq_num_2 ;
2768:
2769: -- IF PG_DEBUG < 10 THEN
2770: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2771: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 3 Bucket Name ' ||
2772: x_bucket_lines_tbl(l_cnt).bucket_line ||
2773: ' Amount = ' || to_char(l_bucket_amount_2) ||
2774: '] Line Id = ['|| to_char(l_bucket_line_id_2) ||

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

2792: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2793: := l_bucket_seq_num_3 ;
2794:
2795: -- IF PG_DEBUG < 10 THEN
2796: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2797: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 4 Bucket Name ' ||
2798: x_bucket_lines_tbl(l_cnt).bucket_line ||
2799: ' Amount = ' || to_char(l_bucket_amount_3) ||
2800: '] Line Id = ['|| to_char(l_bucket_line_id_3) ||

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

2819: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2820: := l_bucket_seq_num_4 ;
2821:
2822: -- IF PG_DEBUG < 10 THEN
2823: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2824: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 5 Bucket Name ' ||
2825: x_bucket_lines_tbl(l_cnt).bucket_line ||
2826: ' Amount = ' || to_char(l_bucket_amount_4) ||
2827: '] Line Id = ['|| to_char(l_bucket_line_id_4) ||

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

2845: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2846: := l_bucket_seq_num_5 ;
2847:
2848: -- IF PG_DEBUG < 10 THEN
2849: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2850: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 6 Bucket Name ' ||
2851: x_bucket_lines_tbl(l_cnt).bucket_line ||
2852: ' Amount = ' || to_char(l_bucket_amount_5) ||
2853: '] Line Id = ['|| to_char(l_bucket_line_id_5) ||

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

2871: x_bucket_lines_tbl(l_cnt).bucket_seq_num
2872: := l_bucket_seq_num_6 ;
2873:
2874: -- IF PG_DEBUG < 10 THEN
2875: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2876: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row 7 Bucket Name ' ||
2877: x_bucket_lines_tbl(l_cnt).bucket_line ||
2878: ' Amount = ' || to_char(l_bucket_amount_6) ||
2879: '] Line Id = ['|| to_char(l_bucket_line_id_6) ||

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

2882: l_cnt := l_cnt + 1 ;
2883: -- End If ;
2884: End If ;
2885: -- IF PG_DEBUG < 10 THEN
2886: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2887: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || l_line);
2888: END IF;
2889:
2890:

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

2888: END IF;
2889:
2890:
2891:
2892: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2893: iex_debug_pub.logmessage('Filter Mode Before Collectible Amt ' || p_filter_mode || ' [ '||p_filter_id || ' ]') ;
2894: END IF;
2895:
2896: -- Derive Collectible Amounts

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

3122: /*---------------------------------------------------------
3123: Loading all the one time results
3124: ---------------------------------------------------------*/
3125: -- IF PG_DEBUG < 10 THEN
3126: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3127: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Loading one time results ' );
3128: END IF;
3129: FOR cnt in 1..x_bucket_lines_tbl.COUNT
3130: LOOP

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

3148: End If ;
3149:
3150:
3151: -- IF PG_DEBUG < 10 THEN
3152: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3153: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || ' Row >> ' || to_char(cnt) || ' Bal [' ||
3154: to_char(x_bucket_lines_tbl(cnt).outstanding_balance) ||
3155: 'Currency [' || x_bucket_lines_tbl(cnt).currency);
3156: END IF;

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

3181: p_using_paying_rel => p_using_paying_rel,
3182: x_count => x_bucket_lines_tbl(cnt).consolidated_invoices,
3183: x_amount => l_cons_amount) ;
3184:
3185: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3186: IEX_DEBUG_PUB.LogMessage('After Call CONS : ' || x_bucket_lines_tbl(cnt).consolidated_invoices) ;
3187: END IF;
3188:
3189: l_total_cnsld_invoices := l_total_cnsld_invoices +

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

3301: -- Standard call to get message count and if count is 1, get message info
3302: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3303:
3304: -- IF PG_DEBUG < 10 THEN
3305: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3306: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || '-----------------------------------------');
3307: END IF;
3308: -- IF PG_DEBUG < 10 THEN
3309: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

3305: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3306: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || '-----------------------------------------');
3307: END IF;
3308: -- IF PG_DEBUG < 10 THEN
3309: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3310: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES --->> End <<--- ');
3311: END IF;
3312: -- IF PG_DEBUG < 10 THEN
3313: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

3309: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3310: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES --->> End <<--- ');
3311: END IF;
3312: -- IF PG_DEBUG < 10 THEN
3313: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3314: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || '-----------------------------------------');
3315: END IF;
3316:
3317: EXCEPTION

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

3369:
3370: x_class_count := 0; -- added by ehuh for bill-to
3371: x_class_amount := 0; -- added by ehuh for bill-to
3372:
3373: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3374: IEX_DEBUG_PUB.LogMessage(l_line) ;
3375: IEX_DEBUG_PUB.LogMessage('GET_BKT_INVOICE_CLASS_INFO --->> Start <<--- ') ;
3376: IEX_DEBUG_PUB.LogMessage(l_line) ;
3377: END IF;

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

3491: else
3492: v_sql := v_tran_sql ;
3493: End If ;
3494:
3495: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3496: IEX_DEBUG_PUB.LogMessage('SQL Executed --> ' || v_sql) ;
3497: END IF;
3498:
3499: Begin

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

3520: Exception
3521: WHEN NO_DATA_FOUND THEN
3522: x_class_count := 0; x_class_amount := 0;
3523: WHEN OTHERS THEN
3524: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3525: IEX_DEBUG_PUB.LogMessage(SQLCODE || ' ' || SQLERRM) ;
3526: END IF;
3527: End ;
3528:

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

3525: IEX_DEBUG_PUB.LogMessage(SQLCODE || ' ' || SQLERRM) ;
3526: END IF;
3527: End ;
3528:
3529: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3530: IEX_DEBUG_PUB.LogMessage(l_line) ;
3531: IEX_DEBUG_PUB.LogMessage('GET_BKT_INVOICE_CLASS_INFO --->> End <<--- ') ;
3532: IEX_DEBUG_PUB.LogMessage(l_line) ;
3533: END IF;

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

3574:
3575: b_class := 'INV' ;
3576: b_status := 'OP' ;
3577:
3578: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3579: IEX_DEBUG_PUB.LogMessage(l_line) ;
3580: IEX_DEBUG_PUB.LogMessage('GET_CNSLD_INVOICE_COUNT --->> Start <<--- ') ;
3581: IEX_DEBUG_PUB.LogMessage(l_line) ;
3582: IEX_DEBUG_PUB.LogMessage('Hello') ;

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

3661: AND hzca.party_id = :party_id ' ;
3662:
3663: END IF;
3664:
3665: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3666: IEX_DEBUG_PUB.LogMessage('') ;
3667: IEX_DEBUG_PUB.LogMessage(v_party_cnsld_sql) ;
3668: END IF;
3669:

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

3700: else
3701: v_sql := v_party_billto_cnsld_sql ;
3702: End If ;
3703:
3704: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3705: IEX_DEBUG_PUB.LogMessage('SQL Executed --> ' || v_sql) ;
3706: END IF;
3707:
3708: Begin

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

3735: Exception
3736: WHEN NO_DATA_FOUND THEN
3737: x_count := 0; x_amount := 0;
3738: WHEN OTHERS THEN
3739: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3740: IEX_DEBUG_PUB.LogMessage(SQLCODE || ' ' || SQLERRM) ;
3741: END IF;
3742: End ;
3743:

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

3740: IEX_DEBUG_PUB.LogMessage(SQLCODE || ' ' || SQLERRM) ;
3741: END IF;
3742: End ;
3743:
3744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3745: IEX_DEBUG_PUB.LogMessage(l_line) ;
3746: IEX_DEBUG_PUB.LogMessage('GET_CNSLD_INVOICE_COUNT --->> End <<--- ') ;
3747: IEX_DEBUG_PUB.LogMessage(l_line) ;
3748: END IF;

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

3747: IEX_DEBUG_PUB.LogMessage(l_line) ;
3748: END IF;
3749: EXCEPTION
3750: WHEN OTHERS then
3751: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3752: IEX_DEBUG_PUB.LogMessage(' GET_CNSLD_INVOICE_COUNT - MAIN ' ||
3753: SQLCODE || ' ' || SQLERRM) ;
3754: END IF;
3755:

Line 3760: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

3756: END GET_CNSLD_INVOICE_COUNT ;
3757:
3758: BEGIN
3759: l_line := '-----------------------------------------' ;
3760: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3761: END iex_aging_buckets_pkg ;
3762: --
3763: --
3764: --