eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_AM_ASSET_DISPOSE_PVT dependencies on OKC_API

Line 291: okc_api.set_message(p_app_name => 'OKL',

287: IF l_return_status <> okl_api.g_ret_sts_success
288: THEN
289: -- Error occurred when creating accounting entries for transaction TRX_TYPE.
290: --currency conversion rate was not found in Oracle GL
291: okc_api.set_message(p_app_name => 'OKL',
292: p_msg_name => 'OKL_LLA_CONV_RATE_NOT_FOUND',
293: p_token1 => 'FROM_CURRENCY',
294: p_token1_value => l_contract_currency,
295: p_token2 => 'TO_CURRENCY',

Line 912: p_init_msg_list => OKC_API.G_FALSE,

908: -- rmunjulu EDAT -- Set new parameters with dates ------ end +++++++
909:
910: fa_adjustment_pub.do_adjustment(
911: p_api_version => p_api_version,
912: p_init_msg_list => OKC_API.G_FALSE,
913: p_commit => FND_API.G_FALSE,
914: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
915: p_calling_fn => NULL,
916: x_return_status => x_return_status,

Line 931: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

927: x_asset_deprn_rec_new => l_asset_deprn_rec_new,
928: x_asset_deprn_mrc_tbl_new => l_asset_deprn_mrc_tbl_new,
929: p_group_reclass_options_rec => l_group_reclass_options_rec);
930:
931: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
932:
933: -- Error updating asset cost for asset ASSET_NUMBER in BOOK_CLASS book BOOK.
934: OKC_API.set_message( p_app_name => 'OKL',
935: p_msg_name => 'OKL_AM_ADJ_TRANS_FAILED',

Line 934: OKC_API.set_message( p_app_name => 'OKL',

930:
931: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
932:
933: -- Error updating asset cost for asset ASSET_NUMBER in BOOK_CLASS book BOOK.
934: OKC_API.set_message( p_app_name => 'OKL',
935: p_msg_name => 'OKL_AM_ADJ_TRANS_FAILED',
936: p_token1 => 'ASSET_NUMBER',
937: p_token1_value => p_asset_number,
938: p_token2 => 'BOOK_CLASS',

Line 1019: p_init_msg_list => OKC_API.G_FALSE,

1015:
1016: l_asset_dist_tbl.DELETE;
1017:
1018: FA_RETIREMENT_PUB.do_retirement( p_api_version => p_api_version,
1019: p_init_msg_list => OKC_API.G_FALSE,
1020: p_commit => FND_API.G_FALSE,
1021: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1022: p_calling_fn => NULL,
1023: x_return_status => x_return_status,

Line 1035: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1031: p_subcomp_tbl => l_subcomp_tbl,
1032: p_inv_tbl => l_inv_tbl);
1033:
1034:
1035: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1036:
1037: -- Error retiring asset ASSET_NUMBER in book BOOK. Retirement transaction was not performed for this asset in Fixed Assets.
1038: OKC_API.set_message( p_app_name => 'OKL',
1039: p_msg_name => 'OKL_AM_RET_TRANS_FAILED',

Line 1038: OKC_API.set_message( p_app_name => 'OKL',

1034:
1035: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1036:
1037: -- Error retiring asset ASSET_NUMBER in book BOOK. Retirement transaction was not performed for this asset in Fixed Assets.
1038: OKC_API.set_message( p_app_name => 'OKL',
1039: p_msg_name => 'OKL_AM_RET_TRANS_FAILED',
1040: p_token1 => 'ASSET_NUMBER',
1041: p_token1_value => p_asset_number,
1042: p_token2 => 'BOOK_CLASS',

Line 1200: p_init_msg_list => OKC_API.G_FALSE,

1196: -- rmunjulu EDAT -- Set new parameters with dates ------ end +++++++
1197:
1198: fa_adjustment_pub.do_adjustment(
1199: p_api_version => p_api_version,
1200: p_init_msg_list => OKC_API.G_FALSE,
1201: p_commit => FND_API.G_FALSE,
1202: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1203: p_calling_fn => NULL,
1204: x_return_status => x_return_status,

Line 1219: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1215: x_asset_deprn_rec_new => l_asset_deprn_rec_new,
1216: x_asset_deprn_mrc_tbl_new => l_asset_deprn_mrc_tbl_new,
1217: p_group_reclass_options_rec => l_group_reclass_options_rec);
1218:
1219: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1220:
1221: -- Error updating asset cost for asset ASSET_NUMBER in BOOK_CLASS book BOOK.
1222: OKC_API.set_message( p_app_name => 'OKL',
1223: p_msg_name => 'OKL_AM_ADJ_TRANS_FAILED',

Line 1222: OKC_API.set_message( p_app_name => 'OKL',

1218:
1219: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1220:
1221: -- Error updating asset cost for asset ASSET_NUMBER in BOOK_CLASS book BOOK.
1222: OKC_API.set_message( p_app_name => 'OKL',
1223: p_msg_name => 'OKL_AM_ADJ_TRANS_FAILED',
1224: p_token1 => 'ASSET_NUMBER',
1225: p_token1_value => p_asset_number,
1226: p_token2 => 'BOOK_CLASS',

Line 1302: p_init_msg_list => OKC_API.G_FALSE,

1298:
1299:
1300:
1301: FA_RETIREMENT_PUB.do_retirement( p_api_version => p_api_version,
1302: p_init_msg_list => OKC_API.G_FALSE,
1303: p_commit => FND_API.G_FALSE,
1304: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1305: p_calling_fn => NULL,
1306: x_return_status => x_return_status,

Line 1318: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1314: p_subcomp_tbl => l_subcomp_tbl,
1315: p_inv_tbl => l_inv_tbl);
1316:
1317: -- SECHAWLA Bug # 2701440 : Added this message
1318: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1319: --SECHAWLA 23-DEC-02 Bug # 2701440 : Added BOOK_CLASS token
1320: -- Error retiring asset ASSET_NUMBER in book BOOK. Retirement transaction was not performed for this asset in Fixed Assets.
1321: OKC_API.set_message( p_app_name => 'OKL',
1322: p_msg_name => 'OKL_AM_RET_TRANS_FAILED',

Line 1321: OKC_API.set_message( p_app_name => 'OKL',

1317: -- SECHAWLA Bug # 2701440 : Added this message
1318: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1319: --SECHAWLA 23-DEC-02 Bug # 2701440 : Added BOOK_CLASS token
1320: -- Error retiring asset ASSET_NUMBER in book BOOK. Retirement transaction was not performed for this asset in Fixed Assets.
1321: OKC_API.set_message( p_app_name => 'OKL',
1322: p_msg_name => 'OKL_AM_RET_TRANS_FAILED',
1323: p_token1 => 'ASSET_NUMBER',
1324: p_token1_value => p_asset_number,
1325: p_token2 => 'BOOK_CLASS',

Line 1482: p_init_msg_list => OKC_API.G_FALSE,

1478: -- rmunjulu EDAT -- Set new parameters with dates ------ end +++++++
1479:
1480: fa_adjustment_pub.do_adjustment(
1481: p_api_version => p_api_version,
1482: p_init_msg_list => OKC_API.G_FALSE,
1483: p_commit => FND_API.G_FALSE,
1484: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1485: p_calling_fn => NULL,
1486: x_return_status => x_return_status,

Line 1501: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1497: x_asset_deprn_rec_new => l_asset_deprn_rec_new,
1498: x_asset_deprn_mrc_tbl_new => l_asset_deprn_mrc_tbl_new,
1499: p_group_reclass_options_rec => l_group_reclass_options_rec);
1500:
1501: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1502:
1503: -- Error updating asset cost for asset ASSET_NUMBER in BOOK_CLASS book BOOK.
1504: OKC_API.set_message( p_app_name => 'OKL',
1505: p_msg_name => 'OKL_AM_ADJ_TRANS_FAILED',

Line 1504: OKC_API.set_message( p_app_name => 'OKL',

1500:
1501: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1502:
1503: -- Error updating asset cost for asset ASSET_NUMBER in BOOK_CLASS book BOOK.
1504: OKC_API.set_message( p_app_name => 'OKL',
1505: p_msg_name => 'OKL_AM_ADJ_TRANS_FAILED',
1506: p_token1 => 'ASSET_NUMBER',
1507: p_token1_value => p_asset_number,
1508: p_token2 => 'BOOK_CLASS',

Line 1598: p_init_msg_list => OKC_API.G_FALSE,

1594: END IF;
1595:
1596:
1597: FA_RETIREMENT_PUB.do_retirement( p_api_version => p_api_version,
1598: p_init_msg_list => OKC_API.G_FALSE,
1599: p_commit => FND_API.G_FALSE,
1600: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1601: p_calling_fn => NULL,
1602: x_return_status => x_return_status,

Line 1614: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1610: p_subcomp_tbl => l_subcomp_tbl,
1611: p_inv_tbl => l_inv_tbl);
1612:
1613: -- SECHAWLA Bug # 2701440 : Added this message
1614: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1615:
1616: --SECHAWLA 23-DEC-02 Bug # 2701440 : Added BOOK_CLASS token
1617: -- Error retiring asset ASSET_NUMBER in book BOOK. Retirement transaction was not performed for this asset in Fixed Assets.
1618: OKC_API.set_message( p_app_name => 'OKL',

Line 1618: OKC_API.set_message( p_app_name => 'OKL',

1614: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1615:
1616: --SECHAWLA 23-DEC-02 Bug # 2701440 : Added BOOK_CLASS token
1617: -- Error retiring asset ASSET_NUMBER in book BOOK. Retirement transaction was not performed for this asset in Fixed Assets.
1618: OKC_API.set_message( p_app_name => 'OKL',
1619: p_msg_name => 'OKL_AM_RET_TRANS_FAILED',
1620: p_token1 => 'ASSET_NUMBER',
1621: p_token1_value => p_asset_number,
1622: p_token2 => 'BOOK_CLASS',

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

1885: l_cost NUMBER;
1886: --SECHAWLA 21-NOV-2003 3262519 : end new declarations
1887:
1888:
1889: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1890: l_tsu_code VARCHAR2(30);
1891: l_try_id OKL_TRX_TYPES_V.id%TYPE;
1892: lp_thpv_rec thpv_rec_type;
1893: lp_thpv_empty_rec thpv_rec_type;

Line 1979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1975: p_api_version,
1976: '_PVT',
1977: x_return_status);
1978:
1979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1982: RAISE OKC_API.G_EXCEPTION_ERROR;
1983: END IF;

Line 1980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1976: '_PVT',
1977: x_return_status);
1978:
1979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1982: RAISE OKC_API.G_EXCEPTION_ERROR;
1983: END IF;
1984:

Line 1981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1977: x_return_status);
1978:
1979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1982: RAISE OKC_API.G_EXCEPTION_ERROR;
1983: END IF;
1984:
1985: -- Get the sysdate

Line 1982: RAISE OKC_API.G_EXCEPTION_ERROR;

1978:
1979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1982: RAISE OKC_API.G_EXCEPTION_ERROR;
1983: END IF;
1984:
1985: -- Get the sysdate
1986: SELECT SYSDATE INTO l_sys_date FROM DUAL;

Line 2015: OKC_API.set_message( p_app_name => 'OKC',

2011:
2012: IF p_financial_asset_id IS NULL OR p_financial_asset_id = OKL_API.G_MISS_NUM THEN
2013: x_return_status := OKL_API.G_RET_STS_ERROR;
2014: -- Finacial Asset id is a required parameter
2015: OKC_API.set_message( p_app_name => 'OKC',
2016: p_msg_name => G_REQUIRED_VALUE,
2017: p_token1 => G_COL_NAME_TOKEN,
2018: p_token1_value => 'FINANCIAL_ASSET_ID');
2019:

Line 2021: RAISE OKC_API.G_EXCEPTION_ERROR;

2017: p_token1 => G_COL_NAME_TOKEN,
2018: p_token1_value => 'FINANCIAL_ASSET_ID');
2019:
2020:
2021: RAISE OKC_API.G_EXCEPTION_ERROR;
2022: END IF;
2023:
2024: -- RRAVIKIR Legal Entity Changes
2025: IF (p_legal_entity_id is null or p_legal_entity_id = OKC_API.G_MISS_NUM) THEN

Line 2025: IF (p_legal_entity_id is null or p_legal_entity_id = OKC_API.G_MISS_NUM) THEN

2021: RAISE OKC_API.G_EXCEPTION_ERROR;
2022: END IF;
2023:
2024: -- RRAVIKIR Legal Entity Changes
2025: IF (p_legal_entity_id is null or p_legal_entity_id = OKC_API.G_MISS_NUM) THEN
2026: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
2027: p_msg_name => g_required_value,
2028: p_token1 => g_col_name_token,
2029: p_token1_value => 'legal_entity_id');

Line 2030: RAISE OKC_API.G_EXCEPTION_ERROR;

2026: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
2027: p_msg_name => g_required_value,
2028: p_token1 => g_col_name_token,
2029: p_token1_value => 'legal_entity_id');
2030: RAISE OKC_API.G_EXCEPTION_ERROR;
2031: END IF;
2032: -- Legal Entity Changes End
2033:
2034: --SECHAWLA 21-NOV-2003 3262519 : Added the following validation

Line 2040: OKC_API.set_message( p_app_name => 'OKC',

2036: FETCH l_okclines_csr INTO l_dummy;
2037: IF l_okclines_csr%NOTFOUND THEN
2038: x_return_status := OKL_API.G_RET_STS_ERROR;
2039: -- Finacial Asset id is invalid
2040: OKC_API.set_message( p_app_name => 'OKC',
2041: p_msg_name => G_INVALID_VALUE,
2042: p_token1 => G_COL_NAME_TOKEN,
2043: p_token1_value => 'FINANCIAL_ASSET_ID');
2044:

Line 2045: RAISE OKC_API.G_EXCEPTION_ERROR;

2041: p_msg_name => G_INVALID_VALUE,
2042: p_token1 => G_COL_NAME_TOKEN,
2043: p_token1_value => 'FINANCIAL_ASSET_ID');
2044:
2045: RAISE OKC_API.G_EXCEPTION_ERROR;
2046: END IF;
2047: CLOSE l_okclines_csr;
2048: --SECHAWLA 21-NOV-2003 3262519 : end
2049:

Line 2059: OKC_API.set_message( p_app_name => 'OKC',

2055: l_proceeds_of_sale := 0;
2056: /*
2057: x_return_status := OKL_API.G_RET_STS_ERROR;
2058: -- proceeds_of_sale is required
2059: OKC_API.set_message( p_app_name => 'OKC',
2060: p_msg_name => G_REQUIRED_VALUE,
2061: p_token1 => G_COL_NAME_TOKEN,
2062: p_token1_value => 'PROCEEDS_OF_SALE');
2063:

Line 2065: RAISE OKC_API.G_EXCEPTION_ERROR;

2061: p_token1 => G_COL_NAME_TOKEN,
2062: p_token1_value => 'PROCEEDS_OF_SALE');
2063:
2064:
2065: RAISE OKC_API.G_EXCEPTION_ERROR;
2066: */
2067: END IF;
2068:
2069: -- SECHAWLA 11-MAR-03 : Allow negative amount

Line 2074: OKC_API.set_message( p_app_name => 'OKC',

2070: /*
2071: IF p_proceeds_of_sale < 0 THEN
2072: x_return_status := OKL_API.G_RET_STS_ERROR;
2073: -- proceeds_of_sale is invalid
2074: OKC_API.set_message( p_app_name => 'OKC',
2075: p_msg_name => G_INVALID_VALUE,
2076: p_token1 => G_COL_NAME_TOKEN,
2077: p_token1_value => 'PROCEEDS_OF_SALE');
2078:

Line 2080: RAISE OKC_API.G_EXCEPTION_ERROR;

2076: p_token1 => G_COL_NAME_TOKEN,
2077: p_token1_value => 'PROCEEDS_OF_SALE');
2078:
2079:
2080: RAISE OKC_API.G_EXCEPTION_ERROR;
2081: END IF;
2082: */
2083:
2084: IF p_quantity IS NOT NULL THEN

Line 2088: OKC_API.set_message( p_app_name => 'OKC',

2084: IF p_quantity IS NOT NULL THEN
2085: IF p_quantity < 0 THEN
2086: x_return_status := OKL_API.G_RET_STS_ERROR;
2087: -- Quantity is invalid
2088: OKC_API.set_message( p_app_name => 'OKC',
2089: p_msg_name => G_INVALID_VALUE,
2090: p_token1 => G_COL_NAME_TOKEN,
2091: p_token1_value => 'QUANTITY');
2092:

Line 2094: RAISE OKC_API.G_EXCEPTION_ERROR;

2090: p_token1 => G_COL_NAME_TOKEN,
2091: p_token1_value => 'QUANTITY');
2092:
2093:
2094: RAISE OKC_API.G_EXCEPTION_ERROR;
2095: END IF;
2096: IF trunc(p_quantity) <> p_quantity THEN
2097: x_return_status := OKL_API.G_RET_STS_ERROR;
2098: -- Units retired should be a whole number.

Line 2099: OKC_API.set_message( p_app_name => 'OKL',

2095: END IF;
2096: IF trunc(p_quantity) <> p_quantity THEN
2097: x_return_status := OKL_API.G_RET_STS_ERROR;
2098: -- Units retired should be a whole number.
2099: OKC_API.set_message( p_app_name => 'OKL',
2100: p_msg_name => 'OKL_AM_WHOLE_UNITS_ERR');
2101: RAISE OKC_API.G_EXCEPTION_ERROR;
2102: END IF;
2103: END IF;

Line 2101: RAISE OKC_API.G_EXCEPTION_ERROR;

2097: x_return_status := OKL_API.G_RET_STS_ERROR;
2098: -- Units retired should be a whole number.
2099: OKC_API.set_message( p_app_name => 'OKL',
2100: p_msg_name => 'OKL_AM_WHOLE_UNITS_ERR');
2101: RAISE OKC_API.G_EXCEPTION_ERROR;
2102: END IF;
2103: END IF;
2104:
2105: --SECHAWLA 21-NOV-2003 3262519 : Added the following code to get the deal type and tax owner

Line 2113: OKC_API.set_message( p_app_name => 'OKC',

2109: FETCH l_dealtype_csr INTO l_chr_id, l_deal_type, l_contract_number;
2110: IF l_dealtype_csr%NOTFOUND THEN
2111: x_return_status := OKL_API.G_RET_STS_ERROR;
2112: -- chr id is invalid
2113: OKC_API.set_message( p_app_name => 'OKC',
2114: p_msg_name => G_INVALID_VALUE,
2115: p_token1 => G_COL_NAME_TOKEN,
2116: p_token1_value => 'CHR_ID');
2117:

Line 2118: RAISE OKC_API.G_EXCEPTION_ERROR;

2114: p_msg_name => G_INVALID_VALUE,
2115: p_token1 => G_COL_NAME_TOKEN,
2116: p_token1_value => 'CHR_ID');
2117:
2118: RAISE OKC_API.G_EXCEPTION_ERROR;
2119: END IF;
2120: CLOSE l_dealtype_csr;
2121:
2122: IF l_deal_type IN ('LEASEDF','LEASEST') THEN

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

2130: ,x_return_status => x_return_status
2131: ,x_msg_count => x_msg_count
2132: ,x_msg_data => x_msg_data);
2133:
2134: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2135: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2136: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2137: RAISE OKC_API.G_EXCEPTION_ERROR;
2138: END IF;

Line 2135: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2131: ,x_msg_count => x_msg_count
2132: ,x_msg_data => x_msg_data);
2133:
2134: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2135: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2136: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2137: RAISE OKC_API.G_EXCEPTION_ERROR;
2138: END IF;
2139:

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

2132: ,x_msg_data => x_msg_data);
2133:
2134: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2135: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2136: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2137: RAISE OKC_API.G_EXCEPTION_ERROR;
2138: END IF;
2139:
2140: -- check if tax owner is defined

Line 2137: RAISE OKC_API.G_EXCEPTION_ERROR;

2133:
2134: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2135: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2136: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2137: RAISE OKC_API.G_EXCEPTION_ERROR;
2138: END IF;
2139:
2140: -- check if tax owner is defined
2141: IF l_rulv_rec.rule_information1 IS NULL OR l_rulv_rec.rule_information1 = OKL_API.G_MISS_CHAR THEN

Line 2149: RAISE OKC_API.G_EXCEPTION_ERROR;

2145: OKL_API.set_message( p_app_name => 'OKL',
2146: p_msg_name => 'OKL_AM_NO_TAX_OWNER',
2147: p_token1 => 'CONTRACT_NUMBER',
2148: p_token1_value => l_contract_number);
2149: RAISE OKC_API.G_EXCEPTION_ERROR;
2150:
2151: ELSE
2152: -- l_rulv_rec.RULE_INFORMATION1 will contain the value 'LESSEE' or 'LESSOR'
2153: l_tax_owner := l_rulv_rec.RULE_INFORMATION1;

Line 2164: OKC_API.set_message( p_app_name => 'OKL',

2160:
2161: IF l_residual_value IS NULL THEN
2162: x_return_status := OKL_API.G_RET_STS_ERROR;
2163: -- Residual value is not defined for the asset
2164: OKC_API.set_message( p_app_name => 'OKL',
2165: p_msg_name => 'OKL_AM_NO_RESIDUAL_VALUE',
2166: p_token1 => 'ASSET_NUMBER',
2167: p_token1_value => l_name);
2168:

Line 2170: RAISE OKC_API.G_EXCEPTION_ERROR;

2166: p_token1 => 'ASSET_NUMBER',
2167: p_token1_value => l_name);
2168:
2169:
2170: RAISE OKC_API.G_EXCEPTION_ERROR;
2171: END IF;
2172:
2173: -- rbruno 5436987 -- start
2174: l_contract_currency_code := OKL_AM_UTIL_PVT.get_chr_currency(l_chr_id);

Line 2202: OKC_API.set_message( p_app_name => 'OKL',

2198:
2199: IF l_residual_value < 0 THEN
2200: x_return_status := OKL_API.G_RET_STS_ERROR;
2201: -- Residual value is negative for the asset
2202: OKC_API.set_message( p_app_name => 'OKL',
2203: p_msg_name => 'OKL_AM_INVALID_RESIDUAL',
2204: p_token1 => 'ASSET_NUMBER',
2205: p_token1_value => l_name);
2206:

Line 2208: RAISE OKC_API.G_EXCEPTION_ERROR;

2204: p_token1 => 'ASSET_NUMBER',
2205: p_token1_value => l_name);
2206:
2207:
2208: RAISE OKC_API.G_EXCEPTION_ERROR;
2209: END IF;
2210: END IF;
2211:
2212:

Line 2248: RAISE OKC_API.G_EXCEPTION_ERROR;

2244: p_token1 => 'ASSET_NUMBER',
2245: p_token1_value => l_name);
2246:
2247:
2248: RAISE OKC_API.G_EXCEPTION_ERROR;
2249:
2250:
2251: ELSIF l_trx_status IN ( 'PROCESSED','CANCELED') THEN
2252: l_delta_cost := 0; -- no cost update required, as cost has already been updated thru off lease trx

Line 2271: OKC_API.set_message( p_app_name => 'OKC',

2267: FETCH l_bookcontrols_csr INTO l_fiscal_year_name;
2268: IF l_bookcontrols_csr%NOTFOUND OR l_fiscal_year_name IS NULL THEN
2269: x_return_status := OKL_API.G_RET_STS_ERROR;
2270: -- Fiscal Year Name is required
2271: OKC_API.set_message( p_app_name => 'OKC',
2272: p_msg_name => G_REQUIRED_VALUE,
2273: p_token1 => G_COL_NAME_TOKEN,
2274: p_token1_value => 'Fiscal Year Name');
2275:

Line 2277: RAISE OKC_API.G_EXCEPTION_ERROR;

2273: p_token1 => G_COL_NAME_TOKEN,
2274: p_token1_value => 'Fiscal Year Name');
2275:
2276:
2277: RAISE OKC_API.G_EXCEPTION_ERROR;
2278: END IF;
2279: CLOSE l_bookcontrols_csr;
2280: fa_cache_pkg.fazcbc_record.fiscal_year_name := l_fiscal_year_name;
2281: -- END IF;

Line 2291: x_return_status := OKC_API.G_RET_STS_ERROR;

2287: p_effective_date => NULL,
2288: x_period_rec => l_period_rec
2289: ) THEN
2290:
2291: x_return_status := OKC_API.G_RET_STS_ERROR;
2292: --Error getting current open period for the book BOOK_TYPE_CODE.
2293: OKL_API.set_message(
2294: p_app_name => 'OKL',
2295: p_msg_name => 'OKL_AM_OPEN_PERIOD_ERR',

Line 2303: RAISE OKC_API.G_EXCEPTION_ERROR;

2299: p_token2_value => l_okxassetlines_rec.book_type_code
2300: );
2301:
2302:
2303: RAISE OKC_API.G_EXCEPTION_ERROR;
2304: END IF;
2305:
2306: --- check period of addition. If 'N' then run retirements
2307: OPEN l_periodofaddition_csr(l_okxassetlines_rec.asset_id, l_okxassetlines_rec.book_type_code,l_period_rec.period_open_date);

Line 2323: x_return_status := OKC_API.G_RET_STS_ERROR;

2319:
2320: IF l_period_of_addition = 'Y' THEN
2321: -- Can nor retire asset ASSET_NUMBER as the asset was added to the book
2322: -- in the current open period. Please retire the asset manually.
2323: x_return_status := OKC_API.G_RET_STS_ERROR;
2324:
2325: OKL_API.set_message( p_app_name => 'OKL',
2326: p_msg_name => 'OKL_AM_RETIRE_MANUALLY',
2327: p_token1 => 'ASSET_NUMBER',

Line 2334: RAISE OKC_API.G_EXCEPTION_ERROR;

2330: p_token2_value => lower(l_okxassetlines_rec.book_class),
2331: p_token3 => 'BOOK_TYPE_CODE',
2332: p_token3_value => l_okxassetlines_rec.book_type_code);
2333:
2334: RAISE OKC_API.G_EXCEPTION_ERROR;
2335:
2336: END IF;
2337: */ -- bug 13581587.
2338:

Line 2344: OKC_API.set_message( p_app_name => 'OKL',

2340: -- SECHAWLA 03-JUN-03 Bug 2999419: Added the following validation
2341: IF l_okxassetlines_rec.prorate_convention_code IS NULL THEN
2342: x_return_status := OKL_API.G_RET_STS_ERROR;
2343: -- Unable to find retirement prorate convention for asset ASSET_NUMBER and book BOOK_TYPE_CODE.
2344: OKC_API.set_message( p_app_name => 'OKL',
2345: p_msg_name => 'OKL_AM_NO_PRORATE_CONVENTION',
2346: p_token1 => 'ASSET_NUMBER',
2347: p_token1_value => l_okxassetlines_rec.asset_number,
2348: p_token2 => 'BOOK_CLASS',

Line 2352: RAISE OKC_API.G_EXCEPTION_ERROR;

2348: p_token2 => 'BOOK_CLASS',
2349: p_token2_value => l_okxassetlines_rec.book_class,
2350: p_token3 => 'BOOK_TYPE_CODE',
2351: p_token3_value => l_okxassetlines_rec.book_type_code);
2352: RAISE OKC_API.G_EXCEPTION_ERROR;
2353: END IF;
2354: -- SECHAWLA 03-JUN-03 Bug 2999419 : end new code
2355: */ -- ansethur for bug 5655545 - end
2356:

Line 2400: p_init_msg_list => OKC_API.G_FALSE,

2396:
2397:
2398: do_full_units_retirement(
2399: p_api_version => p_api_version,
2400: p_init_msg_list => OKC_API.G_FALSE,
2401: p_tax_owner => l_tax_owner,
2402: p_delta_cost => l_delta_cost,
2403: p_asset_id => l_okxassetlines_rec.asset_id,
2404: p_asset_number => l_okxassetlines_rec.asset_number,

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

2415: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2416: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2417:
2418:
2419: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2420: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2421: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2422: RAISE OKC_API.G_EXCEPTION_ERROR;
2423: END IF;

Line 2420: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2416: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2417:
2418:
2419: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2420: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2421: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2422: RAISE OKC_API.G_EXCEPTION_ERROR;
2423: END IF;
2424:

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

2417:
2418:
2419: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2420: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2421: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2422: RAISE OKC_API.G_EXCEPTION_ERROR;
2423: END IF;
2424:
2425: l_units_retired := l_okxassetlines_rec.current_units;

Line 2422: RAISE OKC_API.G_EXCEPTION_ERROR;

2418:
2419: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2420: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2421: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2422: RAISE OKC_API.G_EXCEPTION_ERROR;
2423: END IF;
2424:
2425: l_units_retired := l_okxassetlines_rec.current_units;
2426: ELSE

Line 2472: OKC_API.set_message( p_app_name => 'OKL',

2468:
2469: IF l_dist_quantity > 0 THEN -- quantity to be retired (for non-retired distributions)
2470: -- x_return_status := OKL_API.G_RET_STS_ERROR;
2471: -- Sold quantity is more than the total quantity assigned to asset distributions.
2472: OKC_API.set_message( p_app_name => 'OKL',
2473: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
2474: --RAISE okc_api.G_EXCEPTION_ERROR;
2475: END IF;
2476:

Line 2474: --RAISE okc_api.G_EXCEPTION_ERROR;

2470: -- x_return_status := OKL_API.G_RET_STS_ERROR;
2471: -- Sold quantity is more than the total quantity assigned to asset distributions.
2472: OKC_API.set_message( p_app_name => 'OKL',
2473: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
2474: --RAISE okc_api.G_EXCEPTION_ERROR;
2475: END IF;
2476:
2477: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameters to the following procedure call
2478:

Line 2482: p_init_msg_list => OKC_API.G_FALSE,

2478:
2479:
2480: do_partial_units_retirement(
2481: p_api_version => p_api_version,
2482: p_init_msg_list => OKC_API.G_FALSE,
2483: p_tax_owner => l_tax_owner,
2484: p_delta_cost => l_delta_cost,
2485: p_asset_id => l_okxassetlines_rec.asset_id,
2486: p_asset_number => l_okxassetlines_rec.asset_number,

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

2497: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2498: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2499:
2500:
2501: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2502: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2503: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2504: RAISE OKC_API.G_EXCEPTION_ERROR;
2505: END IF;

Line 2502: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2498: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2499:
2500:
2501: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2502: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2503: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2504: RAISE OKC_API.G_EXCEPTION_ERROR;
2505: END IF;
2506:

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

2499:
2500:
2501: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2502: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2503: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2504: RAISE OKC_API.G_EXCEPTION_ERROR;
2505: END IF;
2506:
2507: l_units_retired := l_units_to_be_retired ;

Line 2504: RAISE OKC_API.G_EXCEPTION_ERROR;

2500:
2501: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2502: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2503: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2504: RAISE OKC_API.G_EXCEPTION_ERROR;
2505: END IF;
2506:
2507: l_units_retired := l_units_to_be_retired ;
2508: END IF; --l_non_retired_quantity = l_quantity

Line 2513: OKC_API.set_message( p_app_name => 'OKL',

2509:
2510:
2511: ELSIF l_retired_quantity = l_okxassetlines_rec.current_units AND l_non_retired_quantity = 0 THEN -- retired qty = current units
2512: -- Asset is already fully retired.
2513: OKC_API.set_message( p_app_name => 'OKL',
2514: p_msg_name => 'OKL_AM_ALREADY_RETIRED',
2515: p_token1 => 'ASSET_NUMBER',
2516: p_token1_value => l_okxassetlines_rec.asset_number);
2517: l_already_retired := 'Y';

Line 2558: p_init_msg_list => OKC_API.G_FALSE,

2554:
2555: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameter to the following procedure call
2556: do_partial_units_retirement(
2557: p_api_version => p_api_version,
2558: p_init_msg_list => OKC_API.G_FALSE,
2559: p_tax_owner => l_tax_owner,
2560: p_delta_cost => l_delta_cost,
2561: p_asset_id => l_okxassetlines_rec.asset_id,
2562: p_asset_number => l_okxassetlines_rec.asset_number,

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

2573: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2574: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2575:
2576:
2577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2580: RAISE OKC_API.G_EXCEPTION_ERROR;
2581: END IF;

Line 2578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2574: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2575:
2576:
2577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2580: RAISE OKC_API.G_EXCEPTION_ERROR;
2581: END IF;
2582:

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

2575:
2576:
2577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2580: RAISE OKC_API.G_EXCEPTION_ERROR;
2581: END IF;
2582:
2583: l_units_retired := l_units_to_be_retired;

Line 2580: RAISE OKC_API.G_EXCEPTION_ERROR;

2576:
2577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2580: RAISE OKC_API.G_EXCEPTION_ERROR;
2581: END IF;
2582:
2583: l_units_retired := l_units_to_be_retired;
2584: ELSIF l_retired_quantity > l_okxassetlines_rec.current_units AND l_non_retired_quantity = 0 THEN

Line 2587: OKC_API.set_message( p_app_name => 'OKL',

2583: l_units_retired := l_units_to_be_retired;
2584: ELSIF l_retired_quantity > l_okxassetlines_rec.current_units AND l_non_retired_quantity = 0 THEN
2585: -- x_return_status := OKL_API.G_RET_STS_ERROR;
2586: -- Asset ASSET_NUMBER is already retired with invalid retired quantity which is more than the original quantity.
2587: OKC_API.set_message( p_app_name => 'OKL',
2588: p_msg_name => 'OKL_AM_INVALID_RETIRED_QTY',
2589: p_token1 => 'ASSET_NUMBER',
2590: p_token1_value => l_okxassetlines_rec.asset_number);
2591: -- RAISE okc_api.G_EXCEPTION_ERROR;

Line 2591: -- RAISE okc_api.G_EXCEPTION_ERROR;

2587: OKC_API.set_message( p_app_name => 'OKL',
2588: p_msg_name => 'OKL_AM_INVALID_RETIRED_QTY',
2589: p_token1 => 'ASSET_NUMBER',
2590: p_token1_value => l_okxassetlines_rec.asset_number);
2591: -- RAISE okc_api.G_EXCEPTION_ERROR;
2592:
2593: ELSIF l_retired_quantity < l_okxassetlines_rec.current_units AND l_non_retired_quantity > 0 THEN
2594:
2595:

Line 2639: OKC_API.set_message( p_app_name => 'OKL',

2635: IF l_dist_quantity > 0 THEN
2636: IF l_retired_quantity < l_dist_quantity THEN
2637: -- x_return_status := OKL_API.G_RET_STS_ERROR;
2638: -- Sold quantity is more than the total quantity assigned to asset distributions.
2639: OKC_API.set_message( p_app_name => 'OKL',
2640: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
2641: -- RAISE okc_api.G_EXCEPTION_ERROR;
2642: END IF;
2643: END IF;

Line 2641: -- RAISE okc_api.G_EXCEPTION_ERROR;

2637: -- x_return_status := OKL_API.G_RET_STS_ERROR;
2638: -- Sold quantity is more than the total quantity assigned to asset distributions.
2639: OKC_API.set_message( p_app_name => 'OKL',
2640: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
2641: -- RAISE okc_api.G_EXCEPTION_ERROR;
2642: END IF;
2643: END IF;
2644:
2645: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameter to the following procedure call

Line 2648: p_init_msg_list => OKC_API.G_FALSE,

2644:
2645: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameter to the following procedure call
2646: do_partial_units_retirement(
2647: p_api_version => p_api_version,
2648: p_init_msg_list => OKC_API.G_FALSE,
2649: p_tax_owner => l_tax_owner,
2650: p_delta_cost => l_delta_cost,
2651: p_asset_id => l_okxassetlines_rec.asset_id,
2652: p_asset_number => l_okxassetlines_rec.asset_number,

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

2662: x_return_status => x_return_status,
2663: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2664: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2665:
2666: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2667: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2668: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2669: RAISE OKC_API.G_EXCEPTION_ERROR;
2670: END IF;

Line 2667: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2663: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2664: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2665:
2666: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2667: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2668: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2669: RAISE OKC_API.G_EXCEPTION_ERROR;
2670: END IF;
2671:

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

2664: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2665:
2666: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2667: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2668: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2669: RAISE OKC_API.G_EXCEPTION_ERROR;
2670: END IF;
2671:
2672: l_units_retired := l_units_to_be_retired;

Line 2669: RAISE OKC_API.G_EXCEPTION_ERROR;

2665:
2666: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2667: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2668: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2669: RAISE OKC_API.G_EXCEPTION_ERROR;
2670: END IF;
2671:
2672: l_units_retired := l_units_to_be_retired;
2673:

Line 2696: p_init_msg_list => OKC_API.G_FALSE,

2692:
2693: -- SECHAWLA 21-nov-03 3262519 Added tax owner and delta cost parameters
2694: do_cost_retirement(
2695: p_api_version => p_api_version,
2696: p_init_msg_list => OKC_API.G_FALSE,
2697: p_tax_owner => l_tax_owner,
2698: p_delta_cost => l_delta_cost,
2699: p_asset_id => l_okxassetlines_rec.asset_id,
2700: p_asset_number => l_okxassetlines_rec.asset_number,

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

2711: x_return_status => x_return_status,
2712: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2713: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2714:
2715: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2717: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2718: RAISE OKC_API.G_EXCEPTION_ERROR;
2719: END IF;

Line 2716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2712: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2713: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2714:
2715: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2717: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2718: RAISE OKC_API.G_EXCEPTION_ERROR;
2719: END IF;
2720: END IF;

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

2713: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2714:
2715: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2717: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2718: RAISE OKC_API.G_EXCEPTION_ERROR;
2719: END IF;
2720: END IF;
2721: -- SECHAWLA 23-DEC-02 Bug # 2701440 : end new code

Line 2718: RAISE OKC_API.G_EXCEPTION_ERROR;

2714:
2715: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2716: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2717: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2718: RAISE OKC_API.G_EXCEPTION_ERROR;
2719: END IF;
2720: END IF;
2721: -- SECHAWLA 23-DEC-02 Bug # 2701440 : end new code
2722: END IF;

Line 2779: OKC_API.set_message( p_app_name => 'OKL',

2775: IF l_dist_quantity > 0 THEN -- quantity to be retired (for non-retired distributions)
2776:
2777: IF l_retired_dist_units < l_dist_quantity THEN -- retired quantity isn't enough to match up with total qty
2778: -- Sold quantity is more than the total quantity assigned to asset distributions.
2779: OKC_API.set_message( p_app_name => 'OKL',
2780: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
2781: END IF;
2782: l_units_to_be_retired := p_quantity - l_dist_quantity;
2783: ELSE

Line 2791: p_init_msg_list => OKC_API.G_FALSE,

2787: IF l_dist_tbl.COUNT > 0 THEN
2788: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameter to the following procedure call
2789: do_partial_units_retirement(
2790: p_api_version => p_api_version,
2791: p_init_msg_list => OKC_API.G_FALSE,
2792: p_tax_owner => l_tax_owner,
2793: p_delta_cost => l_delta_cost,
2794: p_asset_id => l_okxassetlines_rec.asset_id,
2795: p_asset_number => l_okxassetlines_rec.asset_number,

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

2805: x_return_status => x_return_status,
2806: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2807: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2808:
2809: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2810: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2812: RAISE OKC_API.G_EXCEPTION_ERROR;
2813: END IF;

Line 2810: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2806: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2807: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2808:
2809: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2810: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2812: RAISE OKC_API.G_EXCEPTION_ERROR;
2813: END IF;
2814:

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

2807: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2808:
2809: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2810: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2812: RAISE OKC_API.G_EXCEPTION_ERROR;
2813: END IF;
2814:
2815:

Line 2812: RAISE OKC_API.G_EXCEPTION_ERROR;

2808:
2809: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2810: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2812: RAISE OKC_API.G_EXCEPTION_ERROR;
2813: END IF;
2814:
2815:
2816: /* SECHAWLA 21-NOV-03 3262519 : This fetch is not required. Cost to be retired from the tax book should be

Line 2868: p_init_msg_list => OKC_API.G_FALSE,

2864:
2865:
2866: do_cost_retirement(
2867: p_api_version => p_api_version,
2868: p_init_msg_list => OKC_API.G_FALSE,
2869: p_tax_owner => l_tax_owner,
2870: p_delta_cost => l_delta_cost,
2871: p_asset_id => l_okxassetlines_rec.asset_id,
2872: p_asset_number => l_okxassetlines_rec.asset_number,

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

2880: x_return_status => x_return_status,
2881: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2882: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2883:
2884: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2885: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2886: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2887: RAISE OKC_API.G_EXCEPTION_ERROR;
2888: END IF;

Line 2885: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2881: p_quote_eff_date => l_quote_eff_date, -- rmunjulu EDAT 10-Jan-2005
2882: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2883:
2884: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2885: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2886: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2887: RAISE OKC_API.G_EXCEPTION_ERROR;
2888: END IF;
2889: -- SECHAWLA 13-JAN-03 Bug # 2701440 : If the tax book's cost is less than the cost retierd from the corp book

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

2882: p_quote_accpt_date => l_quote_accpt_date ); -- rmunjulu EDAT 10-Jan-2005
2883:
2884: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2885: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2886: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2887: RAISE OKC_API.G_EXCEPTION_ERROR;
2888: END IF;
2889: -- SECHAWLA 13-JAN-03 Bug # 2701440 : If the tax book's cost is less than the cost retierd from the corp book
2890: -- but has not been fully retired yet, then perform a full cost retirement for tax book

Line 2887: RAISE OKC_API.G_EXCEPTION_ERROR;

2883:
2884: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2885: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2886: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2887: RAISE OKC_API.G_EXCEPTION_ERROR;
2888: END IF;
2889: -- SECHAWLA 13-JAN-03 Bug # 2701440 : If the tax book's cost is less than the cost retierd from the corp book
2890: -- but has not been fully retired yet, then perform a full cost retirement for tax book
2891:

Line 2901: p_init_msg_list => OKC_API.G_FALSE,

2897:
2898: -- SECHAWLA 21-nov-03 3262519 Added tax owner and delta cost parameters
2899: do_cost_retirement(
2900: p_api_version => p_api_version,
2901: p_init_msg_list => OKC_API.G_FALSE,
2902: p_tax_owner => l_tax_owner,
2903: p_delta_cost => l_delta_cost,
2904: p_asset_id => l_okxassetlines_rec.asset_id,
2905: p_asset_number => l_okxassetlines_rec.asset_number,

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

2911: x_msg_count => x_msg_count,
2912: x_msg_data => x_msg_data,
2913: x_return_status => x_return_status);
2914:
2915: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2917: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2918: RAISE OKC_API.G_EXCEPTION_ERROR;
2919: END IF;

Line 2916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2912: x_msg_data => x_msg_data,
2913: x_return_status => x_return_status);
2914:
2915: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2917: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2918: RAISE OKC_API.G_EXCEPTION_ERROR;
2919: END IF;
2920: */

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

2913: x_return_status => x_return_status);
2914:
2915: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2917: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2918: RAISE OKC_API.G_EXCEPTION_ERROR;
2919: END IF;
2920: */
2921: END IF;

Line 2918: RAISE OKC_API.G_EXCEPTION_ERROR;

2914:
2915: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2917: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2918: RAISE OKC_API.G_EXCEPTION_ERROR;
2919: END IF;
2920: */
2921: END IF;
2922:

Line 2946: RAISE OKC_API.G_EXCEPTION_ERROR;

2942: OKL_API.set_message(p_app_name => 'OKL',
2943: p_msg_name => 'OKL_AM_NO_TRX_TYPE_FOUND',
2944: p_token1 => 'TRY_NAME',
2945: p_token1_value => 'Asset Disposition');
2946: RAISE OKC_API.G_EXCEPTION_ERROR;
2947: END IF;
2948:
2949:
2950: lp_thpv_rec.tas_type := 'RFA';

Line 2960: p_init_msg_list => OKC_API.G_FALSE,

2956: lp_thpv_rec.legal_entity_id := p_legal_entity_id;
2957: -- Legal Entity Changes End
2958:
2959: OKL_TRX_ASSETS_PUB.create_trx_ass_h_def( p_api_version => p_api_version,
2960: p_init_msg_list => OKC_API.G_FALSE,
2961: x_return_status => x_return_status,
2962: x_msg_count => x_msg_count,
2963: x_msg_data => x_msg_data,
2964: p_thpv_rec => lp_thpv_rec,

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

2963: x_msg_data => x_msg_data,
2964: p_thpv_rec => lp_thpv_rec,
2965: x_thpv_rec => lx_thpv_rec);
2966:
2967: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2969: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2970: RAISE OKC_API.G_EXCEPTION_ERROR;
2971: END IF;

Line 2968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2964: p_thpv_rec => lp_thpv_rec,
2965: x_thpv_rec => lx_thpv_rec);
2966:
2967: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2969: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2970: RAISE OKC_API.G_EXCEPTION_ERROR;
2971: END IF;
2972:

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

2965: x_thpv_rec => lx_thpv_rec);
2966:
2967: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2969: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2970: RAISE OKC_API.G_EXCEPTION_ERROR;
2971: END IF;
2972:
2973: --SECHAWLA 03-JAN-03 2683876 Pass the currency code if creating/updating amounts in txl assets

Line 2970: RAISE OKC_API.G_EXCEPTION_ERROR;

2966:
2967: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2969: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2970: RAISE OKC_API.G_EXCEPTION_ERROR;
2971: END IF;
2972:
2973: --SECHAWLA 03-JAN-03 2683876 Pass the currency code if creating/updating amounts in txl assets
2974: l_func_curr_code := okl_am_util_pvt.get_functional_currency;

Line 3023: p_init_msg_list => OKC_API.G_FALSE,

3019: -- SECHAWLA 15-DEC-04 4028371 : set FA date on trx line
3020: lp_tlpv_rec.FA_TRX_DATE := l_fa_trx_date;
3021:
3022: OKL_TXL_ASSETS_PUB.create_txl_asset_def(p_api_version => p_api_version,
3023: p_init_msg_list => OKC_API.G_FALSE,
3024: x_return_status => x_return_status,
3025: x_msg_count => x_msg_count,
3026: x_msg_data => x_msg_data,
3027: p_tlpv_rec => lp_tlpv_rec,

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

3026: x_msg_data => x_msg_data,
3027: p_tlpv_rec => lp_tlpv_rec,
3028: x_tlpv_rec => lx_tlpv_rec);
3029:
3030: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3031: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3032: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3033: RAISE OKC_API.G_EXCEPTION_ERROR;
3034: END IF;

Line 3031: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3027: p_tlpv_rec => lp_tlpv_rec,
3028: x_tlpv_rec => lx_tlpv_rec);
3029:
3030: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3031: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3032: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3033: RAISE OKC_API.G_EXCEPTION_ERROR;
3034: END IF;
3035:

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

3028: x_tlpv_rec => lx_tlpv_rec);
3029:
3030: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3031: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3032: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3033: RAISE OKC_API.G_EXCEPTION_ERROR;
3034: END IF;
3035:
3036: -----------------end Store Transaction in OKL -----------------

Line 3033: RAISE OKC_API.G_EXCEPTION_ERROR;

3029:
3030: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3031: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3032: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3033: RAISE OKC_API.G_EXCEPTION_ERROR;
3034: END IF;
3035:
3036: -----------------end Store Transaction in OKL -----------------
3037:

Line 3041: p_init_msg_list => OKC_API.G_FALSE,

3037:
3038: -- make call to accounting entries
3039: process_accounting_entries(
3040: p_api_version => p_api_version,
3041: p_init_msg_list => OKC_API.G_FALSE,
3042: x_return_status => x_return_status,
3043: x_msg_count => x_msg_count,
3044: x_msg_data => x_msg_data,
3045: p_kle_id => p_financial_asset_id,

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

3055: --akrangan end
3056: );
3057:
3058: -- rollback if error in accounting entries
3059: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3061: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3062: RAISE OKC_API.G_EXCEPTION_ERROR;
3063: END IF;

Line 3060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3056: );
3057:
3058: -- rollback if error in accounting entries
3059: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3061: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3062: RAISE OKC_API.G_EXCEPTION_ERROR;
3063: END IF;
3064:

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

3057:
3058: -- rollback if error in accounting entries
3059: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3061: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3062: RAISE OKC_API.G_EXCEPTION_ERROR;
3063: END IF;
3064:
3065: -- Store the amount at the header and line level in trx tables

Line 3062: RAISE OKC_API.G_EXCEPTION_ERROR;

3058: -- rollback if error in accounting entries
3059: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3061: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3062: RAISE OKC_API.G_EXCEPTION_ERROR;
3063: END IF;
3064:
3065: -- Store the amount at the header and line level in trx tables
3066:

Line 3074: p_init_msg_list => OKC_API.G_FALSE,

3070: lp_thpv_rec.total_match_amount := lx_total_amount;
3071:
3072: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
3073: p_api_version => p_api_version,
3074: p_init_msg_list => OKC_API.G_FALSE,
3075: x_return_status => x_return_status,
3076: x_msg_count => x_msg_count,
3077: x_msg_data => x_msg_data,
3078: p_thpv_rec => lp_thpv_rec,

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

3077: x_msg_data => x_msg_data,
3078: p_thpv_rec => lp_thpv_rec,
3079: x_thpv_rec => lx_thpv_rec);
3080:
3081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3084: RAISE OKC_API.G_EXCEPTION_ERROR;
3085: END IF;

Line 3082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3078: p_thpv_rec => lp_thpv_rec,
3079: x_thpv_rec => lx_thpv_rec);
3080:
3081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3084: RAISE OKC_API.G_EXCEPTION_ERROR;
3085: END IF;
3086:

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

3079: x_thpv_rec => lx_thpv_rec);
3080:
3081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3084: RAISE OKC_API.G_EXCEPTION_ERROR;
3085: END IF;
3086:
3087: -- Update amount in the lines table.

Line 3084: RAISE OKC_API.G_EXCEPTION_ERROR;

3080:
3081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3082: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3084: RAISE OKC_API.G_EXCEPTION_ERROR;
3085: END IF;
3086:
3087: -- Update amount in the lines table.
3088: lp_tlpv_rec := lp_tlpv_empty_rec;

Line 3111: p_init_msg_list => OKC_API.G_FALSE,

3107:
3108:
3109: OKL_TXL_ASSETS_PUB.update_txl_asset_Def(
3110: p_api_version => p_api_version,
3111: p_init_msg_list => OKC_API.G_FALSE,
3112: x_return_status => x_return_status,
3113: x_msg_count => x_msg_count,
3114: x_msg_data => x_msg_data,
3115: p_tlpv_rec => lp_tlpv_rec,

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

3114: x_msg_data => x_msg_data,
3115: p_tlpv_rec => lp_tlpv_rec,
3116: x_tlpv_rec => lx_tlpv_rec);
3117:
3118: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3119: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3120: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3121: RAISE OKC_API.G_EXCEPTION_ERROR;
3122: END IF;

Line 3119: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3115: p_tlpv_rec => lp_tlpv_rec,
3116: x_tlpv_rec => lx_tlpv_rec);
3117:
3118: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3119: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3120: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3121: RAISE OKC_API.G_EXCEPTION_ERROR;
3122: END IF;
3123:

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

3116: x_tlpv_rec => lx_tlpv_rec);
3117:
3118: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3119: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3120: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3121: RAISE OKC_API.G_EXCEPTION_ERROR;
3122: END IF;
3123:
3124: END IF;

Line 3121: RAISE OKC_API.G_EXCEPTION_ERROR;

3117:
3118: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3119: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3120: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3121: RAISE OKC_API.G_EXCEPTION_ERROR;
3122: END IF;
3123:
3124: END IF;
3125: END IF; -- if l_already_retired = 'N'

Line 3141: p_init_msg_list => OKC_API.G_FALSE,

3137:
3138: IF l_itemlocation_rec.instance_end_date IS NULL THEN-- Instance is not already expired.
3139: expire_item (
3140: p_api_version => p_api_version,
3141: p_init_msg_list => OKC_API.G_FALSE,
3142: x_msg_count => x_msg_count,
3143: x_msg_data => x_msg_data,
3144: x_return_status => x_return_status ,
3145: p_instance_id => l_itemlocation_rec.instance_id,

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

3144: x_return_status => x_return_status ,
3145: p_instance_id => l_itemlocation_rec.instance_id,
3146: p_end_date => l_sys_date); -- rmunjulu EDAT 23-Nov-04 -- change back to sysdate -- rmunjulu EDAT Changed from sysdate to eff date
3147:
3148: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3149: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3150: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3151: RAISE OKC_API.G_EXCEPTION_ERROR;
3152: END IF;

Line 3149: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3145: p_instance_id => l_itemlocation_rec.instance_id,
3146: p_end_date => l_sys_date); -- rmunjulu EDAT 23-Nov-04 -- change back to sysdate -- rmunjulu EDAT Changed from sysdate to eff date
3147:
3148: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3149: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3150: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3151: RAISE OKC_API.G_EXCEPTION_ERROR;
3152: END IF;
3153:

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

3146: p_end_date => l_sys_date); -- rmunjulu EDAT 23-Nov-04 -- change back to sysdate -- rmunjulu EDAT Changed from sysdate to eff date
3147:
3148: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3149: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3150: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3151: RAISE OKC_API.G_EXCEPTION_ERROR;
3152: END IF;
3153:
3154: END IF;

Line 3151: RAISE OKC_API.G_EXCEPTION_ERROR;

3147:
3148: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3149: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3150: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3151: RAISE OKC_API.G_EXCEPTION_ERROR;
3152: END IF;
3153:
3154: END IF;
3155:

Line 3168: p_init_msg_list => OKC_API.G_FALSE,

3164:
3165: IF l_itemlocation_rec.instance_end_date IS NULL THEN-- Instance is not already expired.
3166: expire_item (
3167: p_api_version => p_api_version,
3168: p_init_msg_list => OKC_API.G_FALSE,
3169: x_msg_count => x_msg_count,
3170: x_msg_data => x_msg_data,
3171: x_return_status => x_return_status ,
3172: p_instance_id => l_itemlocation_rec.instance_id,

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

3171: x_return_status => x_return_status ,
3172: p_instance_id => l_itemlocation_rec.instance_id,
3173: p_end_date => l_sys_date); -- rmunjulu EDAT 23-Nov-04 Change back to sysdate -- rmunjulu EDAT Changed from sysdate to eff date
3174:
3175: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;

Line 3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3172: p_instance_id => l_itemlocation_rec.instance_id,
3173: p_end_date => l_sys_date); -- rmunjulu EDAT 23-Nov-04 Change back to sysdate -- rmunjulu EDAT Changed from sysdate to eff date
3174:
3175: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3180:

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

3173: p_end_date => l_sys_date); -- rmunjulu EDAT 23-Nov-04 Change back to sysdate -- rmunjulu EDAT Changed from sysdate to eff date
3174:
3175: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3180:
3181: IF instance_counter = p_quantity THEN

Line 3178: RAISE OKC_API.G_EXCEPTION_ERROR;

3174:
3175: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3180:
3181: IF instance_counter = p_quantity THEN
3182: EXIT;

Line 3209: p_init_msg_list => OKC_API.G_FALSE,

3205: lp_thpv_rec.tsu_code := 'CANCELED';
3206:
3207: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
3208: p_api_version => p_api_version,
3209: p_init_msg_list => OKC_API.G_FALSE,
3210: x_return_status => x_return_status,
3211: x_msg_count => x_msg_count,
3212: x_msg_data => x_msg_data,
3213: p_thpv_rec => lp_thpv_rec,

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

3212: x_msg_data => x_msg_data,
3213: p_thpv_rec => lp_thpv_rec,
3214: x_thpv_rec => lx_thpv_rec);
3215:
3216: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3217: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3218: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3219: RAISE OKC_API.G_EXCEPTION_ERROR;
3220: END IF;

Line 3217: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3213: p_thpv_rec => lp_thpv_rec,
3214: x_thpv_rec => lx_thpv_rec);
3215:
3216: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3217: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3218: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3219: RAISE OKC_API.G_EXCEPTION_ERROR;
3220: END IF;
3221: END LOOP;

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

3214: x_thpv_rec => lx_thpv_rec);
3215:
3216: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3217: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3218: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3219: RAISE OKC_API.G_EXCEPTION_ERROR;
3220: END IF;
3221: END LOOP;
3222:

Line 3219: RAISE OKC_API.G_EXCEPTION_ERROR;

3215:
3216: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3217: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3218: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3219: RAISE OKC_API.G_EXCEPTION_ERROR;
3220: END IF;
3221: END LOOP;
3222:
3223:

Line 3248: p_init_msg_list => OKC_API.G_FALSE,

3244: -------------- Securitization Processing -----------------------
3245:
3246: OKL_AM_SECURITIZATION_PVT.process_securitized_streams(
3247: p_api_version => p_api_version,
3248: p_init_msg_list => OKC_API.G_FALSE,
3249: x_return_status => x_return_status,
3250: x_msg_count => x_msg_count,
3251: x_msg_data => x_msg_data,
3252: p_kle_id => p_financial_asset_id,

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

3254: p_effective_date => l_quote_eff_date, -- rmunjulu EDAT Added
3255: p_transaction_date => l_quote_accpt_date, -- rmunjulu EDAT Added
3256: p_call_origin => OKL_SECURITIZATION_PVT.G_TRX_REASON_ASSET_DISPOSAL);
3257:
3258: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3260: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3261: RAISE OKC_API.G_EXCEPTION_ERROR;
3262: END IF;

Line 3259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3255: p_transaction_date => l_quote_accpt_date, -- rmunjulu EDAT Added
3256: p_call_origin => OKL_SECURITIZATION_PVT.G_TRX_REASON_ASSET_DISPOSAL);
3257:
3258: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3260: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3261: RAISE OKC_API.G_EXCEPTION_ERROR;
3262: END IF;
3263: -------------- end Securitization Processing -----------------------

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

3256: p_call_origin => OKL_SECURITIZATION_PVT.G_TRX_REASON_ASSET_DISPOSAL);
3257:
3258: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3260: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3261: RAISE OKC_API.G_EXCEPTION_ERROR;
3262: END IF;
3263: -------------- end Securitization Processing -----------------------
3264: --akrangan added for sla populate sources cr start

Line 3261: RAISE OKC_API.G_EXCEPTION_ERROR;

3257:
3258: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3260: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3261: RAISE OKC_API.G_EXCEPTION_ERROR;
3262: END IF;
3263: -------------- end Securitization Processing -----------------------
3264: --akrangan added for sla populate sources cr start
3265: IF g_trans_id_tbl.COUNT > 0

Line 3283: p_init_msg_list => okc_api.g_false,

3279: l_fxlv_rec.fa_transaction_id := g_trans_id_tbl(i);
3280: l_fxlv_rec.asset_book_type_name := lx_tlpv_rec.corporate_book;
3281:
3282: okl_sla_acc_sources_pvt.populate_sources(p_api_version => p_api_version,
3283: p_init_msg_list => okc_api.g_false,
3284: p_fxhv_rec => l_fxhv_rec,
3285: p_fxlv_rec => l_fxlv_rec,
3286: x_return_status => x_return_status,
3287: x_msg_count => x_msg_count,

Line 3290: IF (x_return_status = okc_api.g_ret_sts_unexp_error)

3286: x_return_status => x_return_status,
3287: x_msg_count => x_msg_count,
3288: x_msg_data => x_msg_data);
3289:
3290: IF (x_return_status = okc_api.g_ret_sts_unexp_error)
3291: THEN
3292: RAISE okl_api.g_exception_unexpected_error;
3293: ELSIF (x_return_status = okc_api.g_ret_sts_error)
3294: THEN

Line 3293: ELSIF (x_return_status = okc_api.g_ret_sts_error)

3289:
3290: IF (x_return_status = okc_api.g_ret_sts_unexp_error)
3291: THEN
3292: RAISE okl_api.g_exception_unexpected_error;
3293: ELSIF (x_return_status = okc_api.g_ret_sts_error)
3294: THEN
3295: RAISE okl_api.g_exception_error;
3296: END IF;
3297: END LOOP;

Line 3301: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

3297: END LOOP;
3298: END IF;
3299: --akrangan added for sla populate sources cr end
3300:
3301: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3302: EXCEPTION
3303: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3304:
3305: IF l_okxassetlines_csr%ISOPEN THEN

Line 3303: WHEN OKC_API.G_EXCEPTION_ERROR THEN

3299: --akrangan added for sla populate sources cr end
3300:
3301: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3302: EXCEPTION
3303: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3304:
3305: IF l_okxassetlines_csr%ISOPEN THEN
3306: CLOSE l_okxassetlines_csr;
3307: END IF;

Line 3350: x_return_status := OKC_API.HANDLE_EXCEPTIONS

3346: CLOSE l_offlseassettrx_csr;
3347: END IF;
3348:
3349:
3350: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3351: (
3352: l_api_name,
3353: G_PKG_NAME,
3354: 'OKC_API.G_RET_STS_ERROR',

Line 3354: 'OKC_API.G_RET_STS_ERROR',

3350: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3351: (
3352: l_api_name,
3353: G_PKG_NAME,
3354: 'OKC_API.G_RET_STS_ERROR',
3355: x_msg_count,
3356: x_msg_data,
3357: '_PVT'
3358: );

Line 3359: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3355: x_msg_count,
3356: x_msg_data,
3357: '_PVT'
3358: );
3359: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3360:
3361: IF l_okxassetlines_csr%ISOPEN THEN
3362: CLOSE l_okxassetlines_csr;
3363: END IF;

Line 3405: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

3401: IF l_offlseassettrx_csr%ISOPEN THEN
3402: CLOSE l_offlseassettrx_csr;
3403: END IF;
3404:
3405: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3406: (
3407: l_api_name,
3408: G_PKG_NAME,
3409: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 3409: 'OKC_API.G_RET_STS_UNEXP_ERROR',

3405: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3406: (
3407: l_api_name,
3408: G_PKG_NAME,
3409: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3410: x_msg_count,
3411: x_msg_data,
3412: '_PVT'
3413: );

Line 3460: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

3456: IF l_offlseassettrx_csr%ISOPEN THEN
3457: CLOSE l_offlseassettrx_csr;
3458: END IF;
3459:
3460: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3461: (
3462: l_api_name,
3463: G_PKG_NAME,
3464: 'OTHERS',

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

3708:
3709:
3710: l_dist_quantity NUMBER;
3711: l_dist_tbl asset_dist_tbl;
3712: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3713: l_order_number NUMBER;
3714: i NUMBER;
3715: l_kle_id NUMBER;
3716: l_quantity NUMBER;

Line 3784: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3780: p_api_version,
3781: '_PVT',
3782: x_return_status);
3783:
3784: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3785: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3786: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3787: RAISE OKC_API.G_EXCEPTION_ERROR;
3788: END IF;

Line 3785: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3781: '_PVT',
3782: x_return_status);
3783:
3784: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3785: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3786: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3787: RAISE OKC_API.G_EXCEPTION_ERROR;
3788: END IF;
3789:

Line 3786: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3782: x_return_status);
3783:
3784: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3785: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3786: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3787: RAISE OKC_API.G_EXCEPTION_ERROR;
3788: END IF;
3789:
3790: -- Get the sysdate

Line 3787: RAISE OKC_API.G_EXCEPTION_ERROR;

3783:
3784: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3785: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3786: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3787: RAISE OKC_API.G_EXCEPTION_ERROR;
3788: END IF;
3789:
3790: -- Get the sysdate
3791: SELECT SYSDATE INTO l_sys_date FROM DUAL;

Line 3801: RAISE okc_api.G_EXCEPTION_ERROR;

3797: OKL_API.set_message( p_app_name => 'OKC',
3798: p_msg_name => G_REQUIRED_VALUE,
3799: p_token1 => G_COL_NAME_TOKEN,
3800: p_token1_value => 'ORDER_LINE_ID');
3801: RAISE okc_api.G_EXCEPTION_ERROR;
3802: END IF;
3803:
3804: /* -- SECHAWLA 21-OCT-04 3924244
3805: OPEN l_orderheaders_csr(p_order_header_Id);

Line 3814: RAISE okc_api.G_EXCEPTION_ERROR;

3810: OKL_API.set_message( p_app_name => 'OKC',
3811: p_msg_name => G_INVALID_VALUE,
3812: p_token1 => G_COL_NAME_TOKEN,
3813: p_token1_value => 'ORDER_HEADER_ID');
3814: RAISE okc_api.G_EXCEPTION_ERROR;
3815: END IF;
3816: CLOSE l_orderheaders_csr;
3817: */
3818:

Line 3830: RAISE okc_api.G_EXCEPTION_ERROR;

3826: OKL_API.set_message( p_app_name => 'OKC',
3827: p_msg_name => G_INVALID_VALUE,
3828: p_token1 => G_COL_NAME_TOKEN,
3829: p_token1_value => 'ORDER_LINE_ID');
3830: RAISE okc_api.G_EXCEPTION_ERROR;
3831: END IF;
3832: CLOSE l_orderlines_csr;
3833:
3834: OPEN l_orderheaders_csr(l_header_id);

Line 3849: OKC_API.set_message( p_app_name => 'OKC',

3845:
3846: IF l_ordered_quantity < 0 THEN -- SECHAWLA 21-OCT-04 3924244
3847: x_return_status := OKL_API.G_RET_STS_ERROR;
3848: -- ordered quantity is invalid
3849: OKC_API.set_message( p_app_name => 'OKC',
3850: p_msg_name => G_INVALID_VALUE,
3851: p_token1 => G_COL_NAME_TOKEN,
3852: p_token1_value => 'ORDERED_QUANTITY');
3853:

Line 3855: RAISE OKC_API.G_EXCEPTION_ERROR;

3851: p_token1 => G_COL_NAME_TOKEN,
3852: p_token1_value => 'ORDERED_QUANTITY');
3853:
3854:
3855: RAISE OKC_API.G_EXCEPTION_ERROR;
3856: END IF;
3857:
3858: IF trunc(l_ordered_quantity) <> l_ordered_quantity THEN -- SECHAWLA 21-OCT-04 3924244
3859: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3861: OKC_API.set_message( p_app_name => 'OKL',

3857:
3858: IF trunc(l_ordered_quantity) <> l_ordered_quantity THEN -- SECHAWLA 21-OCT-04 3924244
3859: x_return_status := OKL_API.G_RET_STS_ERROR;
3860: -- Ordered quantity should be a whole number.
3861: OKC_API.set_message( p_app_name => 'OKL',
3862: p_msg_name => 'OKL_AM_WHOLE_QTY_ERR');
3863: RAISE OKC_API.G_EXCEPTION_ERROR;
3864: END IF;
3865:

Line 3863: RAISE OKC_API.G_EXCEPTION_ERROR;

3859: x_return_status := OKL_API.G_RET_STS_ERROR;
3860: -- Ordered quantity should be a whole number.
3861: OKC_API.set_message( p_app_name => 'OKL',
3862: p_msg_name => 'OKL_AM_WHOLE_QTY_ERR');
3863: RAISE OKC_API.G_EXCEPTION_ERROR;
3864: END IF;
3865:
3866:
3867:

Line 3879: RAISE okc_api.G_EXCEPTION_ERROR;

3875: OKL_API.set_message( p_app_name => 'OKL',
3876: p_msg_name => 'OKL_AM_NO_ASSET_RETURN',
3877: p_token1 => 'ORDER_NUMBER',
3878: p_token1_value => l_order_number);
3879: RAISE okc_api.G_EXCEPTION_ERROR;
3880: END IF;
3881:
3882: IF l_quantity IS NULL OR l_quantity = OKL_API.G_MISS_NUM THEN
3883: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3889: RAISE okc_api.G_EXCEPTION_ERROR;

3885: OKL_API.set_message( p_app_name => 'OKC',
3886: p_msg_name => G_REQUIRED_VALUE,
3887: p_token1 => G_COL_NAME_TOKEN,
3888: p_token1_value => 'ASSET_RETURN_QUANTITY');
3889: RAISE okc_api.G_EXCEPTION_ERROR;
3890: END IF;
3891:
3892: -- RRAVIKIR Legal Entity Changes
3893: IF (l_legal_entity_id is null or l_legal_entity_id = OKC_API.G_MISS_NUM) THEN

Line 3893: IF (l_legal_entity_id is null or l_legal_entity_id = OKC_API.G_MISS_NUM) THEN

3889: RAISE okc_api.G_EXCEPTION_ERROR;
3890: END IF;
3891:
3892: -- RRAVIKIR Legal Entity Changes
3893: IF (l_legal_entity_id is null or l_legal_entity_id = OKC_API.G_MISS_NUM) THEN
3894: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
3895: p_msg_name => g_required_value,
3896: p_token1 => g_col_name_token,
3897: p_token1_value => 'legal_entity_id');

Line 3898: RAISE OKC_API.G_EXCEPTION_ERROR;

3894: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
3895: p_msg_name => g_required_value,
3896: p_token1 => g_col_name_token,
3897: p_token1_value => 'legal_entity_id');
3898: RAISE OKC_API.G_EXCEPTION_ERROR;
3899: END IF;
3900: -- Legal Entity Changes End
3901:
3902: IF l_quantity < 0 THEN

Line 3909: RAISE okc_api.G_EXCEPTION_ERROR;

3905: OKL_API.set_message( p_app_name => 'OKC',
3906: p_msg_name => G_INVALID_VALUE,
3907: p_token1 => G_COL_NAME_TOKEN,
3908: p_token1_value => 'ASSET_RETURN_QUANTITY');
3909: RAISE okc_api.G_EXCEPTION_ERROR;
3910: END IF;
3911:
3912: CLOSE l_assetreturn_csr;
3913:

Line 3925: OKC_API.set_message( p_app_name => 'OKC',

3921: FETCH l_dealtype_csr INTO l_chr_id, l_deal_type, l_contract_number;
3922: IF l_dealtype_csr%NOTFOUND THEN
3923: x_return_status := OKL_API.G_RET_STS_ERROR;
3924: -- chr id is invalid
3925: OKC_API.set_message( p_app_name => 'OKC',
3926: p_msg_name => G_INVALID_VALUE,
3927: p_token1 => G_COL_NAME_TOKEN,
3928: p_token1_value => 'CHR_ID');
3929:

Line 3930: RAISE OKC_API.G_EXCEPTION_ERROR;

3926: p_msg_name => G_INVALID_VALUE,
3927: p_token1 => G_COL_NAME_TOKEN,
3928: p_token1_value => 'CHR_ID');
3929:
3930: RAISE OKC_API.G_EXCEPTION_ERROR;
3931: END IF;
3932: CLOSE l_dealtype_csr;
3933:
3934: IF l_deal_type IN ('LEASEDF','LEASEST') THEN

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

3942: ,x_return_status => x_return_status
3943: ,x_msg_count => x_msg_count
3944: ,x_msg_data => x_msg_data);
3945:
3946: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3948: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3949: RAISE OKC_API.G_EXCEPTION_ERROR;
3950: END IF;

Line 3947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3943: ,x_msg_count => x_msg_count
3944: ,x_msg_data => x_msg_data);
3945:
3946: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3948: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3949: RAISE OKC_API.G_EXCEPTION_ERROR;
3950: END IF;
3951:

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

3944: ,x_msg_data => x_msg_data);
3945:
3946: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3948: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3949: RAISE OKC_API.G_EXCEPTION_ERROR;
3950: END IF;
3951:
3952: -- check if tax owner is defined

Line 3949: RAISE OKC_API.G_EXCEPTION_ERROR;

3945:
3946: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3948: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3949: RAISE OKC_API.G_EXCEPTION_ERROR;
3950: END IF;
3951:
3952: -- check if tax owner is defined
3953: IF l_rulv_rec.rule_information1 IS NULL OR l_rulv_rec.rule_information1 = OKL_API.G_MISS_CHAR THEN

Line 3961: RAISE OKC_API.G_EXCEPTION_ERROR;

3957: OKL_API.set_message( p_app_name => 'OKL',
3958: p_msg_name => 'OKL_AM_NO_TAX_OWNER',
3959: p_token1 => 'CONTRACT_NUMBER',
3960: p_token1_value => l_contract_number);
3961: RAISE OKC_API.G_EXCEPTION_ERROR;
3962:
3963: ELSE
3964: -- l_rulv_rec.RULE_INFORMATION1 will contain the value 'LESSEE' or 'LESSOR'
3965: l_tax_owner := l_rulv_rec.RULE_INFORMATION1;

Line 3976: OKC_API.set_message( p_app_name => 'OKL',

3972:
3973: IF l_residual_value IS NULL THEN
3974: x_return_status := OKL_API.G_RET_STS_ERROR;
3975: -- Residual value is not defined for the asset
3976: OKC_API.set_message( p_app_name => 'OKL',
3977: p_msg_name => 'OKL_AM_NO_RESIDUAL_VALUE',
3978: p_token1 => 'ASSET_NUMBER',
3979: p_token1_value => l_name);
3980:

Line 3982: RAISE OKC_API.G_EXCEPTION_ERROR;

3978: p_token1 => 'ASSET_NUMBER',
3979: p_token1_value => l_name);
3980:
3981:
3982: RAISE OKC_API.G_EXCEPTION_ERROR;
3983: END IF;
3984:
3985: IF l_residual_value < 0 THEN
3986: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3988: OKC_API.set_message( p_app_name => 'OKL',

3984:
3985: IF l_residual_value < 0 THEN
3986: x_return_status := OKL_API.G_RET_STS_ERROR;
3987: -- Residual value is negative for the asset
3988: OKC_API.set_message( p_app_name => 'OKL',
3989: p_msg_name => 'OKL_AM_INVALID_RESIDUAL',
3990: p_token1 => 'ASSET_NUMBER',
3991: p_token1_value => l_name);
3992:

Line 3994: RAISE OKC_API.G_EXCEPTION_ERROR;

3990: p_token1 => 'ASSET_NUMBER',
3991: p_token1_value => l_name);
3992:
3993:
3994: RAISE OKC_API.G_EXCEPTION_ERROR;
3995: END IF;
3996: END IF;
3997:
3998:

Line 4035: RAISE OKC_API.G_EXCEPTION_ERROR;

4031: OKL_API.set_message( p_app_name => 'OKL',
4032: p_msg_name => 'OKL_AM_PENDING_OFFLEASE',
4033: p_token1 => 'ASSET_NUMBER',
4034: p_token1_value => l_name);
4035: RAISE OKC_API.G_EXCEPTION_ERROR;
4036:
4037:
4038: ELSIF l_trx_status IN ('PROCESSED','CANCELED') THEN
4039: l_delta_cost := 0; -- no cost update required, as cost has already been updated thru off lease trx

Line 4056: OKC_API.set_message( p_app_name => 'OKC',

4052: FETCH l_bookcontrols_csr INTO l_fiscal_year_name;
4053: IF l_bookcontrols_csr%NOTFOUND OR l_fiscal_year_name IS NULL THEN
4054: x_return_status := OKL_API.G_RET_STS_ERROR;
4055: -- Fiscal Year Name is required
4056: OKC_API.set_message( p_app_name => 'OKC',
4057: p_msg_name => G_REQUIRED_VALUE,
4058: p_token1 => G_COL_NAME_TOKEN,
4059: p_token1_value => 'Fiscal Year Name');
4060:

Line 4062: RAISE OKC_API.G_EXCEPTION_ERROR;

4058: p_token1 => G_COL_NAME_TOKEN,
4059: p_token1_value => 'Fiscal Year Name');
4060:
4061:
4062: RAISE OKC_API.G_EXCEPTION_ERROR;
4063: END IF;
4064: CLOSE l_bookcontrols_csr;
4065: fa_cache_pkg.fazcbc_record.fiscal_year_name := l_fiscal_year_name;
4066: -- END IF;

Line 4076: x_return_status := OKC_API.G_RET_STS_ERROR;

4072: p_effective_date => NULL,
4073: x_period_rec => l_period_rec
4074: ) THEN
4075:
4076: x_return_status := OKC_API.G_RET_STS_ERROR;
4077: --Error getting current open period for the book BOOK_TYPE_CODE.
4078: OKL_API.set_message(
4079: p_app_name => 'OKL',
4080: p_msg_name => 'OKL_AM_OPEN_PERIOD_ERR',

Line 4088: RAISE OKC_API.G_EXCEPTION_ERROR;

4084: p_token2_value => l_okxassetlines_rec.book_type_code
4085: );
4086:
4087:
4088: RAISE OKC_API.G_EXCEPTION_ERROR;
4089: END IF;
4090:
4091: --- check period of addition. If 'N' then run retirements
4092: OPEN l_periodofaddition_csr(l_okxassetlines_rec.asset_id, l_okxassetlines_rec.book_type_code,l_period_rec.period_open_date);

Line 4108: x_return_status := OKC_API.G_RET_STS_ERROR;

4104:
4105: IF l_period_of_addition = 'Y' THEN
4106: -- Can nor retire asset ASSET_NUMBER as the asset was added to the book
4107: -- in the current open period. Please retire the asset manually.
4108: x_return_status := OKC_API.G_RET_STS_ERROR;
4109:
4110: OKL_API.set_message( p_app_name => 'OKL',
4111: p_msg_name => 'OKL_AM_RETIRE_MANUALLY',
4112: p_token1 => 'ASSET_NUMBER',

Line 4119: RAISE OKC_API.G_EXCEPTION_ERROR;

4115: p_token2_value => lower(l_okxassetlines_rec.book_class),
4116: p_token3 => 'BOOK_TYPE_CODE',
4117: p_token3_value => l_okxassetlines_rec.book_type_code);
4118:
4119: RAISE OKC_API.G_EXCEPTION_ERROR;
4120:
4121: END IF;
4122: */ -- bug 13581587.
4123:

Line 4131: OKC_API.set_message( p_app_name => 'OKL',

4127: -- SECHAWLA 03-JUN-03 Bug 2999419 : Added the following validation
4128: IF l_okxassetlines_rec.prorate_convention_code IS NULL THEN
4129: x_return_status := OKL_API.G_RET_STS_ERROR;
4130: -- Unable to find retirement prorate convention for asset ASSET_NUMBER and book BOOK_TYPE_CODE.
4131: OKC_API.set_message( p_app_name => 'OKL',
4132: p_msg_name => 'OKL_AM_NO_PRORATE_CONVENTION',
4133: p_token1 => 'ASSET_NUMBER',
4134: p_token1_value => l_okxassetlines_rec.asset_number,
4135: p_token2 => 'BOOK_CLASS',

Line 4139: RAISE OKC_API.G_EXCEPTION_ERROR;

4135: p_token2 => 'BOOK_CLASS',
4136: p_token2_value => l_okxassetlines_rec.book_class,
4137: p_token3 => 'BOOK_TYPE_CODE',
4138: p_token3_value => l_okxassetlines_rec.book_type_code);
4139: RAISE OKC_API.G_EXCEPTION_ERROR;
4140: END IF;
4141: -- SECHAWLA 03-JUN-03 Bug 2999419: end new code
4142: */ -- ansethur for Bug:5664106 End
4143:

Line 4181: p_init_msg_list => OKC_API.G_FALSE,

4177:
4178: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4179: do_full_units_retirement(
4180: p_api_version => p_api_version,
4181: p_init_msg_list => OKC_API.G_FALSE,
4182: p_tax_owner => l_tax_owner,
4183: p_delta_cost => l_delta_cost,
4184: p_asset_id => l_okxassetlines_rec.asset_id,
4185: p_asset_number => l_okxassetlines_rec.asset_number,

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

4193: x_msg_count => x_msg_count,
4194: x_msg_data => x_msg_data,
4195: x_return_status => x_return_status);
4196:
4197: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4199: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4200: RAISE OKC_API.G_EXCEPTION_ERROR;
4201: END IF;

Line 4198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4194: x_msg_data => x_msg_data,
4195: x_return_status => x_return_status);
4196:
4197: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4199: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4200: RAISE OKC_API.G_EXCEPTION_ERROR;
4201: END IF;
4202:

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

4195: x_return_status => x_return_status);
4196:
4197: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4199: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4200: RAISE OKC_API.G_EXCEPTION_ERROR;
4201: END IF;
4202:
4203: l_units_retired := l_quantity;

Line 4200: RAISE OKC_API.G_EXCEPTION_ERROR;

4196:
4197: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4199: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4200: RAISE OKC_API.G_EXCEPTION_ERROR;
4201: END IF;
4202:
4203: l_units_retired := l_quantity;
4204: ELSE -- distribution qty is either less or more than the original asset return qty

Line 4250: OKC_API.set_message( p_app_name => 'OKL',

4246:
4247: IF l_dist_quantity > 0 THEN -- quantity to be retired (for non-retired distributions)
4248: -- x_return_status := OKL_API.G_RET_STS_ERROR;
4249: -- Sold quantity is more than the total quantity assigned to asset distributions.
4250: OKC_API.set_message( p_app_name => 'OKL',
4251: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
4252: --RAISE okc_api.G_EXCEPTION_ERROR;
4253: END IF;
4254:

Line 4252: --RAISE okc_api.G_EXCEPTION_ERROR;

4248: -- x_return_status := OKL_API.G_RET_STS_ERROR;
4249: -- Sold quantity is more than the total quantity assigned to asset distributions.
4250: OKC_API.set_message( p_app_name => 'OKL',
4251: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
4252: --RAISE okc_api.G_EXCEPTION_ERROR;
4253: END IF;
4254:
4255: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameter to the following procedure call
4256: do_partial_units_retirement(

Line 4258: p_init_msg_list => OKC_API.G_FALSE,

4254:
4255: -- SECHAWLA 21-NOV-03 3262519 : Added p_tax_owner and delta cost parameter to the following procedure call
4256: do_partial_units_retirement(
4257: p_api_version => p_api_version,
4258: p_init_msg_list => OKC_API.G_FALSE,
4259: p_tax_owner => l_tax_owner,
4260: p_delta_cost => l_delta_cost,
4261: p_asset_id => l_okxassetlines_rec.asset_id,
4262: p_asset_number => l_okxassetlines_rec.asset_number,

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

4271: x_msg_data => x_msg_data,
4272: x_return_status => x_return_status);
4273:
4274:
4275: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4277: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4278: RAISE OKC_API.G_EXCEPTION_ERROR;
4279: END IF;

Line 4276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4272: x_return_status => x_return_status);
4273:
4274:
4275: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4277: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4278: RAISE OKC_API.G_EXCEPTION_ERROR;
4279: END IF;
4280:

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

4273:
4274:
4275: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4277: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4278: RAISE OKC_API.G_EXCEPTION_ERROR;
4279: END IF;
4280:
4281: l_units_retired := l_units_to_be_retired;

Line 4278: RAISE OKC_API.G_EXCEPTION_ERROR;

4274:
4275: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4277: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4278: RAISE OKC_API.G_EXCEPTION_ERROR;
4279: END IF;
4280:
4281: l_units_retired := l_units_to_be_retired;
4282:

Line 4286: OKC_API.set_message( p_app_name => 'OKL',

4282:
4283: END IF; --l_non_retired_quantity = l_quantity
4284: ELSIF l_retired_quantity = l_quantity AND l_non_retired_quantity = 0 THEN -- retired qty = original asset return qty
4285: -- Asset is already fully retired.
4286: OKC_API.set_message( p_app_name => 'OKL',
4287: p_msg_name => 'OKL_AM_ALREADY_RETIRED',
4288: p_token1 => 'ASSET_NUMBER',
4289: p_token1_value => l_okxassetlines_rec.asset_number);
4290: l_already_retired := 'Y';

Line 4330: p_init_msg_list => OKC_API.G_FALSE,

4326:
4327: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4328: do_partial_units_retirement(
4329: p_api_version => p_api_version,
4330: p_init_msg_list => OKC_API.G_FALSE,
4331: p_tax_owner => l_tax_owner,
4332: p_delta_cost => l_delta_cost,
4333: p_asset_id => l_okxassetlines_rec.asset_id,
4334: p_asset_number => l_okxassetlines_rec.asset_number,

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

4343: x_msg_data => x_msg_data,
4344: x_return_status => x_return_status);
4345:
4346:
4347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4350: RAISE OKC_API.G_EXCEPTION_ERROR;
4351: END IF;

Line 4348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4344: x_return_status => x_return_status);
4345:
4346:
4347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4350: RAISE OKC_API.G_EXCEPTION_ERROR;
4351: END IF;
4352:

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

4345:
4346:
4347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4350: RAISE OKC_API.G_EXCEPTION_ERROR;
4351: END IF;
4352:
4353: l_units_retired := l_units_to_be_retired;

Line 4350: RAISE OKC_API.G_EXCEPTION_ERROR;

4346:
4347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4350: RAISE OKC_API.G_EXCEPTION_ERROR;
4351: END IF;
4352:
4353: l_units_retired := l_units_to_be_retired;
4354:

Line 4358: OKC_API.set_message( p_app_name => 'OKL',

4354:
4355: ELSIF l_retired_quantity > l_quantity AND l_non_retired_quantity = 0 THEN
4356: -- x_return_status := OKL_API.G_RET_STS_ERROR;
4357: -- Asset ASSET_NUMBER is already retired with invalid retired quantity which is more than the original quantity.
4358: OKC_API.set_message( p_app_name => 'OKL',
4359: p_msg_name => 'OKL_AM_INVALID_RETIRED_QTY',
4360: p_token1 => 'ASSET_NUMBER',
4361: p_token1_value => l_okxassetlines_rec.asset_number);
4362: -- RAISE okc_api.G_EXCEPTION_ERROR;

Line 4362: -- RAISE okc_api.G_EXCEPTION_ERROR;

4358: OKC_API.set_message( p_app_name => 'OKL',
4359: p_msg_name => 'OKL_AM_INVALID_RETIRED_QTY',
4360: p_token1 => 'ASSET_NUMBER',
4361: p_token1_value => l_okxassetlines_rec.asset_number);
4362: -- RAISE okc_api.G_EXCEPTION_ERROR;
4363: ELSIF l_retired_quantity < l_quantity AND l_non_retired_quantity > 0 THEN
4364: -- user requested for full retirement, but the asset is already retired partially
4365:
4366:

Line 4414: OKC_API.set_message( p_app_name => 'OKL',

4410: IF l_dist_quantity > 0 THEN
4411: IF l_retired_quantity < l_dist_quantity THEN
4412: -- x_return_status := OKL_API.G_RET_STS_ERROR;
4413: -- Sold quantity is more than the total quantity assigned to asset distributions.
4414: OKC_API.set_message( p_app_name => 'OKL',
4415: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
4416: -- RAISE okc_api.G_EXCEPTION_ERROR;
4417: END IF;
4418: END IF;

Line 4416: -- RAISE okc_api.G_EXCEPTION_ERROR;

4412: -- x_return_status := OKL_API.G_RET_STS_ERROR;
4413: -- Sold quantity is more than the total quantity assigned to asset distributions.
4414: OKC_API.set_message( p_app_name => 'OKL',
4415: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
4416: -- RAISE okc_api.G_EXCEPTION_ERROR;
4417: END IF;
4418: END IF;
4419:
4420: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure

Line 4423: p_init_msg_list => OKC_API.G_FALSE,

4419:
4420: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4421: do_partial_units_retirement(
4422: p_api_version => p_api_version,
4423: p_init_msg_list => OKC_API.G_FALSE,
4424: p_tax_owner => l_tax_owner,
4425: p_delta_cost => l_delta_cost,
4426: p_asset_id => l_okxassetlines_rec.asset_id,
4427: p_asset_number => l_okxassetlines_rec.asset_number,

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

4436: x_msg_data => x_msg_data,
4437: x_return_status => x_return_status);
4438:
4439:
4440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4441: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4443: RAISE OKC_API.G_EXCEPTION_ERROR;
4444: END IF;

Line 4441: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4437: x_return_status => x_return_status);
4438:
4439:
4440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4441: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4443: RAISE OKC_API.G_EXCEPTION_ERROR;
4444: END IF;
4445:

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

4438:
4439:
4440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4441: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4443: RAISE OKC_API.G_EXCEPTION_ERROR;
4444: END IF;
4445:
4446: l_units_retired := l_units_to_be_retired;

Line 4443: RAISE OKC_API.G_EXCEPTION_ERROR;

4439:
4440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4441: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4443: RAISE OKC_API.G_EXCEPTION_ERROR;
4444: END IF;
4445:
4446: l_units_retired := l_units_to_be_retired;
4447:

Line 4468: p_init_msg_list => OKC_API.G_FALSE,

4464:
4465: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4466: do_cost_retirement(
4467: p_api_version => p_api_version,
4468: p_init_msg_list => OKC_API.G_FALSE,
4469: p_tax_owner => l_tax_owner,
4470: p_delta_cost => l_delta_cost,
4471: p_asset_id => l_okxassetlines_rec.asset_id,
4472: p_asset_number => l_okxassetlines_rec.asset_number,

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

4481: x_msg_count => x_msg_count,
4482: x_msg_data => x_msg_data,
4483: x_return_status => x_return_status);
4484:
4485: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4486: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4487: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4488: RAISE OKC_API.G_EXCEPTION_ERROR;
4489: END IF;

Line 4486: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4482: x_msg_data => x_msg_data,
4483: x_return_status => x_return_status);
4484:
4485: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4486: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4487: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4488: RAISE OKC_API.G_EXCEPTION_ERROR;
4489: END IF;
4490: END IF;

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

4483: x_return_status => x_return_status);
4484:
4485: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4486: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4487: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4488: RAISE OKC_API.G_EXCEPTION_ERROR;
4489: END IF;
4490: END IF;
4491: -- SECHAWLA 23-DEC-02 Bug # 2701440 : end new code

Line 4488: RAISE OKC_API.G_EXCEPTION_ERROR;

4484:
4485: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4486: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4487: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4488: RAISE OKC_API.G_EXCEPTION_ERROR;
4489: END IF;
4490: END IF;
4491: -- SECHAWLA 23-DEC-02 Bug # 2701440 : end new code
4492:

Line 4546: OKC_API.set_message( p_app_name => 'OKL',

4542: IF l_dist_quantity > 0 THEN -- quantity to be retired (for non-retired distributions)
4543: IF l_retired_dist_units < l_dist_quantity THEN -- retired quantity isn't enough to match up with total qty
4544:
4545: -- Sold quantity is more than the total quantity assigned to asset distributions.
4546: OKC_API.set_message( p_app_name => 'OKL',
4547: p_msg_name => 'OKL_AM_INVALID_DIST_QTY');
4548: END IF;
4549: -- SECHAWLA 21-OCT-04 3924244
4550: l_units_to_be_retired := l_ordered_quantity - l_dist_quantity; -- retire whatever is left

Line 4560: p_init_msg_list => OKC_API.G_FALSE,

4556: IF l_dist_tbl.COUNT > 0 THEN
4557: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4558: do_partial_units_retirement(
4559: p_api_version => p_api_version,
4560: p_init_msg_list => OKC_API.G_FALSE,
4561: p_tax_owner => l_tax_owner,
4562: p_delta_cost => l_delta_cost,
4563: p_asset_id => l_okxassetlines_rec.asset_id,
4564: p_asset_number => l_okxassetlines_rec.asset_number,

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

4573: x_msg_data => x_msg_data,
4574: x_return_status => x_return_status);
4575:
4576:
4577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4580: RAISE OKC_API.G_EXCEPTION_ERROR;
4581: END IF;

Line 4578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4574: x_return_status => x_return_status);
4575:
4576:
4577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4580: RAISE OKC_API.G_EXCEPTION_ERROR;
4581: END IF;
4582:

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

4575:
4576:
4577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4580: RAISE OKC_API.G_EXCEPTION_ERROR;
4581: END IF;
4582:
4583:

Line 4580: RAISE OKC_API.G_EXCEPTION_ERROR;

4576:
4577: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4578: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4579: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4580: RAISE OKC_API.G_EXCEPTION_ERROR;
4581: END IF;
4582:
4583:
4584: /* SECHAWLA 21-NOV-03 3262519 : This fetch is not required. Cost to be retired from the tax book should be

Line 4632: p_init_msg_list => OKC_API.G_FALSE,

4628: -- do cost retirement for the tax book
4629: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4630: do_cost_retirement(
4631: p_api_version => p_api_version,
4632: p_init_msg_list => OKC_API.G_FALSE,
4633: p_tax_owner => l_tax_owner,
4634: p_delta_cost => l_delta_cost,
4635: p_asset_id => l_okxassetlines_rec.asset_id,
4636: p_asset_number => l_okxassetlines_rec.asset_number,

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

4642: x_msg_count => x_msg_count,
4643: x_msg_data => x_msg_data,
4644: x_return_status => x_return_status);
4645:
4646: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4647: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4648: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4649: RAISE OKC_API.G_EXCEPTION_ERROR;
4650: END IF;

Line 4647: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4643: x_msg_data => x_msg_data,
4644: x_return_status => x_return_status);
4645:
4646: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4647: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4648: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4649: RAISE OKC_API.G_EXCEPTION_ERROR;
4650: END IF;
4651:

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

4644: x_return_status => x_return_status);
4645:
4646: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4647: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4648: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4649: RAISE OKC_API.G_EXCEPTION_ERROR;
4650: END IF;
4651:
4652: --SECHAWLA 21-NOV-2003 3262519 : This condition will not occur now that we calculate cost to be

Line 4649: RAISE OKC_API.G_EXCEPTION_ERROR;

4645:
4646: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4647: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4648: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4649: RAISE OKC_API.G_EXCEPTION_ERROR;
4650: END IF;
4651:
4652: --SECHAWLA 21-NOV-2003 3262519 : This condition will not occur now that we calculate cost to be
4653: -- retired from tax book using tax book cost itself

Line 4664: p_init_msg_list => OKC_API.G_FALSE,

4660: -- retire the whole remaining cost
4661: -- SECHAWLA 21-NOV-03, 3262519 : added tax owner and delta cost parameter to the following procedure
4662: do_cost_retirement(
4663: p_api_version => p_api_version,
4664: p_init_msg_list => OKC_API.G_FALSE,
4665: p_tax_owner => l_tax_owner,
4666: p_delta_cost => l_delta_cost,
4667: p_asset_id => l_okxassetlines_rec.asset_id,
4668: p_asset_number => l_okxassetlines_rec.asset_number,

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

4674: x_msg_count => x_msg_count,
4675: x_msg_data => x_msg_data,
4676: x_return_status => x_return_status);
4677:
4678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4681: RAISE OKC_API.G_EXCEPTION_ERROR;
4682: END IF;

Line 4679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4675: x_msg_data => x_msg_data,
4676: x_return_status => x_return_status);
4677:
4678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4681: RAISE OKC_API.G_EXCEPTION_ERROR;
4682: END IF;
4683: */

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

4676: x_return_status => x_return_status);
4677:
4678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4681: RAISE OKC_API.G_EXCEPTION_ERROR;
4682: END IF;
4683: */
4684:

Line 4681: RAISE OKC_API.G_EXCEPTION_ERROR;

4677:
4678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4681: RAISE OKC_API.G_EXCEPTION_ERROR;
4682: END IF;
4683: */
4684:
4685: END IF;

Line 4708: RAISE OKC_API.G_EXCEPTION_ERROR;

4704: OKL_API.set_message(p_app_name => 'OKL',
4705: p_msg_name => 'OKL_AM_NO_TRX_TYPE_FOUND',
4706: p_token1 => 'TRY_NAME',
4707: p_token1_value => 'Asset Disposition');
4708: RAISE OKC_API.G_EXCEPTION_ERROR;
4709: END IF;
4710:
4711: lp_thpv_rec.tas_type := 'RFA';
4712: lp_thpv_rec.tsu_code := 'PROCESSED';

Line 4721: p_init_msg_list => OKC_API.G_FALSE,

4717: lp_thpv_rec.legal_entity_id := l_legal_entity_id;
4718: -- Legal Entity Changes End
4719:
4720: OKL_TRX_ASSETS_PUB.create_trx_ass_h_def( p_api_version => p_api_version,
4721: p_init_msg_list => OKC_API.G_FALSE,
4722: x_return_status => x_return_status,
4723: x_msg_count => x_msg_count,
4724: x_msg_data => x_msg_data,
4725: p_thpv_rec => lp_thpv_rec,

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

4725: p_thpv_rec => lp_thpv_rec,
4726: x_thpv_rec => lx_thpv_rec);
4727:
4728:
4729: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4730: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4731: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4732: RAISE OKC_API.G_EXCEPTION_ERROR;
4733: END IF;

Line 4730: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4726: x_thpv_rec => lx_thpv_rec);
4727:
4728:
4729: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4730: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4731: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4732: RAISE OKC_API.G_EXCEPTION_ERROR;
4733: END IF;
4734:

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

4727:
4728:
4729: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4730: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4731: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4732: RAISE OKC_API.G_EXCEPTION_ERROR;
4733: END IF;
4734:
4735: --SECHAWLA 03-JAN-03 2683876 Pass the currency code if creating/updating amounts in txl assets

Line 4732: RAISE OKC_API.G_EXCEPTION_ERROR;

4728:
4729: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4730: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4731: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4732: RAISE OKC_API.G_EXCEPTION_ERROR;
4733: END IF;
4734:
4735: --SECHAWLA 03-JAN-03 2683876 Pass the currency code if creating/updating amounts in txl assets
4736: l_func_curr_code := okl_am_util_pvt.get_functional_currency;

Line 4758: p_init_msg_list => OKC_API.G_FALSE,

4754: -- SECHAWLA 15-DEC-04 4028371 : set FA date on trx line
4755: lp_tlpv_rec.FA_TRX_DATE := l_fa_trx_date;
4756:
4757: OKL_TXL_ASSETS_PUB.create_txl_asset_def(p_api_version => p_api_version,
4758: p_init_msg_list => OKC_API.G_FALSE,
4759: x_return_status => x_return_status,
4760: x_msg_count => x_msg_count,
4761: x_msg_data => x_msg_data,
4762: p_tlpv_rec => lp_tlpv_rec,

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

4761: x_msg_data => x_msg_data,
4762: p_tlpv_rec => lp_tlpv_rec,
4763: x_tlpv_rec => lx_tlpv_rec);
4764:
4765: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4766: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4767: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4768: RAISE OKC_API.G_EXCEPTION_ERROR;
4769: END IF;

Line 4766: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4762: p_tlpv_rec => lp_tlpv_rec,
4763: x_tlpv_rec => lx_tlpv_rec);
4764:
4765: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4766: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4767: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4768: RAISE OKC_API.G_EXCEPTION_ERROR;
4769: END IF;
4770:

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

4763: x_tlpv_rec => lx_tlpv_rec);
4764:
4765: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4766: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4767: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4768: RAISE OKC_API.G_EXCEPTION_ERROR;
4769: END IF;
4770:
4771:

Line 4768: RAISE OKC_API.G_EXCEPTION_ERROR;

4764:
4765: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4766: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4767: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4768: RAISE OKC_API.G_EXCEPTION_ERROR;
4769: END IF;
4770:
4771:
4772:

Line 4776: p_init_msg_list => OKC_API.G_FALSE,

4772:
4773: -- make call to accounting entries
4774: process_accounting_entries(
4775: p_api_version => p_api_version,
4776: p_init_msg_list => OKC_API.G_FALSE,
4777: x_return_status => x_return_status,
4778: x_msg_count => x_msg_count,
4779: x_msg_data => x_msg_data,
4780: p_kle_id => l_kle_id,

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

4787: x_total_amount => lx_total_amount,
4788: p_legal_entity_id => l_legal_entity_id);
4789:
4790: -- rollback if error in accounting entries
4791: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4792: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4793: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4794: RAISE OKC_API.G_EXCEPTION_ERROR;
4795: END IF;

Line 4792: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4788: p_legal_entity_id => l_legal_entity_id);
4789:
4790: -- rollback if error in accounting entries
4791: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4792: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4793: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4794: RAISE OKC_API.G_EXCEPTION_ERROR;
4795: END IF;
4796:

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

4789:
4790: -- rollback if error in accounting entries
4791: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4792: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4793: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4794: RAISE OKC_API.G_EXCEPTION_ERROR;
4795: END IF;
4796:
4797: -- Store the amount at the header and line level in trx tables

Line 4794: RAISE OKC_API.G_EXCEPTION_ERROR;

4790: -- rollback if error in accounting entries
4791: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4792: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4793: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4794: RAISE OKC_API.G_EXCEPTION_ERROR;
4795: END IF;
4796:
4797: -- Store the amount at the header and line level in trx tables
4798:

Line 4806: p_init_msg_list => OKC_API.G_FALSE,

4802: lp_thpv_rec.total_match_amount := lx_total_amount;
4803:
4804: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
4805: p_api_version => p_api_version,
4806: p_init_msg_list => OKC_API.G_FALSE,
4807: x_return_status => x_return_status,
4808: x_msg_count => x_msg_count,
4809: x_msg_data => x_msg_data,
4810: p_thpv_rec => lp_thpv_rec,

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

4809: x_msg_data => x_msg_data,
4810: p_thpv_rec => lp_thpv_rec,
4811: x_thpv_rec => lx_thpv_rec);
4812:
4813: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4814: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4815: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4816: RAISE OKC_API.G_EXCEPTION_ERROR;
4817: END IF;

Line 4814: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4810: p_thpv_rec => lp_thpv_rec,
4811: x_thpv_rec => lx_thpv_rec);
4812:
4813: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4814: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4815: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4816: RAISE OKC_API.G_EXCEPTION_ERROR;
4817: END IF;
4818:

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

