DBA Data[Home] [Help]

APPS.OKL_EXT_BILLING_CHARGES_PVT dependencies on FND_LOG

Line 507: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

503:
504: BEGIN
505: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
506:
507: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
508: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
509: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Begin(+)');
510: END IF;
511: END IF;

Line 509: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Begin(+)');

505: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
506:
507: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
508: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
509: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Begin(+)');
510: END IF;
511: END IF;
512:
513: ------------------------------------------------------------

Line 597: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*** Start Validation ***');

593: -- -------------------------------
594: -- Process each cursor record
595: -- -------------------------------
596: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
597: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*** Start Validation ***');
598: END IF;
599:
600: g_batch_num := 0;
601:

Line 606: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validating batch number: '||g_batch_num);

602: OPEN c_bill_chrgs;
603: LOOP
604: g_batch_num := g_batch_num + 1;
605: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
606: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validating batch number: '||g_batch_num);
607: END IF;
608:
609: l_rowid_tbl.delete;
610: l_contract_tbl.delete;

Line 630: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*=> number of records: '||l_rowid_tbl.count);

626: l_strm_purpose_tbl
627: LIMIT L_FETCH_SIZE;
628:
629: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
630: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*=> number of records: '||l_rowid_tbl.count);
631: END IF;
632:
633: -- update global total rec count
634: g_total_rec_count := g_total_rec_count + l_rowid_tbl.count;

Line 641: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate std who columns.');

637: -- update std who parameters in okl_ext_billing_interface
638: -- -------------------------------------------------------
639: if l_rowid_tbl.count > 0 then
640: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
641: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate std who columns.');
642: END IF;
643: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
644: update okl_ext_billing_interface
645: set CREATED_BY = l_last_updated_by,

Line 657: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate std who columns.');

653: PROGRAM_UPDATE_DATE = sysdate
654: where rowid = l_rowid_tbl(indx);
655: COMMIT;
656: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
657: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate std who columns.');
658: END IF;
659: END IF;
660:
661: IF l_strm_purpose_tbl.count > 0 THEN

Line 666: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate stream type purpose.');

662: -- ---------------------------------
663: -- Validate Stream Type Purpose
664: -- ---------------------------------
665: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
666: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate stream type purpose.');
667: END IF;
668: forall indx in l_strm_purpose_tbl.first..l_strm_purpose_tbl.last
669: update okl_ext_billing_interface
670: set trx_status_code =

Line 688: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate stream type purpose.');

684: )
685: where rowid = l_rowid_tbl(indx);
686: COMMIT;
687: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
688: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate stream type purpose.');
689: END IF;
690: END IF; -- stream type purpose validation
691:
692: -- ---------------------------------

Line 697: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate amount.');

693: -- Validate Amount
694: -- ---------------------------------
695: if l_amt_tbl.count > 0 then
696: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
697: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate amount.');
698: END IF;
699: forall indx in l_amt_tbl.first..l_amt_tbl.last
700: update okl_ext_billing_interface
701: set trx_status_code = decode(l_amt_tbl(indx),NULL, 'ERROR',trx_status_code),

Line 709: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate amount.');

705: error_message)
706: where rowid = l_rowid_tbl(indx);
707: COMMIT;
708: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
709: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate amount.');
710: END IF;
711: END IF; -- Update rows to passed status
712:
713: -- ---------------------------------

Line 718: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate contract number.');

714: -- Validate Contract
715: -- ---------------------------------
716: if l_contract_tbl.count > 0 then
717: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
718: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate contract number.');
719: END IF;
720: FORALL indx in l_contract_tbl.first..l_contract_tbl.last
721: update okl_ext_billing_interface a
722: set contract_id = (select id

Line 728: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate contract number.');

724: where b.contract_number = a.contract_number)
725: where rowid = l_rowid_tbl(indx);
726: COMMIT;
727: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
728: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate contract number.');
729: END IF;
730: END IF;
731:
732: -- ---------------------------------

Line 745: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate asset number.');

