APPS.OKL_COPY_CONTRACT_PVT dependencies on OKX_ASSETS_V

Line 8303: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;

8299: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
8300: ln_dummy1 NUMBER := 0;
8301: ln_dummy2 NUMBER := 0;
8302: ln_dummy3 NUMBER := 0;
8303: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;
8304: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
8305: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXP_ERROR';
8306: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
8307: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';

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

8311: SELECT 'OKL'||OKL_FAN_SEQ.NEXTVAL
8312: FROM dual;
8313:
8314: -- cursor to get check the existence of asset number
8315: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE)
8316: IS
8317: SELECT 1
8318: FROM DUAL
8319: WHERE EXISTS (SELECT '1'

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

8319: WHERE EXISTS (SELECT '1'
8320: FROM OKL_TXL_ASSETS_B
8321: WHERE asset_number = p_asset_number);
8322:
8323: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
8324: SELECT 1
8325: FROM DUAL
8326: WHERE EXISTS (SELECT '1'
8327: FROM OKX_ASSET_LINES_V

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

8326: WHERE EXISTS (SELECT '1'
8327: FROM OKX_ASSET_LINES_V
8328: WHERE asset_number = p_asset_number);
8329:
8330: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
8331: SELECT 1
8332: FROM DUAL
8333: WHERE EXISTS (SELECT '1'
8334: FROM OKX_ASSETS_V

Line 8334: FROM OKX_ASSETS_V

8330: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
8331: SELECT 1
8332: FROM DUAL
8333: WHERE EXISTS (SELECT '1'
8334: FROM OKX_ASSETS_V
8335: WHERE asset_number = p_asset_number);
8336:
8337: BEGIN
8338: OPEN c_asset_no;

Line 8368: OPEN c_okx_assets_v(lv_asset_number);

8364: ln_dummy2 := 0;
8365: END IF;
8366: CLOSE c_okx_asset_lines_v;
8367:
8368: OPEN c_okx_assets_v(lv_asset_number);
8369: FETCH c_okx_assets_v INTO ln_dummy3;
8370: IF c_okx_assets_v%NOTFOUND THEN
8371: ln_dummy3 := 0;
8372: END IF;

Line 8369: FETCH c_okx_assets_v INTO ln_dummy3;

8365: END IF;
8366: CLOSE c_okx_asset_lines_v;
8367:
8368: OPEN c_okx_assets_v(lv_asset_number);
8369: FETCH c_okx_assets_v INTO ln_dummy3;
8370: IF c_okx_assets_v%NOTFOUND THEN
8371: ln_dummy3 := 0;
8372: END IF;
8373: CLOSE c_okx_assets_v;

Line 8370: IF c_okx_assets_v%NOTFOUND THEN

8366: CLOSE c_okx_asset_lines_v;
8367:
8368: OPEN c_okx_assets_v(lv_asset_number);
8369: FETCH c_okx_assets_v INTO ln_dummy3;
8370: IF c_okx_assets_v%NOTFOUND THEN
8371: ln_dummy3 := 0;
8372: END IF;
8373: CLOSE c_okx_assets_v;
8374:

Line 8373: CLOSE c_okx_assets_v;

8369: FETCH c_okx_assets_v INTO ln_dummy3;
8370: IF c_okx_assets_v%NOTFOUND THEN
8371: ln_dummy3 := 0;
8372: END IF;
8373: CLOSE c_okx_assets_v;
8374:
8375: IF ln_dummy1 = 1 OR
8376: ln_dummy2 = 1 OR
8377: ln_dummy3 = 1 THEN

Line 8407: IF c_okx_assets_v%ISOPEN THEN

8403: END IF;
8404: IF c_okx_asset_lines_v%ISOPEN THEN
8405: CLOSE c_okx_asset_lines_v;
8406: END IF;
8407: IF c_okx_assets_v%ISOPEN THEN
8408: CLOSE c_okx_assets_v;
8409: END IF;
8410: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
8411: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

Line 8408: CLOSE c_okx_assets_v;

8404: IF c_okx_asset_lines_v%ISOPEN THEN
8405: CLOSE c_okx_asset_lines_v;
8406: END IF;
8407: IF c_okx_assets_v%ISOPEN THEN
8408: CLOSE c_okx_assets_v;
8409: END IF;
8410: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
8411: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
8412: p_msg_name => g_unexpected_error,