4811: x_thpv_rec => lx_thpv_rec);
4812:
4813: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4814: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4815: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4816: RAISE OKC_API.G_EXCEPTION_ERROR;
4817: END IF;
4818:
4819: -- Update amount in the lines table.

Line 4816: RAISE OKC_API.G_EXCEPTION_ERROR;

4812:
4813: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4814: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4815: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4816: RAISE OKC_API.G_EXCEPTION_ERROR;
4817: END IF;
4818:
4819: -- Update amount in the lines table.
4820: lp_tlpv_rec := lp_tlpv_empty_rec;

Line 4832: p_init_msg_list => OKC_API.G_FALSE,

4828: lp_tlpv_rec.currency_code := l_func_curr_code;
4829:
4830: OKL_TXL_ASSETS_PUB.update_txl_asset_Def(
4831: p_api_version => p_api_version,
4832: p_init_msg_list => OKC_API.G_FALSE,
4833: x_return_status => x_return_status,
4834: x_msg_count => x_msg_count,
4835: x_msg_data => x_msg_data,
4836: p_tlpv_rec => lp_tlpv_rec,

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

4835: x_msg_data => x_msg_data,
4836: p_tlpv_rec => lp_tlpv_rec,
4837: x_tlpv_rec => lx_tlpv_rec);
4838:
4839: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4840: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4841: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4842: RAISE OKC_API.G_EXCEPTION_ERROR;
4843: END IF;

