DBA Data[Home] [Help]

APPS.OKL_EXT_BILLING_CHARGES_PVT dependencies on OKL_EXT_BILLING_INTERFACE

Line 48: FROM OKL_EXT_BILLING_INTERFACE

44: , INVOICE_DATE
45: , AMOUNT
46: , CURRENCY_CODE
47: , STREAM_TYPE_PURPOSE
48: FROM OKL_EXT_BILLING_INTERFACE
49: WHERE TRX_STATUS_CODE = 'SUBMITTED';
50:
51: -- --------------------------------------------
52: -- Cursor for all actual property tax records

Line 78: FROM OKL_EXT_BILLING_INTERFACE

74: , TAX_VENDOR_SITE_ID
75: , TAX_VENDOR_SITE_NAME
76: , STREAM_TYPE_PURPOSE
77: , TAX_ASSESSMENT_DATE --FPbug#5891876
78: FROM OKL_EXT_BILLING_INTERFACE
79: WHERE TRX_STATUS_CODE = 'PASSED'
80: AND REQUEST_ID = p_request_id
81: AND STREAM_TYPE_PURPOSE = 'ACTUAL_PROPERTY_TAX'
82: ORDER BY contract_id, asset_id, sty_id ; -- Bug 6375368

Line 85: * contracts to be processed in OKL_EXT_BILLING_INTERFACE table. As the

