DBA Data[Home] [Help]

APPS.OKL_BLK_AST_UPD_PVT dependencies on OKC_API

Line 76: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

72: --End of Comments
73: ------------------------------------------------------------------------------
74: PROCEDURE get_trx_rec
75: (p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
77: x_return_status OUT NOCOPY VARCHAR2,
78: x_msg_count OUT NOCOPY NUMBER,
79: x_msg_data OUT NOCOPY VARCHAR2,
80: p_cle_id IN NUMBER,

Line 84: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

80: p_cle_id IN NUMBER,
81: p_transaction_type IN VARCHAR2,
82: x_trx_rec OUT NOCOPY transaction_rec) IS
83:
84: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
85: l_api_name CONSTANT VARCHAR2(30) := 'GET_TRX_REC';
86: l_api_version CONSTANT NUMBER := 1.0;
87:
88: --Following cursor assumes that a transaction type called

Line 101: Raise OKC_API.G_EXCEPTION_ERROR;

97: Fetch okl_trx_type_curs
98: into l_trx_type_id;
99: If okl_trx_type_curs%NotFound Then
100: --OKL LINE ACTIVATION not seeded as a source transaction in IB
101: Raise OKC_API.G_EXCEPTION_ERROR;
102: End If;
103: close okl_trx_type_curs;
104: --Assign transaction Type id to seeded value in cs_lookups
105: x_trx_rec.transaction_type_id := l_trx_type_id;

Line 111: When OKC_API.G_EXCEPTION_ERROR Then