Line 4840: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4836: p_tlpv_rec => lp_tlpv_rec,
4837: x_tlpv_rec => lx_tlpv_rec);
4838:
4839: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4840: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4841: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4842: RAISE OKC_API.G_EXCEPTION_ERROR;
4843: END IF;
4844: --- End store amounts at the header and line level

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

4837: x_tlpv_rec => lx_tlpv_rec);
4838:
4839: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4840: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4841: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4842: RAISE OKC_API.G_EXCEPTION_ERROR;
4843: END IF;
4844: --- End store amounts at the header and line level
4845:

Line 4842: RAISE OKC_API.G_EXCEPTION_ERROR;

4838:
4839: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4840: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4841: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4842: RAISE OKC_API.G_EXCEPTION_ERROR;
4843: END IF;
4844: --- End store amounts at the header and line level
4845:
4846: END IF; -- if book_class = corporate

Line 4864: p_init_msg_list => OKC_API.G_FALSE,

4860: FOR l_itemlocation_rec in l_itemlocation_csr(l_kle_id) LOOP
4861: IF l_itemlocation_rec.instance_end_date IS NULL THEN-- Instance is not already expired.
4862: expire_item (
4863: p_api_version => p_api_version,
4864: p_init_msg_list => OKC_API.G_FALSE,
4865: x_msg_count => x_msg_count,
4866: x_msg_data => x_msg_data,
4867: x_return_status => x_return_status ,
4868: p_instance_id => l_itemlocation_rec.instance_id,

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

4867: x_return_status => x_return_status ,
4868: p_instance_id => l_itemlocation_rec.instance_id,
4869: p_end_date => l_sys_date);
4870:
4871: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4873: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4874: RAISE OKC_API.G_EXCEPTION_ERROR;
4875: END IF;

