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_CREATE_KLE_PVT dependencies on OKX_ASSETS_V

Line 202: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;

198: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
199: ln_dummy1 NUMBER := 0;
200: ln_dummy2 NUMBER := 0;
201: ln_dummy3 NUMBER := 0;
202: lv_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE;
203: -- cursor to get sequence number for asset number
204: Cursor c_asset_no IS
205: select 'OKL'||OKL_FAN_SEQ.NEXTVAL
206: FROM dual;

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

205: select 'OKL'||OKL_FAN_SEQ.NEXTVAL
206: FROM dual;
207:
208: -- cursor to get check the existence of asset number
209: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE)
210: IS
211: SELECT 1
212: --FROM DUAL
213: --WHERE EXISTS (SELECT '1'

Line 217: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

213: --WHERE EXISTS (SELECT '1'
214: FROM OKL_TXL_ASSETS_B
215: WHERE asset_number = p_asset_number; --);
216:
217: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
218: SELECT 1
219: --FROM DUAL
220: --WHERE EXISTS (SELECT '1'
221: FROM OKX_ASSET_LINES_V

Line 224: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

220: --WHERE EXISTS (SELECT '1'
221: FROM OKX_ASSET_LINES_V
222: WHERE asset_number = p_asset_number; --); */
223:
224: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
225: SELECT 1
226: FROM fa_additions a
227: WHERE a.asset_number = p_asset_number
228: and exists

Line 236: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

232: and b.object1_id1 = to_char(a.asset_id)
233: );
234:
235:
236: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
237: SELECT 1
238: --FROM DUAL
239: --WHERE EXISTS (SELECT '1'
240: FROM OKX_ASSETS_V

Line 240: FROM OKX_ASSETS_V

236: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
237: SELECT 1
238: --FROM DUAL
239: --WHERE EXISTS (SELECT '1'
240: FROM OKX_ASSETS_V
241: WHERE asset_number = p_asset_number; --);
242:
243: BEGIN
244: OPEN c_asset_no;

Line 274: OPEN c_okx_assets_v(lv_asset_number);

270: ln_dummy2 := 0;
271: END IF;
272: CLOSE c_okx_asset_lines_v;
273:
274: OPEN c_okx_assets_v(lv_asset_number);
275: FETCH c_okx_assets_v INTO ln_dummy3;
276: IF c_okx_assets_v%NOTFOUND THEN
277: ln_dummy3 := 0;
278: END IF;

Line 275: FETCH c_okx_assets_v INTO ln_dummy3;

271: END IF;
272: CLOSE c_okx_asset_lines_v;
273:
274: OPEN c_okx_assets_v(lv_asset_number);
275: FETCH c_okx_assets_v INTO ln_dummy3;
276: IF c_okx_assets_v%NOTFOUND THEN
277: ln_dummy3 := 0;
278: END IF;
279: CLOSE c_okx_assets_v;

Line 276: IF c_okx_assets_v%NOTFOUND THEN

272: CLOSE c_okx_asset_lines_v;
273:
274: OPEN c_okx_assets_v(lv_asset_number);
275: FETCH c_okx_assets_v INTO ln_dummy3;
276: IF c_okx_assets_v%NOTFOUND THEN
277: ln_dummy3 := 0;
278: END IF;
279: CLOSE c_okx_assets_v;
280:

Line 279: CLOSE c_okx_assets_v;

275: FETCH c_okx_assets_v INTO ln_dummy3;
276: IF c_okx_assets_v%NOTFOUND THEN
277: ln_dummy3 := 0;
278: END IF;
279: CLOSE c_okx_assets_v;
280:
281: IF ln_dummy1 = 1 OR
282: ln_dummy2 = 1 OR
283: ln_dummy3 = 1 THEN

Line 313: IF c_okx_assets_v%ISOPEN THEN

309: END IF;
310: IF c_okx_asset_lines_v%ISOPEN THEN
311: CLOSE c_okx_asset_lines_v;
312: END IF;
313: IF c_okx_assets_v%ISOPEN THEN
314: CLOSE c_okx_assets_v;
315: END IF;
316: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
317: OKL_API.SET_MESSAGE(p_app_name => g_app_name,

Line 314: CLOSE c_okx_assets_v;

310: IF c_okx_asset_lines_v%ISOPEN THEN
311: CLOSE c_okx_asset_lines_v;
312: END IF;
313: IF c_okx_assets_v%ISOPEN THEN
314: CLOSE c_okx_assets_v;
315: END IF;
316: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
317: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
318: p_msg_name => g_unexpected_error,

Line 2494: ln_okx_assets_v NUMBER := 0;

2490: p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
2491: p_kle_Id IN OKL_TXL_ASSETS_V.KLE_ID%TYPE,
2492: p_dnz_chr_id IN OKC_K_HEADERS_B.ID%TYPE) IS
2493: ln_okl_txl_assets_v NUMBER := 0;
2494: ln_okx_assets_v NUMBER := 0;
2495: ln_okx_asset_lines_v NUMBER := 0;
2496: ln_okl_txd_assets_v NUMBER := 0;
2497: lv_source_code OKC_K_HEADERS_B.ORIG_SYSTEM_SOURCE_CODE%TYPE;
2498: lv_asset_source_code OKC_K_LINES_B.ORIG_SYSTEM_SOURCE_CODE%TYPE;

Line 2513: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,

2509: FROM OKC_K_LINES_B
2510: WHERE ID = p_kle_Id)
2511: AND language = USERENV('lang');
2512:
2513: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
2514: p_kle_Id OKL_TXL_ASSETS_V.KLE_ID%TYPE)
2515: IS
2516: SELECT 1
2517: --FROM DUAL