107: x_trx_rec.source_line_ref_id := p_cle_id;
108: x_trx_rec.transaction_date := SYSDATE;
109: x_trx_rec.source_transaction_date := sysdate;
110: Exception
111: When OKC_API.G_EXCEPTION_ERROR Then
112: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
113: (
114: l_api_name,
115: G_PKG_NAME,

Line 112: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

108: x_trx_rec.transaction_date := SYSDATE;
109: x_trx_rec.source_transaction_date := sysdate;
110: Exception
111: When OKC_API.G_EXCEPTION_ERROR Then
112: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
113: (
114: l_api_name,
115: G_PKG_NAME,
116: 'OKC_API.G_RET_STS_ERROR',

Line 116: 'OKC_API.G_RET_STS_ERROR',

112: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
113: (
114: l_api_name,
115: G_PKG_NAME,
116: 'OKC_API.G_RET_STS_ERROR',
117: x_msg_count,
118: x_msg_data,
119: '_PVT'
120: );

Line 121: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

117: x_msg_count,
118: x_msg_data,
119: '_PVT'
120: );
121: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
122: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
123: (
124: l_api_name,
125: G_PKG_NAME,

Line 122: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

118: x_msg_data,
119: '_PVT'
120: );
121: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
122: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
123: (
124: l_api_name,
125: G_PKG_NAME,
126: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 126: 'OKC_API.G_RET_STS_UNEXP_ERROR',

122: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
123: (
124: l_api_name,
125: G_PKG_NAME,
126: 'OKC_API.G_RET_STS_UNEXP_ERROR',
127: x_msg_count,
128: x_msg_data,
129: '_PVT'
130: );

Line 132: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

128: x_msg_data,
129: '_PVT'
130: );
131: WHEN OTHERS THEN
132: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
133: (
134: l_api_name,
135: G_PKG_NAME,
136: 'OTHERS',

Line 145: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

141: END get_trx_rec;
142:
143: PROCEDURE update_location(
144: p_api_version IN NUMBER,
145: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
146: p_loc_rec IN OKL_LOC_REC_TYPE,
147: x_return_status OUT NOCOPY VARCHAR2,
148: x_msg_count OUT NOCOPY NUMBER,
149: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 521: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

517: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
518: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from Tax API '||x_return_status);
519: END IF;
520:
521: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
522: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
523: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
524: RAISE OKC_API.G_EXCEPTION_ERROR;
525: END IF;

Line 522: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

518: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from Tax API '||x_return_status);
519: END IF;
520:
521: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
522: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
523: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
524: RAISE OKC_API.G_EXCEPTION_ERROR;
525: END IF;
526:

Line 523: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

519: END IF;
520:
521: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
522: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
523: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
524: RAISE OKC_API.G_EXCEPTION_ERROR;
525: END IF;
526:
527: END IF; -- If _ib_inst found

Line 524: RAISE OKC_API.G_EXCEPTION_ERROR;

520:
521: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
522: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
523: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
524: RAISE OKC_API.G_EXCEPTION_ERROR;
525: END IF;
526:
527: END IF; -- If _ib_inst found
528: CLOSE c_ib_inst;

Line 849: x_return_status VARCHAR2(3) := OKC_API.G_RET_STS_SUCCESS;

845: END Update_asset_header;
846:
847: FUNCTION get_try_id(p_try_name IN OKL_TRX_TYPES_V.NAME%TYPE,x_try_id OUT NOCOPY OKC_LINE_STYLES_V.ID%TYPE)
848: RETURN VARCHAR2 IS
849: x_return_status VARCHAR2(3) := OKC_API.G_RET_STS_SUCCESS;
850: CURSOR c_get_try_id(p_try_name OKL_TRX_TYPES_V.NAME%TYPE) IS
851: SELECT id
852: FROM OKL_TRX_TYPES_TL
853: WHERE upper(name) = upper(p_try_name)

Line 856: IF (p_try_name = OKC_API.G_MISS_CHAR) OR

852: FROM OKL_TRX_TYPES_TL
853: WHERE upper(name) = upper(p_try_name)
854: AND language = 'US';
855: BEGIN
856: IF (p_try_name = OKC_API.G_MISS_CHAR) OR
857: (p_try_name IS NULL) THEN
858: -- store SQL error message on message stack
859: OKC_API.set_message(p_app_name => G_APP_NAME,
860: p_msg_name => G_REQUIRED_VALUE,

Line 859: OKC_API.set_message(p_app_name => G_APP_NAME,

855: BEGIN
856: IF (p_try_name = OKC_API.G_MISS_CHAR) OR
857: (p_try_name IS NULL) THEN
858: -- store SQL error message on message stack
859: OKC_API.set_message(p_app_name => G_APP_NAME,
860: p_msg_name => G_REQUIRED_VALUE,
861: p_token1 => G_COL_NAME_TOKEN,
862: p_token1_value => 'Try Name');
863: -- halt validation as it is a required field

Line 869: OKC_API.set_message(p_app_name => G_APP_NAME,

865: END IF;
866: OPEN c_get_try_id(p_try_name);
867: FETCH c_get_try_id INTO x_try_id;
868: IF c_get_try_id%NOTFOUND THEN
869: OKC_API.set_message(p_app_name => G_APP_NAME,
870: p_msg_name => G_NO_PARENT_RECORD,
871: p_token1 => G_COL_NAME_TOKEN,
872: p_token1_value => 'Try Name');
873: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 881: x_return_status := OKC_API.G_RET_STS_ERROR;

877: EXCEPTION
878: WHEN G_EXCEPTION_STOP_VALIDATION then
879: -- We are here since the field is required
880: -- Notify Error
881: x_return_status := OKC_API.G_RET_STS_ERROR;
882: WHEN G_EXCEPTION_HALT_VALIDATION then
883: -- We are here b'cause we have no parent record
884: -- If the cursor is open then it has to be closed
885: IF c_get_try_id%ISOPEN THEN

Line 889: x_return_status := OKC_API.G_RET_STS_ERROR;

885: IF c_get_try_id%ISOPEN THEN
886: CLOSE c_get_try_id;
887: END IF;
888: -- notify caller of an error
889: x_return_status := OKC_API.G_RET_STS_ERROR;
890: WHEN OTHERS THEN
891: -- store SQL error message on message stack for caller
892: OKC_API.set_message(
893: G_APP_NAME,

Line 892: OKC_API.set_message(

888: -- notify caller of an error
889: x_return_status := OKC_API.G_RET_STS_ERROR;
890: WHEN OTHERS THEN
891: -- store SQL error message on message stack for caller
892: OKC_API.set_message(
893: G_APP_NAME,
894: G_UNEXPECTED_ERROR,
895: G_SQLCODE_TOKEN,
896: SQLCODE,

Line 900: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

896: SQLCODE,
897: G_SQLERRM_TOKEN,
898: SQLERRM);
899: -- notify caller of an UNEXPECTED error
900: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
901: -- if the cursor is open
902: IF c_get_try_id%ISOPEN THEN
903: CLOSE c_get_try_id;
904: END IF;

Line 945: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

941: |
942: *=======================================================================*/
943:
944: PROCEDURE update_location(p_api_version IN NUMBER,
945: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
946: p_loc_tbl IN okl_loc_tbl_type,
947: x_return_status OUT NOCOPY VARCHAR2,
948: x_msg_count OUT NOCOPY NUMBER,
949: x_msg_data OUT NOCOPY VARCHAR2)

Line 1062: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE

1058: -- End of comments
1059:
1060: PROCEDURE populate_account_data(
1061: p_api_version IN NUMBER
1062: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
1063: ,p_trxh_out_rec IN Okl_Trx_Contracts_Pvt.tcnv_rec_type
1064: ,p_tclv_tbl IN okl_trx_contracts_pvt.tclv_tbl_type
1065: ,p_acc_gen_tbl IN OUT NOCOPY okl_account_dist_pvt.ACC_GEN_TBL_TYPE
1066: ,p_tmpl_identify_tbl IN OUT NOCOPY okl_account_dist_pvt.tmpl_identify_tbl_type

Line 1275: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE

1271: -- End of comments
1272:
1273: PROCEDURE create_upfront_tax_accounting(
1274: p_api_version IN NUMBER
1275: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
1276: ,p_contract_id IN okc_k_headers_all_b.id%TYPE
1277: ,p_line_id IN okc_k_lines_b.id%TYPE
1278: ,p_transaction_id IN okl_trx_contracts_all.khr_id%TYPE
1279: ,p_transaction_type IN VARCHAR2

Line 1719: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1715:
1716:
1717: PROCEDURE process_update_location(
1718: p_api_version IN NUMBER,
1719: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1720: p_kle_id IN NUMBER,
1721: x_return_status OUT NOCOPY VARCHAR2,
1722: x_msg_count OUT NOCOPY NUMBER,
1723: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 1996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1992: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1993: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from updating in Install Base '||x_return_status);
1994: END IF;
1995:
1996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_ERROR;
2000: END IF;

Line 1997: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1993: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from updating in Install Base '||x_return_status);
1994: END IF;
1995:
1996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_ERROR;
2000: END IF;
2001:

Line 1998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1994: END IF;
1995:
1996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_ERROR;
2000: END IF;
2001:
2002:

Line 1999: RAISE OKC_API.G_EXCEPTION_ERROR;

1995:
1996: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1997: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1998: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1999: RAISE OKC_API.G_EXCEPTION_ERROR;
2000: END IF;
2001:
2002:
2003:

Line 2021: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2017: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2018: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from Tax API '||x_return_status);
2019: END IF;
2020:
2021: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;

Line 2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2018: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from Tax API '||x_return_status);
2019: END IF;
2020:
2021: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;
2026:

Line 2023: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2019: END IF;
2020:
2021: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;
2026:
2027: --Bug# 6619311

Line 2024: RAISE OKC_API.G_EXCEPTION_ERROR;

2020:
2021: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;
2026:
2027: --Bug# 6619311
2028: OKL_BLK_AST_UPD_PVT.create_upfront_tax_accounting(

Line 2044: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2040: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2041: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from create_upfront_tax_accounting API '||x_return_status);
2042: END IF;
2043:
2044: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2045: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2046: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2047: RAISE OKC_API.G_EXCEPTION_ERROR;
2048: END IF;

Line 2045: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2041: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return status from create_upfront_tax_accounting API '||x_return_status);
2042: END IF;
2043:
2044: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2045: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2046: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2047: RAISE OKC_API.G_EXCEPTION_ERROR;
2048: END IF;
2049:

Line 2046: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2042: END IF;
2043:
2044: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2045: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2046: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2047: RAISE OKC_API.G_EXCEPTION_ERROR;
2048: END IF;
2049:
2050: -- 27-May-2008 SECHAWLA 6619311 l_parent_line_id was being passed to

Line 2047: RAISE OKC_API.G_EXCEPTION_ERROR;

2043:
2044: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2045: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2046: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2047: RAISE OKC_API.G_EXCEPTION_ERROR;
2048: END IF;
2049:
2050: -- 27-May-2008 SECHAWLA 6619311 l_parent_line_id was being passed to
2051: -- cursor, but there was no value being assigned to this variable

Line 2071: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2067: x_msg_data => x_msg_data);
2068: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2069: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return Status after creating Tax only invoice' || x_return_status);
2070: END IF;
2071: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2072: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2073: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2074: RAISE OKC_API.G_EXCEPTION_ERROR;
2075: END IF;

Line 2072: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2068: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2069: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return Status after creating Tax only invoice' || x_return_status);
2070: END IF;
2071: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2072: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2073: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2074: RAISE OKC_API.G_EXCEPTION_ERROR;
2075: END IF;
2076: ELSE

Line 2073: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2069: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Return Status after creating Tax only invoice' || x_return_status);
2070: END IF;
2071: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2072: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2073: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2074: RAISE OKC_API.G_EXCEPTION_ERROR;
2075: END IF;
2076: ELSE
2077: OKL_API.set_message( p_app_name => 'OKL',

Line 2074: RAISE OKC_API.G_EXCEPTION_ERROR;

2070: END IF;
2071: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2072: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2073: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2074: RAISE OKC_API.G_EXCEPTION_ERROR;
2075: END IF;
2076: ELSE
2077: OKL_API.set_message( p_app_name => 'OKL',
2078: p_msg_name => 'OKL_ASTLOC_TAX_NOT_BILLED');