Line 4872: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4868: p_instance_id => l_itemlocation_rec.instance_id,
4869: p_end_date => l_sys_date);
4870:
4871: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4873: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4874: RAISE OKC_API.G_EXCEPTION_ERROR;
4875: END IF;
4876:

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

4869: p_end_date => l_sys_date);
4870:
4871: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4873: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4874: RAISE OKC_API.G_EXCEPTION_ERROR;
4875: END IF;
4876:
4877: END IF;

Line 4874: RAISE OKC_API.G_EXCEPTION_ERROR;

4870:
4871: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4873: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4874: RAISE OKC_API.G_EXCEPTION_ERROR;
4875: END IF;
4876:
4877: END IF;
4878:

Line 4888: p_init_msg_list => OKC_API.G_FALSE,

4884: FOR l_itemlocation_rec in l_itemlocation_csr(l_kle_id) LOOP
4885: IF l_itemlocation_rec.instance_end_date IS NULL THEN-- Instance is not already expired.
4886: expire_item (
4887: p_api_version => p_api_version,
4888: p_init_msg_list => OKC_API.G_FALSE,
4889: x_msg_count => x_msg_count,
4890: x_msg_data => x_msg_data,
4891: x_return_status => x_return_status ,
4892: p_instance_id => l_itemlocation_rec.instance_id,

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

4891: x_return_status => x_return_status ,
4892: p_instance_id => l_itemlocation_rec.instance_id,
4893: p_end_date => l_sys_date);
4894:
4895: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4896: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4897: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4898: RAISE OKC_API.G_EXCEPTION_ERROR;
4899: END IF;