Line 2523: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2519: FROM OKL_TXL_ASSETS_B
2520: WHERE asset_number = p_asset_number
2521: AND kle_id <> p_kle_id; --);
2522:
2523: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2524: SELECT 1
2525: --FROM DUAL
2526: --WHERE EXISTS (SELECT '1'
2527: FROM OKX_ASSET_LINES_V

Line 2530: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2526: --WHERE EXISTS (SELECT '1'
2527: FROM OKX_ASSET_LINES_V
2528: WHERE asset_number = p_asset_number; --);
2529:
2530: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2531: SELECT 1
2532: --FROM DUAL
2533: --WHERE EXISTS (SELECT '1'
2534: FROM OKX_ASSETS_V

Line 2534: FROM OKX_ASSETS_V

2530: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2531: SELECT 1
2532: --FROM DUAL
2533: --WHERE EXISTS (SELECT '1'
2534: FROM OKX_ASSETS_V
2535: WHERE asset_number = p_asset_number; --);
2536:
2537: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2538: SELECT 1

Line 2537: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2533: --WHERE EXISTS (SELECT '1'
2534: FROM OKX_ASSETS_V
2535: WHERE asset_number = p_asset_number; --);
2536:
2537: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2538: SELECT 1
2539: --FROM DUAL
2540: --WHERE EXISTS (SELECT '1'
2541: FROM OKL_TRX_ASSETS TAS,

Line 2566: CURSOR c_check_release_asset(p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2562: FROM OKC_RULES_V
2563: WHERE DNZ_CHR_ID = p_dnz_chr_id
2564: AND RULE_INFORMATION_CATEGORY = 'LARLES';*/
2565:
2566: CURSOR c_check_release_asset(p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2567: SELECT 'Y'
2568: FROM okl_asset_returns_all_b KAR
2569: WHERE KAR.kle_id IN (SELECT KLE.cle_id
2570: FROM okl_txl_assets_b TXL

Line 2670: -- Validate if the Asset Number exists in OKX_ASSETS_V

2666: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2667: END IF;
2668: CLOSE c_txl_asset_number;
2669:
2670: -- Validate if the Asset Number exists in OKX_ASSETS_V
2671: OPEN c_okx_assets_v(p_asset_number);
2672: FETCH c_okx_assets_v into ln_okx_assets_v;
2673: IF c_okx_assets_v%NOTFOUND THEN
2674: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2671: OPEN c_okx_assets_v(p_asset_number);

2667: END IF;
2668: CLOSE c_txl_asset_number;
2669:
2670: -- Validate if the Asset Number exists in OKX_ASSETS_V
2671: OPEN c_okx_assets_v(p_asset_number);
2672: FETCH c_okx_assets_v into ln_okx_assets_v;
2673: IF c_okx_assets_v%NOTFOUND THEN
2674: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2675: END IF;

Line 2672: FETCH c_okx_assets_v into ln_okx_assets_v;

2668: CLOSE c_txl_asset_number;
2669:
2670: -- Validate if the Asset Number exists in OKX_ASSETS_V
2671: OPEN c_okx_assets_v(p_asset_number);
2672: FETCH c_okx_assets_v into ln_okx_assets_v;
2673: IF c_okx_assets_v%NOTFOUND THEN
2674: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2675: END IF;
2676: CLOSE c_okx_assets_v;

Line 2673: IF c_okx_assets_v%NOTFOUND THEN

2669:
2670: -- Validate if the Asset Number exists in OKX_ASSETS_V
2671: OPEN c_okx_assets_v(p_asset_number);
2672: FETCH c_okx_assets_v into ln_okx_assets_v;
2673: IF c_okx_assets_v%NOTFOUND THEN
2674: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2675: END IF;
2676: CLOSE c_okx_assets_v;
2677:

Line 2676: CLOSE c_okx_assets_v;

2672: FETCH c_okx_assets_v into ln_okx_assets_v;
2673: IF c_okx_assets_v%NOTFOUND THEN
2674: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2675: END IF;
2676: CLOSE c_okx_assets_v;
2677:
2678: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2679: OPEN c_okx_asset_lines_v(p_asset_number);
2680: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

Line 2706: -- Validate if the Asset Number exists in OKX_ASSETS_V

2702: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2703: END IF;
2704: CLOSE c_txl_asset_number;
2705:
2706: -- Validate if the Asset Number exists in OKX_ASSETS_V
2707: OPEN c_okx_assets_v(p_asset_number);
2708: FETCH c_okx_assets_v into ln_okx_assets_v;
2709: IF c_okx_assets_v%NOTFOUND THEN
2710: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2707: OPEN c_okx_assets_v(p_asset_number);

2703: END IF;
2704: CLOSE c_txl_asset_number;
2705:
2706: -- Validate if the Asset Number exists in OKX_ASSETS_V
2707: OPEN c_okx_assets_v(p_asset_number);
2708: FETCH c_okx_assets_v into ln_okx_assets_v;
2709: IF c_okx_assets_v%NOTFOUND THEN
2710: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2711: END IF;

Line 2708: FETCH c_okx_assets_v into ln_okx_assets_v;

2704: CLOSE c_txl_asset_number;
2705:
2706: -- Validate if the Asset Number exists in OKX_ASSETS_V
2707: OPEN c_okx_assets_v(p_asset_number);
2708: FETCH c_okx_assets_v into ln_okx_assets_v;
2709: IF c_okx_assets_v%NOTFOUND THEN
2710: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2711: END IF;
2712: CLOSE c_okx_assets_v;

Line 2709: IF c_okx_assets_v%NOTFOUND THEN

2705:
2706: -- Validate if the Asset Number exists in OKX_ASSETS_V
2707: OPEN c_okx_assets_v(p_asset_number);
2708: FETCH c_okx_assets_v into ln_okx_assets_v;
2709: IF c_okx_assets_v%NOTFOUND THEN
2710: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2711: END IF;
2712: CLOSE c_okx_assets_v;
2713:

Line 2712: CLOSE c_okx_assets_v;

2708: FETCH c_okx_assets_v into ln_okx_assets_v;
2709: IF c_okx_assets_v%NOTFOUND THEN
2710: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2711: END IF;
2712: CLOSE c_okx_assets_v;
2713:
2714: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2715: OPEN c_okx_asset_lines_v(p_asset_number);
2716: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

Line 2743: -- Validate if the Asset Number exists in OKX_ASSETS_V

2739: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2740: END IF;
2741: CLOSE c_txl_asset_number;
2742:
2743: -- Validate if the Asset Number exists in OKX_ASSETS_V
2744: OPEN c_okx_assets_v(p_asset_number);
2745: FETCH c_okx_assets_v into ln_okx_assets_v;
2746: IF c_okx_assets_v%NOTFOUND THEN
2747: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2744: OPEN c_okx_assets_v(p_asset_number);

2740: END IF;
2741: CLOSE c_txl_asset_number;
2742:
2743: -- Validate if the Asset Number exists in OKX_ASSETS_V
2744: OPEN c_okx_assets_v(p_asset_number);
2745: FETCH c_okx_assets_v into ln_okx_assets_v;
2746: IF c_okx_assets_v%NOTFOUND THEN
2747: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2748: END IF;

Line 2745: FETCH c_okx_assets_v into ln_okx_assets_v;

2741: CLOSE c_txl_asset_number;
2742:
2743: -- Validate if the Asset Number exists in OKX_ASSETS_V
2744: OPEN c_okx_assets_v(p_asset_number);
2745: FETCH c_okx_assets_v into ln_okx_assets_v;
2746: IF c_okx_assets_v%NOTFOUND THEN
2747: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2748: END IF;
2749: CLOSE c_okx_assets_v;

Line 2746: IF c_okx_assets_v%NOTFOUND THEN

2742:
2743: -- Validate if the Asset Number exists in OKX_ASSETS_V
2744: OPEN c_okx_assets_v(p_asset_number);
2745: FETCH c_okx_assets_v into ln_okx_assets_v;
2746: IF c_okx_assets_v%NOTFOUND THEN
2747: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2748: END IF;
2749: CLOSE c_okx_assets_v;
2750:

Line 2749: CLOSE c_okx_assets_v;

2745: FETCH c_okx_assets_v into ln_okx_assets_v;
2746: IF c_okx_assets_v%NOTFOUND THEN
2747: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2748: END IF;
2749: CLOSE c_okx_assets_v;
2750:
2751: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2752: OPEN c_okx_asset_lines_v(p_asset_number);
2753: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

Line 2769: IF (ln_okl_txl_assets_v = 1) OR (ln_okx_assets_v = 1) OR

2765: END IF;
2766: CLOSE c_txd_assets_v;
2767: END IF;
2768:
2769: IF (ln_okl_txl_assets_v = 1) OR (ln_okx_assets_v = 1) OR
2770: (ln_okx_asset_lines_v = 1) OR (ln_okl_txd_assets_v = 1) THEN
2771: -- store SQL error message on message stack
2772: OKL_API.set_message(p_app_name => G_APP_NAME,
2773: p_msg_name => G_ASSET_NUMBER);

Line 2775: ELSIF (ln_okl_txl_assets_v = 1) AND (ln_okx_assets_v = 1) AND

2771: -- store SQL error message on message stack
2772: OKL_API.set_message(p_app_name => G_APP_NAME,
2773: p_msg_name => G_ASSET_NUMBER);
2774: RAISE G_EXCEPTION_HALT_VALIDATION;
2775: ELSIF (ln_okl_txl_assets_v = 1) AND (ln_okx_assets_v = 1) AND
2776: (ln_okx_asset_lines_v = 1) AND (ln_okl_txd_assets_v = 1) THEN
2777: -- store SQL error message on message stack
2778: OKL_API.set_message(p_app_name => G_APP_NAME,
2779: p_msg_name => G_ASSET_NUMBER);

Line 2796: IF c_okx_assets_v%ISOPEN THEN

2792: END IF;
2793: IF c_source_code%ISOPEN THEN
2794: CLOSE c_source_code;
2795: END IF;
2796: IF c_okx_assets_v%ISOPEN THEN
2797: CLOSE c_okx_assets_v;
2798: END IF;
2799: IF c_okx_asset_lines_v%ISOPEN THEN
2800: CLOSE c_okx_asset_lines_v;

Line 2797: CLOSE c_okx_assets_v;

2793: IF c_source_code%ISOPEN THEN
2794: CLOSE c_source_code;
2795: END IF;
2796: IF c_okx_assets_v%ISOPEN THEN
2797: CLOSE c_okx_assets_v;
2798: END IF;
2799: IF c_okx_asset_lines_v%ISOPEN THEN
2800: CLOSE c_okx_asset_lines_v;
2801: END IF;

Line 2816: IF c_okx_assets_v%ISOPEN THEN

2812: END IF;
2813: IF c_source_code%ISOPEN THEN
2814: CLOSE c_source_code;
2815: END IF;
2816: IF c_okx_assets_v%ISOPEN THEN
2817: CLOSE c_okx_assets_v;
2818: END IF;
2819: IF c_okx_asset_lines_v%ISOPEN THEN
2820: CLOSE c_okx_asset_lines_v;

Line 2817: CLOSE c_okx_assets_v;

2813: IF c_source_code%ISOPEN THEN
2814: CLOSE c_source_code;
2815: END IF;
2816: IF c_okx_assets_v%ISOPEN THEN
2817: CLOSE c_okx_assets_v;
2818: END IF;
2819: IF c_okx_asset_lines_v%ISOPEN THEN
2820: CLOSE c_okx_asset_lines_v;
2821: END IF;

Line 2843: IF c_okx_assets_v%ISOPEN THEN

2839: END IF;
2840: IF c_source_code%ISOPEN THEN
2841: CLOSE c_source_code;
2842: END IF;
2843: IF c_okx_assets_v%ISOPEN THEN
2844: CLOSE c_okx_assets_v;
2845: END IF;
2846: IF c_okx_asset_lines_v%ISOPEN THEN
2847: CLOSE c_okx_asset_lines_v;

Line 2844: CLOSE c_okx_assets_v;

2840: IF c_source_code%ISOPEN THEN
2841: CLOSE c_source_code;
2842: END IF;
2843: IF c_okx_assets_v%ISOPEN THEN
2844: CLOSE c_okx_assets_v;
2845: END IF;
2846: IF c_okx_asset_lines_v%ISOPEN THEN
2847: CLOSE c_okx_asset_lines_v;
2848: END IF;

Line 2870: ln_okx_assets_v NUMBER := 0;

2866: PROCEDURE validate_new_asset_number(x_return_status OUT NOCOPY VARCHAR2,
2867: p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
2868: p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS
2869: ln_okl_txl_assets_v NUMBER := 0;
2870: ln_okx_assets_v NUMBER := 0;
2871: ln_okx_asset_lines_v NUMBER := 0;
2872: ln_okl_txd_assets_v NUMBER := 0;
2873: lv_release_asset OKC_RULES_V.RULE_INFORMATION1%TYPE := 'N';
2874:

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

2871: ln_okx_asset_lines_v NUMBER := 0;
2872: ln_okl_txd_assets_v NUMBER := 0;
2873: lv_release_asset OKC_RULES_V.RULE_INFORMATION1%TYPE := 'N';
2874:
2875: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2876: SELECT 1
2877: --FROM DUAL
2878: --WHERE EXISTS (SELECT '1'
2879: FROM OKL_TXL_ASSETS_B

Line 2881: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2877: --FROM DUAL
2878: --WHERE EXISTS (SELECT '1'
2879: FROM OKL_TXL_ASSETS_B
2880: WHERE asset_number = p_asset_number; --);
2881: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2882: SELECT 1
2883: --FROM DUAL
2884: --WHERE EXISTS (SELECT '1'
2885: FROM OKX_ASSET_LINES_V

Line 2887: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2883: --FROM DUAL
2884: --WHERE EXISTS (SELECT '1'
2885: FROM OKX_ASSET_LINES_V
2886: WHERE asset_number = p_asset_number; --); */
2887: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2888: SELECT 1
2889: FROM fa_additions a
2890: WHERE a.asset_number = p_asset_number
2891: and exists

Line 2898: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2894: where b.jtot_object1_code = 'OKX_ASSET'
2895: and b.object1_id1 = to_char(a.asset_id)
2896: );
2897:
2898: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2899: SELECT 1
2900: --FROM DUAL
2901: --WHERE EXISTS (SELECT '1'
2902: FROM OKX_ASSETS_V

Line 2902: FROM OKX_ASSETS_V

2898: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2899: SELECT 1
2900: --FROM DUAL
2901: --WHERE EXISTS (SELECT '1'
2902: FROM OKX_ASSETS_V
2903: WHERE asset_number = p_asset_number; --);
2904:
2905: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2906: SELECT 1

Line 2905: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2901: --WHERE EXISTS (SELECT '1'
2902: FROM OKX_ASSETS_V
2903: WHERE asset_number = p_asset_number; --);
2904:
2905: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2906: SELECT 1
2907: --FROM DUAL
2908: --WHERE EXISTS (SELECT '1'
2909: FROM OKL_TRX_ASSETS TAS,

Line 2927: CURSOR c_check_release_asset(p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

2923: FROM OKC_RULES_V
2924: WHERE DNZ_CHR_ID = p_dnz_chr_id
2925: AND RULE_INFORMATION_CATEGORY = 'LARLES';*/
2926:
2927: CURSOR c_check_release_asset(p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2928: SELECT 'Y'
2929: FROM okl_asset_returns_all_b KAR
2930: WHERE KAR.kle_id IN (SELECT KLE.cle_id
2931: FROM okl_txl_assets_b TXL

Line 2994: -- Validate if the Asset Number exists in OKX_ASSETS_V

2990: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2991: END IF;
2992: CLOSE c_txl_asset_number;
2993:
2994: -- Validate if the Asset Number exists in OKX_ASSETS_V
2995: OPEN c_okx_assets_v(p_asset_number);
2996: FETCH c_okx_assets_v into ln_okx_assets_v;
2997: IF c_okx_assets_v%NOTFOUND THEN
2998: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2995: OPEN c_okx_assets_v(p_asset_number);

2991: END IF;
2992: CLOSE c_txl_asset_number;
2993:
2994: -- Validate if the Asset Number exists in OKX_ASSETS_V
2995: OPEN c_okx_assets_v(p_asset_number);
2996: FETCH c_okx_assets_v into ln_okx_assets_v;
2997: IF c_okx_assets_v%NOTFOUND THEN
2998: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2999: END IF;

Line 2996: FETCH c_okx_assets_v into ln_okx_assets_v;

2992: CLOSE c_txl_asset_number;
2993:
2994: -- Validate if the Asset Number exists in OKX_ASSETS_V
2995: OPEN c_okx_assets_v(p_asset_number);
2996: FETCH c_okx_assets_v into ln_okx_assets_v;
2997: IF c_okx_assets_v%NOTFOUND THEN
2998: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2999: END IF;
3000: CLOSE c_okx_assets_v;

Line 2997: IF c_okx_assets_v%NOTFOUND THEN

2993:
2994: -- Validate if the Asset Number exists in OKX_ASSETS_V
2995: OPEN c_okx_assets_v(p_asset_number);
2996: FETCH c_okx_assets_v into ln_okx_assets_v;
2997: IF c_okx_assets_v%NOTFOUND THEN
2998: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2999: END IF;
3000: CLOSE c_okx_assets_v;
3001:

Line 3000: CLOSE c_okx_assets_v;

2996: FETCH c_okx_assets_v into ln_okx_assets_v;
2997: IF c_okx_assets_v%NOTFOUND THEN
2998: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2999: END IF;
3000: CLOSE c_okx_assets_v;
3001:
3002: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
3003: OPEN c_okx_asset_lines_v(p_asset_number);
3004: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

Line 3019: IF (ln_okl_txl_assets_v = 1) OR (ln_okx_assets_v = 1) OR

3015: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3016: END IF;
3017: CLOSE c_txd_assets_v;
3018:
3019: IF (ln_okl_txl_assets_v = 1) OR (ln_okx_assets_v = 1) OR
3020: (ln_okx_asset_lines_v = 1) OR (ln_okl_txd_assets_v = 1) THEN
3021: -- store SQL error message on message stack
3022: OKL_API.set_message(p_app_name => G_APP_NAME,
3023: p_msg_name => G_ASSET_NUMBER);

Line 3025: ELSIF (ln_okl_txl_assets_v = 1) AND (ln_okx_assets_v = 1) AND

3021: -- store SQL error message on message stack
3022: OKL_API.set_message(p_app_name => G_APP_NAME,
3023: p_msg_name => G_ASSET_NUMBER);
3024: RAISE G_EXCEPTION_HALT_VALIDATION;
3025: ELSIF (ln_okl_txl_assets_v = 1) AND (ln_okx_assets_v = 1) AND
3026: (ln_okx_asset_lines_v = 1) AND (ln_okl_txd_assets_v = 1) THEN
3027: -- store SQL error message on message stack
3028: OKL_API.set_message(p_app_name => G_APP_NAME,
3029: p_msg_name => G_ASSET_NUMBER);

Line 3044: IF c_okx_assets_v%ISOPEN THEN

3040: -- If the cursor is open then it has to be closed
3041: IF c_txl_asset_number%ISOPEN THEN
3042: CLOSE c_txl_asset_number;
3043: END IF;
3044: IF c_okx_assets_v%ISOPEN THEN
3045: CLOSE c_okx_assets_v;
3046: END IF;
3047: IF c_okx_asset_lines_v%ISOPEN THEN
3048: CLOSE c_okx_asset_lines_v;

Line 3045: CLOSE c_okx_assets_v;

3041: IF c_txl_asset_number%ISOPEN THEN
3042: CLOSE c_txl_asset_number;
3043: END IF;
3044: IF c_okx_assets_v%ISOPEN THEN
3045: CLOSE c_okx_assets_v;
3046: END IF;
3047: IF c_okx_asset_lines_v%ISOPEN THEN
3048: CLOSE c_okx_asset_lines_v;
3049: END IF;

Line 3071: IF c_okx_assets_v%ISOPEN THEN

3067: -- If the cursor is open then it has to be closed
3068: IF c_txl_asset_number%ISOPEN THEN
3069: CLOSE c_txl_asset_number;
3070: END IF;
3071: IF c_okx_assets_v%ISOPEN THEN
3072: CLOSE c_okx_assets_v;
3073: END IF;
3074: IF c_okx_asset_lines_v%ISOPEN THEN
3075: CLOSE c_okx_asset_lines_v;

Line 3072: CLOSE c_okx_assets_v;

3068: IF c_txl_asset_number%ISOPEN THEN
3069: CLOSE c_txl_asset_number;
3070: END IF;
3071: IF c_okx_assets_v%ISOPEN THEN
3072: CLOSE c_okx_assets_v;
3073: END IF;
3074: IF c_okx_asset_lines_v%ISOPEN THEN
3075: CLOSE c_okx_asset_lines_v;
3076: END IF;

Line 3096: p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,

3092: -- Parameters : OUT Return Status, IN Rec Info
3093: -- Version : 1.0
3094: -- End of Commnets
3095: PROCEDURE Validate_asset_tax_book(x_return_status OUT NOCOPY VARCHAR2,
3096: p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3097: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3098: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) IS
3099: ln_asset_lines_dtls NUMBER := 0;
3100: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,

Line 3100: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,

3096: p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3097: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3098: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) IS
3099: ln_asset_lines_dtls NUMBER := 0;
3100: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3101: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3102: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) is
3103: SELECT 1
3104: --FROM DUAL

Line 5939: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,

5935: lv_dummy VARCHAR2(3);
5936: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
5937: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
5938: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_FA_LINE_ITEM';
5939: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,
5940: p_id2 OKX_ASSETS_V.ID2%TYPE,
5941: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
5942: IS
5943: SELECT 1

Line 5940: p_id2 OKX_ASSETS_V.ID2%TYPE,

5936: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
5937: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
5938: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_FA_LINE_ITEM';
5939: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,
5940: p_id2 OKX_ASSETS_V.ID2%TYPE,
5941: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
5942: IS
5943: SELECT 1
5944: --FROM DUAL

Line 15272: ,p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS

15268: AND rul.rule_information_category = 'LARLES'
15269: AND nvl(rule_information1,'N') = 'Y');*/
15270:
15271: CURSOR l_chk_rel_ast_csr (p_chr_id IN Number
15272: ,p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
15273: SELECT 'Y'
15274: FROM okc_k_headers_b CHR
15275: WHERE nvl(chr.orig_system_source_code,'XXXX') <> 'OKL_RELEASE'
15276: and chr.ID = p_chr_id

Line 16448: ,p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS

16444: AND rul.rule_information_category = 'LARLES'
16445: AND NVL(rule_information1,'N') = 'Y';*/
16446:
16447: CURSOR l_chk_rel_ast_csr (p_chr_id IN NUMBER
16448: ,p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) IS
16449: SELECT 'Y',
16450: --Bug# 4631549
16451: chr.orig_system_source_code,
16452: chr.orig_system_id1 orig_chr_id,

Line 18202: ,p_asset_num IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

18198: AND rul.rule_information_category = 'LARLES'
18199: AND NVL(rule_information1,'N') = 'Y';*/
18200:
18201: CURSOR l_chk_rel_ast_csr (p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE
18202: ,p_asset_num IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
18203: SELECT NVL(kle_top.re_lease_yn,'N') release_flag
18204: FROM okl_txl_assets_b txlb,
18205: okc_line_styles_b lseb,
18206: okc_k_lines_b cleb_top,

Line 19246: ,p_asset_num IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

19242: AND rul.rule_information_category = 'LARLES'
19243: AND NVL(rule_information1,'N') = 'Y';*/
19244:
19245: CURSOR l_chk_rel_ast_csr (p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE
19246: ,p_asset_num IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
19247: SELECT NVL(kle_top.re_lease_yn,'N') release_flag
19248: FROM okl_txl_assets_b txlb,
19249: okc_line_styles_b lseb,
19250: okc_k_lines_b cleb_top,

Line 20152: ,p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is

20148: AND rul.rule_information_category = 'LARLES'
20149: AND NVL(rule_information1,'N') = 'Y';
20150: */
20151: CURSOR l_chk_rel_ast_csr (p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE
20152: ,p_asset_number IN OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
20153: SELECT NVL(kle_top.re_lease_yn,'N') release_flag
20154: FROM okl_txl_assets_b txlb,
20155: okc_line_styles_b lseb,
20156: okc_k_lines_b cleb_top,