APPS.OKL_COPY_CONTRACT_PVT dependencies on OKX_ASSETS_V

Line 8216: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;

8212: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
8213: ln_dummy1 NUMBER := 0;
8214: ln_dummy2 NUMBER := 0;
8215: ln_dummy3 NUMBER := 0;
8216: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;
8217: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
8218: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXP_ERROR';
8219: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
8220: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';

Line 8228: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE)

8224: SELECT 'OKL'||OKL_FAN_SEQ.NEXTVAL
8225: FROM dual;
8226:
8227: -- cursor to get check the existence of asset number
8228: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE)
8229: IS
8230: SELECT 1
8231: FROM DUAL
8232: WHERE EXISTS (SELECT '1'

Line 8236: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS

8232: WHERE EXISTS (SELECT '1'
8233: FROM OKL_TXL_ASSETS_B
8234: WHERE asset_number = p_asset_number);
8235:
8236: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
8237: SELECT 1
8238: FROM DUAL
8239: WHERE EXISTS (SELECT '1'
8240: FROM OKX_ASSET_LINES_V

Line 8243: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS

8239: WHERE EXISTS (SELECT '1'
8240: FROM OKX_ASSET_LINES_V
8241: WHERE asset_number = p_asset_number);
8242:
8243: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
8244: SELECT 1
8245: FROM DUAL
8246: WHERE EXISTS (SELECT '1'
8247: FROM OKX_ASSETS_V

Line 8247: FROM OKX_ASSETS_V

8243: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
8244: SELECT 1
8245: FROM DUAL
8246: WHERE EXISTS (SELECT '1'
8247: FROM OKX_ASSETS_V
8248: WHERE asset_number = p_asset_number);
8249:
8250: BEGIN
8251: OPEN c_asset_no;

Line 8281: OPEN c_okx_assets_v(lv_asset_number);

8277: ln_dummy2 := 0;
8278: END IF;
8279: CLOSE c_okx_asset_lines_v;
8280:
8281: OPEN c_okx_assets_v(lv_asset_number);
8282: FETCH c_okx_assets_v INTO ln_dummy3;
8283: IF c_okx_assets_v%NOTFOUND THEN
8284: ln_dummy3 := 0;
8285: END IF;

Line 8282: FETCH c_okx_assets_v INTO ln_dummy3;

8278: END IF;
8279: CLOSE c_okx_asset_lines_v;
8280:
8281: OPEN c_okx_assets_v(lv_asset_number);
8282: FETCH c_okx_assets_v INTO ln_dummy3;
8283: IF c_okx_assets_v%NOTFOUND THEN
8284: ln_dummy3 := 0;
8285: END IF;
8286: CLOSE c_okx_assets_v;

Line 8283: IF c_okx_assets_v%NOTFOUND THEN

8279: CLOSE c_okx_asset_lines_v;
8280:
8281: OPEN c_okx_assets_v(lv_asset_number);
8282: FETCH c_okx_assets_v INTO ln_dummy3;
8283: IF c_okx_assets_v%NOTFOUND THEN
8284: ln_dummy3 := 0;
8285: END IF;
8286: CLOSE c_okx_assets_v;
8287:

Line 8286: CLOSE c_okx_assets_v;

8282: FETCH c_okx_assets_v INTO ln_dummy3;
8283: IF c_okx_assets_v%NOTFOUND THEN
8284: ln_dummy3 := 0;
8285: END IF;
8286: CLOSE c_okx_assets_v;
8287:
8288: IF ln_dummy1 = 1 OR
8289: ln_dummy2 = 1 OR
8290: ln_dummy3 = 1 THEN

Line 8320: IF c_okx_assets_v%ISOPEN THEN

8316: END IF;
8317: IF c_okx_asset_lines_v%ISOPEN THEN
8318: CLOSE c_okx_asset_lines_v;
8319: END IF;
8320: IF c_okx_assets_v%ISOPEN THEN
8321: CLOSE c_okx_assets_v;
8322: END IF;
8323: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
8324: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

Line 8321: CLOSE c_okx_assets_v;

8317: IF c_okx_asset_lines_v%ISOPEN THEN
8318: CLOSE c_okx_asset_lines_v;
8319: END IF;
8320: IF c_okx_assets_v%ISOPEN THEN
8321: CLOSE c_okx_assets_v;
8322: END IF;
8323: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
8324: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
8325: p_msg_name => g_unexpected_error,