Line 4896: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4892: p_instance_id => l_itemlocation_rec.instance_id,
4893: p_end_date => l_sys_date);
4894:
4895: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4896: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4897: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4898: RAISE OKC_API.G_EXCEPTION_ERROR;
4899: END IF;
4900:

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

4893: p_end_date => l_sys_date);
4894:
4895: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4896: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4897: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4898: RAISE OKC_API.G_EXCEPTION_ERROR;
4899: END IF;
4900:
4901: IF instance_counter = l_ordered_quantity THEN -- SECHAWLA 21-OCT-04 3924244

Line 4898: RAISE OKC_API.G_EXCEPTION_ERROR;

4894:
4895: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4896: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4897: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4898: RAISE OKC_API.G_EXCEPTION_ERROR;
4899: END IF;
4900:
4901: IF instance_counter = l_ordered_quantity THEN -- SECHAWLA 21-OCT-04 3924244
4902: EXIT;

Line 4925: p_init_msg_list => OKC_API.G_FALSE,

4921: lp_thpv_rec.id := l_assettrx_rec.id;
4922: lp_thpv_rec.tsu_code := 'CANCELED';
4923: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
4924: p_api_version => p_api_version,
4925: p_init_msg_list => OKC_API.G_FALSE,
4926: x_return_status => x_return_status,
4927: x_msg_count => x_msg_count,
4928: x_msg_data => x_msg_data,
4929: p_thpv_rec => lp_thpv_rec,

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