741: -- CASE 3 - When ASSET_NUMBER present and ASSET_ID is NULL, code checks if there are multiple
742: -- contract lines with same line name and errors accordingly
743: IF l_asset_num.count > 0 THEN
744: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
745: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate asset number.');
746: END IF;
747: BEGIN
748: FORALL indx IN l_asset_num.FIRST..l_asset_num.LAST SAVE EXCEPTIONS
749: UPDATE okl_ext_billing_interface a

Line 778: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate asset number.');

774: END LOOP;
775: END; -- end of ASSET_ID updation
776: COMMIT;
777: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
778: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate asset number.');
779: END IF;
780: END IF;
781: -- PAGARG - Bug# 6884934 - Modified End
782:

Line 788: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate stream type assignment to a stream generation template.');

784: -- Validate Stream Type Name
785: -- ---------------------------------
786: IF l_sty_tbl.count > 0 THEN
787: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
788: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate stream type assignment to a stream generation template.');
789: END IF;
790: forall indx in l_sty_tbl.first..l_sty_tbl.last
791: update okl_ext_billing_interface a
792: set sty_id = (SELECT GTLV.PRIMARY_STY_ID STY_ID

Line 852: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate stream type assignment to a stream generation template.');

848: sty.stream_type_purpose = a.STREAM_TYPE_PURPOSE)
849: WHERE rowid = l_rowid_tbl(indx);
850: COMMIT;
851: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
852: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate stream type assignment to a stream generation template.');
853: END IF;
854: END IF;
855:
856: -- ---------------------------------

Line 861: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid contracts.');

857: -- Validate khr_id
858: -- ---------------------------------
859: if l_rowid_tbl.count > 0 then
860: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
861: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid contracts.');
862: END IF;
863: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
864: update okl_ext_billing_interface
865: set trx_status_code = decode(contract_id,NULL,'ERROR',trx_status_code),

Line 870: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid contracts.');

866: error_message = decode(contract_id,NULL,error_message||'Invalid Contract. ',error_message)
867: where rowid = l_rowid_tbl(indx);
868: commit;
869: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
870: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid contracts.');
871: END IF;
872: END IF;
873:
874:

Line 882: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag Bankruptcy check for Customers on contracts.');

878: -------------------------------------------------------------------
879: BEGIN
880:
881: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
882: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag Bankruptcy check for Customers on contracts.');
883: END IF;
884:
885: FOR l_get_khr IN c_get_khr
886: LOOP

Line 912: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Invoices of contract => ' || l_get_khr.contract_number || ' not billed due to bankruptcy.');

908:
909: IF (l_bankruptcy_flag = 'Y') THEN
910:
911: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
912: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Invoices of contract => ' || l_get_khr.contract_number || ' not billed due to bankruptcy.');
913: END IF;
914:
915: UPDATE okl_ext_billing_interface
916: SET trx_status_code = 'ERROR',

Line 925: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ end - flag Bankruptcy check for Customers on contracts.');

921:
922: END LOOP;
923:
924: IF (G_IS_DEBUG_STATEMENT_ON = TRUE) THEN
925: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ end - flag Bankruptcy check for Customers on contracts.');
926: END IF;
927:
928: END;
929: -- End of code added by Venkatho as part of Bug# 14119181

Line 942: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid lines.');

938: -- Line Name is not correct for the contract
939: -- ---------------------------------
940: IF l_rowid_tbl.count > 0 THEN
941: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
942: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid lines.');
943: END IF;
944: FORALL indx in l_rowid_tbl.first..l_rowid_tbl.last
945: UPDATE OKL_EXT_BILLING_INTERFACE a
946: SET TRX_STATUS_CODE = 'ERROR',

Line 959: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid lines.');

955: AND ( LNS.NAME IS NULL OR LNS.NAME = NVL(a.ASSET_NUMBER, LNS.NAME))
956: AND LNS.DNZ_CHR_ID = a.CONTRACT_ID);
957: COMMIT;
958: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
959: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid lines.');
960: END IF;
961: END IF;
962: -- PAGARG - Bug# 6884934 - Modified End
963:

Line 969: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid stream types.');

965: -- Validate sty_id
966: -- ---------------------------------
967: if l_rowid_tbl.count > 0 then
968: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
969: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid stream types.');
970: END IF;
971: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
972: update okl_ext_billing_interface
973: set trx_status_code = decode(sty_id,NULL,'ERROR',trx_status_code),

Line 980: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid stream types.');

976: error_message)
977: where rowid = l_rowid_tbl(indx);
978: commit;
979: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
980: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid stream types.');
981: END IF;
982: end if;
983:
984: -- ---------------------------------

Line 989: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate invoice date.');

985: -- Validate invoice_date
986: -- ---------------------------------
987: if l_rowid_tbl.count > 0 then
988: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
989: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate invoice date.');
990: END IF;
991: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
992: update okl_ext_billing_interface
993: set trx_status_code = decode(invoice_date,NULL,'ERROR',trx_status_code),

Line 998: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate invoice date.');

994: error_message = decode(invoice_date,NULL,error_message||'Invoice Date is Null. ',error_message)
995: where rowid = l_rowid_tbl(indx);
996: commit;
997: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
998: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate invoice date.');
999: END IF;
1000: end if;
1001:
1002: -- ---------------------------------

Line 1007: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate vendor id.');

1003: -- update vendor_id
1004: -- ---------------------------------
1005: if l_rowid_tbl.count > 0 then
1006: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1007: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate vendor id.');
1008: END IF;
1009: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1010: update okl_ext_billing_interface a
1011: set TAX_VENDOR_ID = (SELECT VENDOR_ID

Line 1019: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate vendor id.');

1015: where rowid = l_rowid_tbl(indx)
1016: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1017: commit;
1018: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1019: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate vendor id.');
1020: END IF;
1021: end if;
1022:
1023: -- ---------------------------------

Line 1028: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate vendor site id.');

1024: -- update vendor_site_id
1025: -- ---------------------------------
1026: if l_rowid_tbl.count > 0 then
1027: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1028: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate vendor site id.');
1029: END IF;
1030: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1031: update okl_ext_billing_interface a
1032: set TAX_VENDOR_SITE_ID = (SELECT VENDOR_SITE_ID

Line 1041: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate vendor site id.');

1037: where rowid = l_rowid_tbl(indx)
1038: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1039: commit;
1040: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1041: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate vendor site id.');
1042: END IF;
1043: end if;
1044:
1045: -- --------------------------------------

Line 1051: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid tax vendor id.');

1047: -- for actual property tax
1048: -- --------------------------------------
1049: if l_rowid_tbl.count > 0 then
1050: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1051: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid tax vendor id.');
1052: END IF;
1053: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1054: update okl_ext_billing_interface a
1055: set trx_status_code = decode( TAX_VENDOR_ID,NULL,'ERROR', trx_status_code),

Line 1061: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid tax vendor id.');

1057: where rowid = l_rowid_tbl(indx)
1058: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1059: commit;
1060: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1061: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid tax vendor id.');
1062: END IF;
1063: end if;
1064:
1065: if l_rowid_tbl.count > 0 then

Line 1067: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid tax vendor site id.');

1063: end if;
1064:
1065: if l_rowid_tbl.count > 0 then
1066: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1067: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - flag invalid tax vendor site id.');
1068: END IF;
1069: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1070: update okl_ext_billing_interface a
1071: set trx_status_code = decode( TAX_VENDOR_SITE_ID,NULL,'ERROR', trx_status_code),

Line 1078: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid tax vendor site id.');

1074: where rowid = l_rowid_tbl(indx)
1075: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1076: commit;
1077: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1078: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - flag invalid tax vendor site id.');
1079: END IF;
1080: end if;
1081:
1082: -- --------------------------------------------

Line 1087: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - asset id check for actual property tax.');

1083: -- kle_id is mandatory for Actual Property Tax
1084: -- --------------------------------------------
1085: if l_rowid_tbl.count > 0 then
1086: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1087: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - asset id check for actual property tax.');
1088: END IF;
1089: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1090: update okl_ext_billing_interface a
1091: set trx_status_code = decode( ASSET_ID,NULL,'ERROR', trx_status_code),

Line 1098: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - asset id check for actual property tax.');

1094: where rowid = l_rowid_tbl(indx)
1095: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1096: commit;
1097: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1098: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - asset id check for actual property tax.');
1099: END IF;
1100: end if;
1101:
1102: -- --------------------------------------------

Line 1108: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate property tax applicable flag.');

1104: -- for actual property tax
1105: -- --------------------------------------------
1106: if l_rowid_tbl.count > 0 then
1107: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1108: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate property tax applicable flag.');
1109: END IF;
1110: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1111: update okl_ext_billing_interface a
1112: set prop_tax_applicable_yn = (

Line 1126: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate property tax applicable flag.');

1122: where rowid = l_rowid_tbl(indx)
1123: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1124: commit;
1125: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1126: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate property tax applicable flag.');
1127: END IF;
1128: end if;
1129:
1130: -- --------------------------------------------

Line 1135: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate property tax applicable flag.');

1131: -- validate prop_tax_applicable_yn
1132: -- --------------------------------------------
1133: if l_rowid_tbl.count > 0 then
1134: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1135: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - validate property tax applicable flag.');
1136: END IF;
1137: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1138: update okl_ext_billing_interface a
1139: set trx_status_code = decode( prop_tax_applicable_yn,NULL,'ERROR','N','ERROR', trx_status_code),

Line 1149: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate property tax applicable flag.');

1145: where rowid = l_rowid_tbl(indx)
1146: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';
1147: commit;
1148: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1149: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validate property tax applicable flag.');
1150: END IF;
1151: end if;
1152:
1153: -- -----------------------------------------

Line 1158: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - update successfully validated rows to status of PASSED.');

1154: -- Update non-error rows to PASSED status
1155: -- -----------------------------------------
1156: if l_rowid_tbl.count > 0 then
1157: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1158: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - update successfully validated rows to status of PASSED.');
1159: END IF;
1160: forall indx in l_rowid_tbl.first..l_rowid_tbl.last
1161: update okl_ext_billing_interface
1162: set trx_status_code = decode(trx_status_code,'SUBMITTED', 'PASSED',trx_status_code)

Line 1166: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - update successfully validated rows to status of PASSED.');

1162: set trx_status_code = decode(trx_status_code,'SUBMITTED', 'PASSED',trx_status_code)
1163: where rowid = l_rowid_tbl(indx);
1164: commit;
1165: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1166: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - update successfully validated rows to status of PASSED.');
1167: END IF;
1168: end if; -- Update rows to passed status
1169:
1170: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

Line 1171: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validating batch number: '||g_batch_num);

1167: END IF;
1168: end if; -- Update rows to passed status
1169:
1170: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1171: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - validating batch number: '||g_batch_num);
1172: END IF;
1173: EXIT WHEN c_bill_chrgs%NOTFOUND;
1174: END LOOP;
1175: CLOSE c_bill_chrgs;

Line 1184: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - processing billing transactions batch number: '||g_batch_num);

1180: -- -------------------------------------
1181: OPEN bill_txn_csr( l_request_id );
1182: LOOP
1183: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1184: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - processing billing transactions batch number: '||g_batch_num);
1185: END IF;
1186: ext_bill_tbl.delete;
1187: tai_tbl.delete;
1188: til_tbl.delete;

Line 1198: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*=> number of records: '||ext_bill_tbl.count);

1194: INTO ext_bill_tbl
1195: LIMIT L_FETCH_SIZE;
1196:
1197: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1198: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*=> number of records: '||ext_bill_tbl.count);
1199: END IF;
1200:
1201: -- -------------------------------------
1202: -- process billing transaction records

Line 1206: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populating transaction header and line record.');

1202: -- process billing transaction records
1203: -- -------------------------------------
1204: if ext_bill_tbl.count > 0 then
1205: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1206: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populating transaction header and line record.');
1207: END IF;
1208: for indx in ext_bill_tbl.first..ext_bill_tbl.last loop
1209: -- save rowid for later update
1210: upd_rowid_tbl(indx) := ext_bill_tbl(indx).ext_rowid;

Line 1370: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - call to billing centralized API.');

1366: ---------------------------------------------------------------------
1367: l_tilv_tbl(0) := l_tilv_rec;
1368:
1369: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1370: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - call to billing centralized API.');
1371: END IF;
1372:
1373: OKL_INTERNAL_BILLING_PVT.CREATE_BILLING_TRX(
1374: p_api_version

Line 1388: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- ERROR: Creating Billing Transactions using Billing Engine');

1384: ,x_tldv_tbl);
1385:
1386: IF x_return_status <> 'S' THEN
1387: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1388: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- ERROR: Creating Billing Transactions using Billing Engine');
1389: END IF;
1390: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1391: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1392: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

Line 1397: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - call to billing centralized API.');

1393: RAISE Okl_Api.G_EXCEPTION_ERROR;
1394: END IF;
1395: END IF;
1396: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1397: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - call to billing centralized API.');
1398: END IF;
1399:
1400: l_tilv_tbl.delete;
1401: l_tldv_tbl.delete;

Line 1405: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populating transaction header and line record.');

1401: l_tldv_tbl.delete;
1402: END LOOP; -- process records in ext_bill_tbl
1403:
1404: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1405: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populating transaction header and line record.');
1406: END IF;
1407: END IF; -- check if ext_bill_tbl has records
1408: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1409: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - processing billing transactions batch number: '||g_batch_num);

Line 1409: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - processing billing transactions batch number: '||g_batch_num);

1405: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populating transaction header and line record.');
1406: END IF;
1407: END IF; -- check if ext_bill_tbl has records
1408: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1409: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - processing billing transactions batch number: '||g_batch_num);
1410: END IF;
1411: EXIT WHEN bill_txn_csr%NOTFOUND;
1412: END LOOP; -- process transaction records
1413:

Line 1438: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - processing actual property tax records batch number: '||g_batch_num);

1434: g_batch_num := 0;
1435: OPEN act_prop_tax_csr( l_request_id );
1436: LOOP
1437: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1438: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - processing actual property tax records batch number: '||g_batch_num);
1439: END IF;
1440:
1441: ext_bill_tbl.delete;
1442: ptc_tbl.delete;

Line 1452: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*=> number of records: '||ext_bill_tbl.count);

1448: FETCH act_prop_tax_csr BULK COLLECT
1449: INTO ext_bill_tbl
1450: LIMIT L_FETCH_SIZE;
1451: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1452: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'*=> number of records: '||ext_bill_tbl.count);
1453: END IF;
1454: -- -------------------------------------
1455: -- process billing transaction records
1456: -- -------------------------------------

Line 1462: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate property tax parameters record, stm rec and sel rec.');

1458: -- -------------------------------------------
1459: -- loop thru ext_bill_tbl and process records
1460: -- -------------------------------------------
1461: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1462: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'++ begin - populate property tax parameters record, stm rec and sel rec.');
1463: END IF;
1464: FOR indx in ext_bill_tbl.first..ext_bill_tbl.last
1465: LOOP
1466: -- save rowid for later update

Line 1523: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create ACTUAL PROPERTY TAX stream.');

1519: IF l_actual_tax_count > 0 THEN -- check for actual property tax stream
1520: NULL;
1521: ELSE -- check for actual property tax stream
1522: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1523: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create ACTUAL PROPERTY TAX stream.');
1524: END IF;
1525: -- -------------------------
1526: -- Null out records
1527: -- -------------------------

Line 1568: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create ACTUAL PROPERTY TAX stream.');

1564: commit;
1565: stm_tbl.delete;
1566: end if;
1567: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1568: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create ACTUAL PROPERTY TAX stream.');
1569: END IF;
1570: END IF; -- end check for actual property tax stream
1571:
1572: -- Create stream element actual property tax stream element

Line 1629: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate property tax parameters record, stm rec and sel rec.');

1625: -- end creation of actual property tax stream element
1626: END LOOP; -- end processing ext table records
1627:
1628: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1629: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - populate property tax parameters record, stm rec and sel rec.');
1630: END IF;
1631:
1632: -- insert records into okl_property_tax_b
1633: if ptc_tbl.count > 0 then

Line 1635: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create ptc_b rec.');

1631:
1632: -- insert records into okl_property_tax_b
1633: if ptc_tbl.count > 0 then
1634: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1635: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create ptc_b rec.');
1636: END IF;
1637: forall i in ptc_tbl.first..ptc_tbl.last
1638: insert into okl_property_tax_b
1639: values ptc_tbl(i);

Line 1642: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create ptc_b rec.');

1638: insert into okl_property_tax_b
1639: values ptc_tbl(i);
1640: COMMIT;
1641: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1642: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create ptc_b rec.');
1643: END IF;
1644: END IF;
1645:
1646: -- insert records into okl_property_tax_tl

Line 1649: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create ptc_tl rec.');

1645:
1646: -- insert records into okl_property_tax_tl
1647: if ptctl_tbl.count > 0 then
1648: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1649: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create ptc_tl rec.');
1650: END IF;
1651: FORALL i in ptctl_tbl.first..ptctl_tbl.last
1652: INSERT INTO okl_property_tax_tl
1653: VALUES ptctl_tbl(i);

Line 1656: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create ptc_tl rec.');

1652: INSERT INTO okl_property_tax_tl
1653: VALUES ptctl_tbl(i);
1654: COMMIT;
1655: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1656: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create ptc_tl rec.');
1657: END IF;
1658: END IF;
1659:
1660: -- update okl_ext_billing_interface with sel_id

Line 1663: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - update ext billing interface with sel_id.');

1659:
1660: -- update okl_ext_billing_interface with sel_id
1661: IF upd_rowid_tbl.count > 0 then
1662: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1663: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - update ext billing interface with sel_id.');
1664: END IF;
1665: FORALL i in upd_rowid_tbl.first..upd_rowid_tbl.last
1666: UPDATE okl_ext_billing_interface
1667: SET sel_id = upd_sel_tbl(i)

Line 1671: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - update ext billing interface with sel_id.');

1667: SET sel_id = upd_sel_tbl(i)
1668: WHERE rowid = upd_rowid_tbl(i);
1669: COMMIT;
1670: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1671: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - update ext billing interface with sel_id.');
1672: END IF;
1673: END IF;
1674:
1675: -- insert sel records

Line 1678: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create actual property tax stream elements.');

1674:
1675: -- insert sel records
1676: IF sel_tbl.count > 0 THEN
1677: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1678: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create actual property tax stream elements.');
1679: END IF;
1680: forall i in sel_tbl.first..sel_tbl.last
1681: insert into okl_strm_elements
1682: values sel_tbl(i);

Line 1685: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create actual property tax stream elements.');

1681: insert into okl_strm_elements
1682: values sel_tbl(i);
1683: COMMIT;
1684: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1685: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create actual property tax stream elements.');
1686: END IF;
1687: END IF;
1688:
1689: -- create payable invoices

Line 1692: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create payable invoice.');

1688:
1689: -- create payable invoices
1690: IF ( l_p_tax_applicable = 'YES' ) THEN
1691: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1692: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - create payable invoice.');
1693: END IF;
1694: l_acc_cmt_cnt := 0;
1695: FOR indx in ext_bill_tbl.first..ext_bill_tbl.last
1696: LOOP

Line 1700: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Creating Payable Invoice to Tax Authority');

1696: LOOP
1697: l_acc_cmt_cnt := l_acc_cmt_cnt + 1;
1698:
1699: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1700: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Creating Payable Invoice to Tax Authority');
1701: END IF;
1702: p_man_inv_rec.ipvs_id := ext_bill_tbl(indx).TAX_VENDOR_SITE_ID;
1703: p_man_inv_rec.khr_id := ext_bill_tbl(indx).contract_id;
1704: p_man_inv_rec.vendor_id := ext_bill_tbl(indx).TAX_VENDOR_ID;

Line 1730: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- ERROR: Creating Payable Invoice');

1726: -- Create a payable Invoice
1727: -- ---------------------------------------
1728: IF x_return_status <> 'S' THEN
1729: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1730: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- ERROR: Creating Payable Invoice');
1731: END IF;
1732: UPDATE OKL_EXT_BILLING_INTERFACE
1733: SET trx_status_code = 'ERROR',
1734: ERROR_MESSAGE = ERROR_MESSAGE||'Error Creating Payable Invoice. '

Line 1744: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Deleting records from OKL_PROPERTY_TAX_tl and OKL_PROPERTY_TAX_b.');

1740: delete from OKL_PROPERTY_TAX_tl where id = ptc_tbl(indx).id;
1741: delete from OKL_PROPERTY_TAX_b where id = ptc_tbl(indx).id;
1742: delete from okl_strm_elements where id = upd_sel_tbl(indx);
1743: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1744: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Deleting records from OKL_PROPERTY_TAX_tl and OKL_PROPERTY_TAX_b.');
1745: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Deleting record from OKL_STRM_ELEMENTS.');
1746: END IF;
1747: END IF;
1748:

Line 1745: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Deleting record from OKL_STRM_ELEMENTS.');

1741: delete from OKL_PROPERTY_TAX_b where id = ptc_tbl(indx).id;
1742: delete from okl_strm_elements where id = upd_sel_tbl(indx);
1743: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1744: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Deleting records from OKL_PROPERTY_TAX_tl and OKL_PROPERTY_TAX_b.');
1745: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- Deleting record from OKL_STRM_ELEMENTS.');
1746: END IF;
1747: END IF;
1748:
1749: IF l_acc_cmt_cnt > 500 THEN

Line 1756: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create payable invoice.');

1752: END IF;
1753: END LOOP;
1754: COMMIT;
1755: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1756: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - create payable invoice.');
1757: END IF;
1758: END IF;
1759: -- end creation of payable invoices
1760:

Line 1764: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - update status on okl_ext_billing_interface for successful records .');

1760:
1761: -- Update records in the interface to PROCESSED status
1762: if upd_rowid_tbl.count > 0 then
1763: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1764: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' ++ begin - update status on okl_ext_billing_interface for successful records .');
1765: END IF;
1766: forall j in upd_rowid_tbl.first..upd_rowid_tbl.last
1767: update okl_ext_billing_interface
1768: set trx_status_code = decode(trx_status_code,'PASSED','PROCESSED',trx_status_code)