81: AND STREAM_TYPE_PURPOSE = 'ACTUAL_PROPERTY_TAX'
82: ORDER BY contract_id, asset_id, sty_id ; -- Bug 6375368
83:
84: /* Bug#6375368 The Unique Constraint error fires if there are multiple
85: * contracts to be processed in OKL_EXT_BILLING_INTERFACE table. As the
86: * contract changes and the contract repeats for further processing the
87: * max_line_num_csr returns l_max_line_num as NULL or a number thats used
88: * earlier for the contract, as the insert for okl_strm_elements is done
89: * outside the loop. When the insert is done a unique constraint is fired

Line 121: FROM OKL_EXT_BILLING_INTERFACE

117: , TAX_VENDOR_SITE_ID
118: , TAX_VENDOR_SITE_NAME
119: , STREAM_TYPE_PURPOSE
120: , TAX_ASSESSMENT_DATE --FPbug#5891876
121: FROM OKL_EXT_BILLING_INTERFACE
122: WHERE TRX_STATUS_CODE = 'PASSED'
123: AND REQUEST_ID = p_request_id
124: AND STREAM_TYPE_PURPOSE <> 'ACTUAL_PROPERTY_TAX';
125:

Line 436: from okl_ext_billing_interface

432: -- also counts errors
433: -- ----------------------------------------------------
434: cursor ext_apt_stat_csr( p_request_id NUMBER, p_sts_code VARCHAR2, p_strm_purpose VARCHAR2 ) is
435: select count(*)
436: from okl_ext_billing_interface
437: where request_id = p_request_id
438: and trx_status_code = p_sts_code
439: and STREAM_TYPE_PURPOSE = p_strm_purpose;
440:

Line 447: from okl_ext_billing_interface

443: -- also counts errors
444: -- ------------------------------------------------------
445: cursor ext_non_apt_stat_csr( p_request_id NUMBER, p_sts_code VARCHAR2, p_strm_purpose VARCHAR2 ) is
446: select count(*)
447: from okl_ext_billing_interface
448: where request_id = p_request_id
449: and trx_status_code = p_sts_code
450: and STREAM_TYPE_PURPOSE <> p_strm_purpose;
451:

Line 461: from okl_ext_billing_interface

457: rpad(substr(asset_number,1,30),30,' ') asset_number,
458: rpad(substr(sty_name,1,30),30,' ') sty_name,
459: to_char(invoice_date,'DD-MON-RRRR') invoice_date,
460: error_message
461: from okl_ext_billing_interface
462: where request_id = p_request_id
463: and trx_status_code = p_sts_code;
464:
465: -- ----------------------------------------------------------

Line 498: FROM okl_ext_billing_interface

494: l_bankruptcy_flag VARCHAR2(1);
495:
496: CURSOR c_get_khr IS
497: SELECT distinct contract_number, contract_id
498: FROM okl_ext_billing_interface
499: WHERE contract_number IS NOT NULL
500: AND trx_status_code = 'SUBMITTED';
501:
502: -- End of Declarations added by Venkatho as part of Bug# 14119181

Line 637: -- update std who parameters in okl_ext_billing_interface

633: -- update global total rec count
634: g_total_rec_count := g_total_rec_count + l_rowid_tbl.count;
635:
636: -- -------------------------------------------------------
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.');

Line 644: update okl_ext_billing_interface

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,
646: CREATION_DATE = sysdate,
647: LAST_UPDATED_BY = l_last_updated_by,
648: LAST_UPDATE_DATE = sysdate,

Line 669: update okl_ext_billing_interface

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 =
671: decode(l_strm_purpose_tbl(indx),NULL,'ERROR',
672: -- 'RENT','ERROR',
673: -- 'ADVANCE_RENT','ERROR',

Line 700: update okl_ext_billing_interface

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),
702: error_message =
703: decode(l_amt_tbl(indx),NULL, error_message||'Amount Cannot be null. ',
704: 0, error_message||'Amount must be non-zero. ',

Line 721: update okl_ext_billing_interface a

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
723: from okc_k_headers_b b
724: where b.contract_number = a.contract_number)
725: where rowid = l_rowid_tbl(indx);

Line 749: UPDATE okl_ext_billing_interface a

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
750: SET asset_id = (SELECT id
751: FROM OKL_K_LINES_FULL_V b
752: -- NVL is for imported contracts where
753: -- Service Name is NULL in OKC_K_LINES_TL

Line 763: -- OKL_EXT_BILLING_INTERFACE. In this case the select query returns

759: EXCEPTION
760: WHEN x_multiple_line_error THEN
761: -- This exception will be thrown if there are similar service lines
762: -- on the same contract and ASSET_ID is not present in the record
763: -- OKL_EXT_BILLING_INTERFACE. In this case the select query returns
764: -- all the service lines based on the Service Name
765:
766: -- Update the status of the record as ERROR with error message
767: FOR err_indx IN 1 .. SQL%BULK_EXCEPTIONS.COUNT

Line 770: UPDATE OKL_EXT_BILLING_INTERFACE B_INT

766: -- Update the status of the record as ERROR with error message
767: FOR err_indx IN 1 .. SQL%BULK_EXCEPTIONS.COUNT
768: LOOP
769: l_temp_index := SQL%BULK_EXCEPTIONS(err_indx).ERROR_INDEX;
770: UPDATE OKL_EXT_BILLING_INTERFACE B_INT
771: SET TRX_STATUS_CODE = 'ERROR'
772: , ERROR_MESSAGE = ERROR_MESSAGE || 'Multiple contract lines with same name. Please also provide Contract Line ID.'
773: WHERE rowid = l_rowid_tbl(l_temp_index);
774: END LOOP;

Line 791: update okl_ext_billing_interface a

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
793: FROM
794: OKL_ST_GEN_TMPT_LNS GTLV,
795: OKL_ST_GEN_TEMPLATES GTTV,

Line 864: update okl_ext_billing_interface

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),
866: error_message = decode(contract_id,NULL,error_message||'Invalid Contract. ',error_message)
867: where rowid = l_rowid_tbl(indx);
868: commit;

Line 915: UPDATE okl_ext_billing_interface

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',
917: error_message = 'Invoices of contract => ' || l_get_khr.contract_number || ' not billed due to bankruptcy.'
918: WHERE contract_number = l_get_khr.contract_number;
919:

Line 945: UPDATE OKL_EXT_BILLING_INTERFACE a

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',
947: ERROR_MESSAGE = ERROR_MESSAGE||'Invalid Line name or Line Id.'
948: WHERE rowid = l_rowid_tbl(indx)
949: AND (a.ASSET_NUMBER IS NOT NULL OR a.ASSET_ID IS NOT NULL)

Line 972: update okl_ext_billing_interface

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),
974: error_message = decode(sty_id,NULL,
975: error_message||'Stream type is invalid, non-billable or unattached to a template. ',
976: error_message)

Line 992: update okl_ext_billing_interface

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),
994: error_message = decode(invoice_date,NULL,error_message||'Invoice Date is Null. ',error_message)
995: where rowid = l_rowid_tbl(indx);
996: commit;

Line 1010: update okl_ext_billing_interface a

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
1012: FROM po_vendors b
1013: WHERE b.VENDOR_TYPE_LOOKUP_CODE = 'TAX AUTHORITY'
1014: AND b.VENDOR_NAME = a.TAX_VENDOR_NAME)

Line 1031: update okl_ext_billing_interface a

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
1033: FROM po_vendor_sites_all b
1034: WHERE b.VENDOR_ID = a.TAX_VENDOR_ID
1035: AND b.VENDOR_SITE_CODE = a.TAX_VENDOR_SITE_NAME

Line 1054: update okl_ext_billing_interface a

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),
1056: error_message = decode( TAX_VENDOR_ID,NULL,error_message||'Invalid Tax Vendor Id. ', error_message)
1057: where rowid = l_rowid_tbl(indx)
1058: and stream_type_purpose = 'ACTUAL_PROPERTY_TAX';

Line 1070: update okl_ext_billing_interface a

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),
1072: error_message = decode( TAX_VENDOR_SITE_ID,NULL,
1073: error_message||'Invalid Tax Vendor Site Id. ', error_message)
1074: where rowid = l_rowid_tbl(indx)

Line 1090: update okl_ext_billing_interface a

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),
1092: error_message = decode( ASSET_ID,NULL,
1093: error_message||'Asset Id is mandatory for ACTUAL_PROPERTY_TAX. ', error_message)
1094: where rowid = l_rowid_tbl(indx)

Line 1111: update okl_ext_billing_interface a

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 = (
1113: SELECT NVL(rul.rule_information1,'N')
1114: FROM okc_rule_groups_b rgp,
1115: okc_rules_b rul

Line 1138: update okl_ext_billing_interface a

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),
1140: error_message = decode( prop_tax_applicable_yn,NULL,error_message
1141: ||'Property Tax Not Applicable for Asset. '
1142: ,'N',error_message

Line 1161: update okl_ext_billing_interface

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)
1163: where rowid = l_rowid_tbl(indx);
1164: commit;
1165: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

Line 1660: -- update okl_ext_billing_interface with sel_id

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

Line 1666: UPDATE okl_ext_billing_interface

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)
1668: WHERE rowid = upd_rowid_tbl(i);
1669: COMMIT;
1670: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

Line 1732: UPDATE OKL_EXT_BILLING_INTERFACE

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. '
1735: WHERE rowid = ext_bill_tbl(indx).ext_rowid;
1736: -- ------------------------------

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 1767: update okl_ext_billing_interface

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)
1769: where rowid = upd_rowid_tbl(j);
1770: COMMIT;
1771: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

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 1864: -- print all error messages from okl_ext_billing_interface

1860: END LOOP;
1861: END IF;
1862:
1863: -- ---------------------------------------------------------
1864: -- print all error messages from okl_ext_billing_interface
1865: -- ---------------------------------------------------------
1866: Fnd_File.PUT_LINE (Fnd_File.log,RPAD(' ', 132, ' '));
1867: Fnd_File.PUT_LINE (Fnd_File.log,RPAD(' ', 132, ' '));
1868: Fnd_File.PUT_LINE (Fnd_File.log,'Contract Number'||LPAD(' ', 16, ' ')