4928: x_msg_data => x_msg_data,
4929: p_thpv_rec => lp_thpv_rec,
4930: x_thpv_rec => lx_thpv_rec);
4931:
4932: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4933: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4934: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4935: RAISE OKC_API.G_EXCEPTION_ERROR;
4936: END IF;

Line 4933: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4929: p_thpv_rec => lp_thpv_rec,
4930: x_thpv_rec => lx_thpv_rec);
4931:
4932: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4933: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4934: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4935: RAISE OKC_API.G_EXCEPTION_ERROR;
4936: END IF;
4937: END LOOP;

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

4930: x_thpv_rec => lx_thpv_rec);
4931:
4932: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4933: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4934: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4935: RAISE OKC_API.G_EXCEPTION_ERROR;
4936: END IF;
4937: END LOOP;
4938:

Line 4935: RAISE OKC_API.G_EXCEPTION_ERROR;

4931:
4932: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4933: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4934: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4935: RAISE OKC_API.G_EXCEPTION_ERROR;
4936: END IF;
4937: END LOOP;
4938:
4939: -- ++++++++++++++++++++ service contract integration begin ++++++++++++++++++

Line 4963: p_init_msg_list => OKC_API.G_FALSE,

4959: -------------- Securitization Processing -----------------------
4960:
4961: OKL_AM_SECURITIZATION_PVT.process_securitized_streams(
4962: p_api_version => p_api_version,
4963: p_init_msg_list => OKC_API.G_FALSE,
4964: x_return_status => x_return_status,
4965: x_msg_count => x_msg_count,
4966: x_msg_data => x_msg_data,
4967: p_kle_id => l_kle_id,

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

4967: p_kle_id => l_kle_id,
4968: p_sale_price => l_sale_amount,
4969: p_call_origin => OKL_SECURITIZATION_PVT.G_TRX_REASON_ASSET_DISPOSAL);
4970:
4971: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4972: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4973: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4974: RAISE OKC_API.G_EXCEPTION_ERROR;
4975: END IF;