Line 1772: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - update status on okl_ext_billing_interface for successful records .');

1768: set trx_status_code = decode(trx_status_code,'PASSED','PROCESSED',trx_status_code)
1769: where rowid = upd_rowid_tbl(j);
1770: COMMIT;
1771: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1772: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,' -- end - update status on okl_ext_billing_interface for successful records .');
1773: END IF;
1774: END IF;
1775:
1776: -- Start Bug 4520466

Line 1784: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - processing actual property tax records batch number: '||g_batch_num);

1780: -- End Bug 4520466
1781: END IF; -- check if ext_bill_tbl has records
1782:
1783: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1784: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'-- end - processing actual property tax records batch number: '||g_batch_num);
1785: END IF;
1786: EXIT WHEN act_prop_tax_csr%NOTFOUND;
1787: END LOOP; -- process transaction records
1788:

Line 1899: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1895:
1896: ------------------------------------------------------------
1897: -- End processing
1898: ------------------------------------------------------------
1899: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1900: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1901: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'End (-)');
1902: END IF;
1903: END IF;

Line 1901: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'End (-)');

1897: -- End processing
1898: ------------------------------------------------------------
1899: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1900: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1901: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'End (-)');
1902: END IF;
1903: END IF;
1904:
1905: Okl_Api.END_ACTIVITY (