Line 4972: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

4968: p_sale_price => l_sale_amount,
4969: p_call_origin => OKL_SECURITIZATION_PVT.G_TRX_REASON_ASSET_DISPOSAL);
4970:
4971: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4972: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4973: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4974: RAISE OKC_API.G_EXCEPTION_ERROR;
4975: END IF;
4976: -------------- end Securitization Processing -----------------------

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

4969: p_call_origin => OKL_SECURITIZATION_PVT.G_TRX_REASON_ASSET_DISPOSAL);
4970:
4971: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4972: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4973: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4974: RAISE OKC_API.G_EXCEPTION_ERROR;
4975: END IF;
4976: -------------- end Securitization Processing -----------------------
4977: --akrangan added for sla populate sources cr start

Line 4974: RAISE OKC_API.G_EXCEPTION_ERROR;

4970:
4971: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4972: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4973: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4974: RAISE OKC_API.G_EXCEPTION_ERROR;
4975: END IF;
4976: -------------- end Securitization Processing -----------------------
4977: --akrangan added for sla populate sources cr start
4978: IF g_trans_id_tbl.COUNT > 0

Line 4996: p_init_msg_list => okc_api.g_false,

4992: l_fxlv_rec.fa_transaction_id := g_trans_id_tbl(i);
4993: l_fxlv_rec.asset_book_type_name := lx_tlpv_rec.corporate_book;
4994:
4995: okl_sla_acc_sources_pvt.populate_sources(p_api_version => p_api_version,
4996: p_init_msg_list => okc_api.g_false,
4997: p_fxhv_rec => l_fxhv_rec,
4998: p_fxlv_rec => l_fxlv_rec,
4999: x_return_status => x_return_status,
5000: x_msg_count => x_msg_count,

Line 5003: IF (x_return_status = okc_api.g_ret_sts_unexp_error)

4999: x_return_status => x_return_status,
5000: x_msg_count => x_msg_count,
5001: x_msg_data => x_msg_data);
5002:
5003: IF (x_return_status = okc_api.g_ret_sts_unexp_error)
5004: THEN
5005: RAISE okl_api.g_exception_unexpected_error;
5006: ELSIF (x_return_status = okc_api.g_ret_sts_error)
5007: THEN

Line 5006: ELSIF (x_return_status = okc_api.g_ret_sts_error)

5002:
5003: IF (x_return_status = okc_api.g_ret_sts_unexp_error)
5004: THEN
5005: RAISE okl_api.g_exception_unexpected_error;
5006: ELSIF (x_return_status = okc_api.g_ret_sts_error)
5007: THEN
5008: RAISE okl_api.g_exception_error;
5009: END IF;
5010: END LOOP;

Line 5014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

5010: END LOOP;
5011: END IF;
5012: --akrangan added for sla populate sources cr end
5013:
5014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5015: EXCEPTION
5016: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5017:
5018: IF l_orderheaders_csr%ISOPEN THEN

Line 5016: WHEN OKC_API.G_EXCEPTION_ERROR THEN

5012: --akrangan added for sla populate sources cr end
5013:
5014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5015: EXCEPTION
5016: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5017:
5018: IF l_orderheaders_csr%ISOPEN THEN
5019: CLOSE l_orderheaders_csr;
5020: END IF;

Line 5069: x_return_status := OKC_API.HANDLE_EXCEPTIONS

5065: IF l_offlseassettrx_csr%ISOPEN THEN
5066: CLOSE l_offlseassettrx_csr;
5067: END IF;
5068:
5069: x_return_status := OKC_API.HANDLE_EXCEPTIONS
5070: (
5071: l_api_name,
5072: G_PKG_NAME,
5073: 'OKC_API.G_RET_STS_ERROR',

Line 5073: 'OKC_API.G_RET_STS_ERROR',

5069: x_return_status := OKC_API.HANDLE_EXCEPTIONS
5070: (
5071: l_api_name,
5072: G_PKG_NAME,
5073: 'OKC_API.G_RET_STS_ERROR',
5074: x_msg_count,
5075: x_msg_data,
5076: '_PVT'
5077: );

Line 5078: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

5074: x_msg_count,
5075: x_msg_data,
5076: '_PVT'
5077: );
5078: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5079:
5080: IF l_orderheaders_csr%ISOPEN THEN
5081: CLOSE l_orderheaders_csr;
5082: END IF;

Line 5131: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

5127: IF l_offlseassettrx_csr%ISOPEN THEN
5128: CLOSE l_offlseassettrx_csr;
5129: END IF;
5130:
5131: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
5132: (
5133: l_api_name,
5134: G_PKG_NAME,
5135: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 5135: 'OKC_API.G_RET_STS_UNEXP_ERROR',

5131: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
5132: (
5133: l_api_name,
5134: G_PKG_NAME,
5135: 'OKC_API.G_RET_STS_UNEXP_ERROR',
5136: x_msg_count,
5137: x_msg_data,
5138: '_PVT'
5139: );

Line 5193: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

5189: IF l_offlseassettrx_csr%ISOPEN THEN
5190: CLOSE l_offlseassettrx_csr;
5191: END IF;
5192:
5193: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
5194: (
5195: l_api_name,
5196: G_PKG_NAME,
5197: 'OTHERS',

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

5226: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
5227: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
5228: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
5229: l_inv_tbl FA_API_TYPES.inv_tbl_type;
5230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5231: l_api_name CONSTANT VARCHAR2(30) := 'undo_retirement';
5232: l_api_version CONSTANT NUMBER := 1;
5233: l_dummy VARCHAR2(1);
5234:

Line 5250: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

5246: p_api_version,
5247: '_PVT',
5248: x_return_status);
5249:
5250: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5251: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5252: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5253: RAISE OKC_API.G_EXCEPTION_ERROR;
5254: END IF;

Line 5251: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

5247: '_PVT',
5248: x_return_status);
5249:
5250: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5251: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5252: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5253: RAISE OKC_API.G_EXCEPTION_ERROR;
5254: END IF;
5255:

Line 5252: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

5248: x_return_status);
5249:
5250: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5251: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5252: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5253: RAISE OKC_API.G_EXCEPTION_ERROR;
5254: END IF;
5255:
5256: IF p_retirement_id IS NULL OR p_retirement_id = OKL_API.G_MISS_NUM THEN

Line 5253: RAISE OKC_API.G_EXCEPTION_ERROR;

5249:
5250: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5251: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5252: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5253: RAISE OKC_API.G_EXCEPTION_ERROR;
5254: END IF;
5255:
5256: IF p_retirement_id IS NULL OR p_retirement_id = OKL_API.G_MISS_NUM THEN
5257: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 5259: OKC_API.set_message( p_app_name => 'OKC',

5255:
5256: IF p_retirement_id IS NULL OR p_retirement_id = OKL_API.G_MISS_NUM THEN
5257: x_return_status := OKL_API.G_RET_STS_ERROR;
5258: -- retirement id is required
5259: OKC_API.set_message( p_app_name => 'OKC',
5260: p_msg_name => G_REQUIRED_VALUE,
5261: p_token1 => G_COL_NAME_TOKEN,
5262: p_token1_value => 'RETIREMENT_ID');
5263:

Line 5265: RAISE OKC_API.G_EXCEPTION_ERROR;

5261: p_token1 => G_COL_NAME_TOKEN,
5262: p_token1_value => 'RETIREMENT_ID');
5263:
5264:
5265: RAISE OKC_API.G_EXCEPTION_ERROR;
5266: END IF;
5267:
5268: OPEN l_faretirement_csr(p_retirement_id);
5269: FETCH l_faretirement_csr INTO l_dummy;

Line 5273: OKC_API.set_message( p_app_name => 'OKC',

5269: FETCH l_faretirement_csr INTO l_dummy;
5270: IF l_faretirement_csr%NOTFOUND THEN
5271: x_return_status := OKL_API.G_RET_STS_ERROR;
5272: -- retirement id is invalid
5273: OKC_API.set_message( p_app_name => 'OKC',
5274: p_msg_name => G_INVALID_VALUE,
5275: p_token1 => G_COL_NAME_TOKEN,
5276: p_token1_value => 'RETIREMENT_ID');
5277:

Line 5279: RAISE OKC_API.G_EXCEPTION_ERROR;

5275: p_token1 => G_COL_NAME_TOKEN,
5276: p_token1_value => 'RETIREMENT_ID');
5277:
5278:
5279: RAISE OKC_API.G_EXCEPTION_ERROR;
5280: END IF;
5281: CLOSE l_faretirement_csr;
5282:
5283: -- transaction information

Line 5296: p_init_msg_list => OKC_API.G_FALSE,

5292: l_asset_retire_rec.retirement_id := p_retirement_id;
5293:
5294:
5295: FA_RETIREMENT_PUB.undo_retirement( p_api_version => p_api_version,
5296: p_init_msg_list => OKC_API.G_FALSE,
5297: p_commit => FND_API.G_FALSE,
5298: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
5299: p_calling_fn => NULL,
5300: x_return_status => x_return_status,

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

5303: px_trans_rec => l_trans_rec,
5304: px_asset_hdr_rec => l_asset_hdr_rec,
5305: px_asset_retire_rec => l_asset_retire_rec );
5306:
5307: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5308: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5309: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5310: RAISE OKC_API.G_EXCEPTION_ERROR;
5311: END IF;

Line 5308: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

5304: px_asset_hdr_rec => l_asset_hdr_rec,
5305: px_asset_retire_rec => l_asset_retire_rec );
5306:
5307: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5308: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5309: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5310: RAISE OKC_API.G_EXCEPTION_ERROR;
5311: END IF;
5312:

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

5305: px_asset_retire_rec => l_asset_retire_rec );
5306:
5307: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5308: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5309: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5310: RAISE OKC_API.G_EXCEPTION_ERROR;
5311: END IF;
5312:
5313:

Line 5310: RAISE OKC_API.G_EXCEPTION_ERROR;

5306:
5307: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5308: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5309: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5310: RAISE OKC_API.G_EXCEPTION_ERROR;
5311: END IF;
5312:
5313:
5314: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 5314: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

5310: RAISE OKC_API.G_EXCEPTION_ERROR;
5311: END IF;
5312:
5313:
5314: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5315: EXCEPTION
5316: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5317: IF l_faretirement_csr%ISOPEN THEN
5318: CLOSE l_faretirement_csr;

Line 5316: WHEN OKC_API.G_EXCEPTION_ERROR THEN

5312:
5313:
5314: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5315: EXCEPTION
5316: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5317: IF l_faretirement_csr%ISOPEN THEN
5318: CLOSE l_faretirement_csr;
5319: END IF;
5320: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 5320: x_return_status := OKC_API.HANDLE_EXCEPTIONS

5316: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5317: IF l_faretirement_csr%ISOPEN THEN
5318: CLOSE l_faretirement_csr;
5319: END IF;
5320: x_return_status := OKC_API.HANDLE_EXCEPTIONS
5321: (
5322: l_api_name,
5323: G_PKG_NAME,
5324: 'OKC_API.G_RET_STS_ERROR',

Line 5324: 'OKC_API.G_RET_STS_ERROR',

5320: x_return_status := OKC_API.HANDLE_EXCEPTIONS
5321: (
5322: l_api_name,
5323: G_PKG_NAME,
5324: 'OKC_API.G_RET_STS_ERROR',
5325: x_msg_count,
5326: x_msg_data,
5327: '_PVT'
5328: );

Line 5329: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

5325: x_msg_count,
5326: x_msg_data,
5327: '_PVT'
5328: );
5329: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5330: IF l_faretirement_csr%ISOPEN THEN
5331: CLOSE l_faretirement_csr;
5332: END IF;
5333: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

Line 5333: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

5329: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5330: IF l_faretirement_csr%ISOPEN THEN
5331: CLOSE l_faretirement_csr;
5332: END IF;
5333: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
5334: (
5335: l_api_name,
5336: G_PKG_NAME,
5337: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 5337: 'OKC_API.G_RET_STS_UNEXP_ERROR',

5333: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
5334: (
5335: l_api_name,
5336: G_PKG_NAME,
5337: 'OKC_API.G_RET_STS_UNEXP_ERROR',
5338: x_msg_count,
5339: x_msg_data,
5340: '_PVT'
5341: );

Line 5346: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

5342: WHEN OTHERS THEN
5343: IF l_faretirement_csr%ISOPEN THEN
5344: CLOSE l_faretirement_csr;
5345: END IF;
5346: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
5347: (
5348: l_api_name,
5349: G_PKG_NAME,
5350: 'OTHERS',