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 2650: -- Validate if the Asset Number exists in OKX_ASSETS_V

2646: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2647: END IF;
2648: CLOSE c_txl_asset_number;
2649:
2650: -- Validate if the Asset Number exists in OKX_ASSETS_V
2651: OPEN c_okx_assets_v(p_asset_number);
2652: FETCH c_okx_assets_v into ln_okx_assets_v;
2653: IF c_okx_assets_v%NOTFOUND THEN
2654: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2651: OPEN c_okx_assets_v(p_asset_number);

2647: END IF;
2648: CLOSE c_txl_asset_number;
2649:
2650: -- Validate if the Asset Number exists in OKX_ASSETS_V
2651: OPEN c_okx_assets_v(p_asset_number);
2652: FETCH c_okx_assets_v into ln_okx_assets_v;
2653: IF c_okx_assets_v%NOTFOUND THEN
2654: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2655: END IF;

Line 2652: FETCH c_okx_assets_v into ln_okx_assets_v;

2648: CLOSE c_txl_asset_number;
2649:
2650: -- Validate if the Asset Number exists in OKX_ASSETS_V
2651: OPEN c_okx_assets_v(p_asset_number);
2652: FETCH c_okx_assets_v into ln_okx_assets_v;
2653: IF c_okx_assets_v%NOTFOUND THEN
2654: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2655: END IF;
2656: CLOSE c_okx_assets_v;

Line 2653: IF c_okx_assets_v%NOTFOUND THEN

2649:
2650: -- Validate if the Asset Number exists in OKX_ASSETS_V
2651: OPEN c_okx_assets_v(p_asset_number);
2652: FETCH c_okx_assets_v into ln_okx_assets_v;
2653: IF c_okx_assets_v%NOTFOUND THEN
2654: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2655: END IF;
2656: CLOSE c_okx_assets_v;
2657:

Line 2656: CLOSE c_okx_assets_v;

2652: FETCH c_okx_assets_v into ln_okx_assets_v;
2653: IF c_okx_assets_v%NOTFOUND THEN
2654: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2655: END IF;
2656: CLOSE c_okx_assets_v;
2657:
2658: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2659: OPEN c_okx_asset_lines_v(p_asset_number);
2660: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

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

2682: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2683: END IF;
2684: CLOSE c_txl_asset_number;
2685:
2686: -- Validate if the Asset Number exists in OKX_ASSETS_V
2687: OPEN c_okx_assets_v(p_asset_number);
2688: FETCH c_okx_assets_v into ln_okx_assets_v;
2689: IF c_okx_assets_v%NOTFOUND THEN
2690: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2687: OPEN c_okx_assets_v(p_asset_number);

2683: END IF;
2684: CLOSE c_txl_asset_number;
2685:
2686: -- Validate if the Asset Number exists in OKX_ASSETS_V
2687: OPEN c_okx_assets_v(p_asset_number);
2688: FETCH c_okx_assets_v into ln_okx_assets_v;
2689: IF c_okx_assets_v%NOTFOUND THEN
2690: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2691: END IF;

Line 2688: FETCH c_okx_assets_v into ln_okx_assets_v;

2684: CLOSE c_txl_asset_number;
2685:
2686: -- Validate if the Asset Number exists in OKX_ASSETS_V
2687: OPEN c_okx_assets_v(p_asset_number);
2688: FETCH c_okx_assets_v into ln_okx_assets_v;
2689: IF c_okx_assets_v%NOTFOUND THEN
2690: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2691: END IF;
2692: CLOSE c_okx_assets_v;

Line 2689: IF c_okx_assets_v%NOTFOUND THEN

2685:
2686: -- Validate if the Asset Number exists in OKX_ASSETS_V
2687: OPEN c_okx_assets_v(p_asset_number);
2688: FETCH c_okx_assets_v into ln_okx_assets_v;
2689: IF c_okx_assets_v%NOTFOUND THEN
2690: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2691: END IF;
2692: CLOSE c_okx_assets_v;
2693:

Line 2692: CLOSE c_okx_assets_v;

2688: FETCH c_okx_assets_v into ln_okx_assets_v;
2689: IF c_okx_assets_v%NOTFOUND THEN
2690: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2691: END IF;
2692: CLOSE c_okx_assets_v;
2693:
2694: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2695: OPEN c_okx_asset_lines_v(p_asset_number);
2696: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

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

2719: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2720: END IF;
2721: CLOSE c_txl_asset_number;
2722:
2723: -- Validate if the Asset Number exists in OKX_ASSETS_V
2724: OPEN c_okx_assets_v(p_asset_number);
2725: FETCH c_okx_assets_v into ln_okx_assets_v;
2726: IF c_okx_assets_v%NOTFOUND THEN
2727: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2724: OPEN c_okx_assets_v(p_asset_number);

2720: END IF;
2721: CLOSE c_txl_asset_number;
2722:
2723: -- Validate if the Asset Number exists in OKX_ASSETS_V
2724: OPEN c_okx_assets_v(p_asset_number);
2725: FETCH c_okx_assets_v into ln_okx_assets_v;
2726: IF c_okx_assets_v%NOTFOUND THEN
2727: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2728: END IF;

Line 2725: FETCH c_okx_assets_v into ln_okx_assets_v;

2721: CLOSE c_txl_asset_number;
2722:
2723: -- Validate if the Asset Number exists in OKX_ASSETS_V
2724: OPEN c_okx_assets_v(p_asset_number);
2725: FETCH c_okx_assets_v into ln_okx_assets_v;
2726: IF c_okx_assets_v%NOTFOUND THEN
2727: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2728: END IF;
2729: CLOSE c_okx_assets_v;

Line 2726: IF c_okx_assets_v%NOTFOUND THEN

2722:
2723: -- Validate if the Asset Number exists in OKX_ASSETS_V
2724: OPEN c_okx_assets_v(p_asset_number);
2725: FETCH c_okx_assets_v into ln_okx_assets_v;
2726: IF c_okx_assets_v%NOTFOUND THEN
2727: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2728: END IF;
2729: CLOSE c_okx_assets_v;
2730:

Line 2729: CLOSE c_okx_assets_v;

2725: FETCH c_okx_assets_v into ln_okx_assets_v;
2726: IF c_okx_assets_v%NOTFOUND THEN
2727: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2728: END IF;
2729: CLOSE c_okx_assets_v;
2730:
2731: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2732: OPEN c_okx_asset_lines_v(p_asset_number);
2733: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

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

2745: END IF;
2746: CLOSE c_txd_assets_v;
2747: END IF;
2748:
2749: IF (ln_okl_txl_assets_v = 1) OR (ln_okx_assets_v = 1) OR
2750: (ln_okx_asset_lines_v = 1) OR (ln_okl_txd_assets_v = 1) THEN
2751: -- store SQL error message on message stack
2752: OKL_API.set_message(p_app_name => G_APP_NAME,
2753: p_msg_name => G_ASSET_NUMBER);

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

2751: -- store SQL error message on message stack
2752: OKL_API.set_message(p_app_name => G_APP_NAME,
2753: p_msg_name => G_ASSET_NUMBER);
2754: RAISE G_EXCEPTION_HALT_VALIDATION;
2755: ELSIF (ln_okl_txl_assets_v = 1) AND (ln_okx_assets_v = 1) AND
2756: (ln_okx_asset_lines_v = 1) AND (ln_okl_txd_assets_v = 1) THEN
2757: -- store SQL error message on message stack
2758: OKL_API.set_message(p_app_name => G_APP_NAME,
2759: p_msg_name => G_ASSET_NUMBER);

Line 2776: IF c_okx_assets_v%ISOPEN THEN

2772: END IF;
2773: IF c_source_code%ISOPEN THEN
2774: CLOSE c_source_code;
2775: END IF;
2776: IF c_okx_assets_v%ISOPEN THEN
2777: CLOSE c_okx_assets_v;
2778: END IF;
2779: IF c_okx_asset_lines_v%ISOPEN THEN
2780: CLOSE c_okx_asset_lines_v;

Line 2777: CLOSE c_okx_assets_v;

2773: IF c_source_code%ISOPEN THEN
2774: CLOSE c_source_code;
2775: END IF;
2776: IF c_okx_assets_v%ISOPEN THEN
2777: CLOSE c_okx_assets_v;
2778: END IF;
2779: IF c_okx_asset_lines_v%ISOPEN THEN
2780: CLOSE c_okx_asset_lines_v;
2781: END IF;

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 2823: IF c_okx_assets_v%ISOPEN THEN

2819: END IF;
2820: IF c_source_code%ISOPEN THEN
2821: CLOSE c_source_code;
2822: END IF;
2823: IF c_okx_assets_v%ISOPEN THEN
2824: CLOSE c_okx_assets_v;
2825: END IF;
2826: IF c_okx_asset_lines_v%ISOPEN THEN
2827: CLOSE c_okx_asset_lines_v;

Line 2824: CLOSE c_okx_assets_v;

2820: IF c_source_code%ISOPEN THEN
2821: CLOSE c_source_code;
2822: END IF;
2823: IF c_okx_assets_v%ISOPEN THEN
2824: CLOSE c_okx_assets_v;
2825: END IF;
2826: IF c_okx_asset_lines_v%ISOPEN THEN
2827: CLOSE c_okx_asset_lines_v;
2828: END IF;

Line 2850: ln_okx_assets_v NUMBER := 0;

2846: PROCEDURE validate_new_asset_number(x_return_status OUT NOCOPY VARCHAR2,
2847: p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
2848: p_dnz_chr_id IN OKC_K_LINES_V.DNZ_CHR_ID%TYPE) IS
2849: ln_okl_txl_assets_v NUMBER := 0;
2850: ln_okx_assets_v NUMBER := 0;
2851: ln_okx_asset_lines_v NUMBER := 0;
2852: ln_okl_txd_assets_v NUMBER := 0;
2853: lv_release_asset OKC_RULES_V.RULE_INFORMATION1%TYPE := 'N';
2854:

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

2851: ln_okx_asset_lines_v NUMBER := 0;
2852: ln_okl_txd_assets_v NUMBER := 0;
2853: lv_release_asset OKC_RULES_V.RULE_INFORMATION1%TYPE := 'N';
2854:
2855: CURSOR c_txl_asset_number(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2856: SELECT 1
2857: --FROM DUAL
2858: --WHERE EXISTS (SELECT '1'
2859: FROM OKL_TXL_ASSETS_B

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

2857: --FROM DUAL
2858: --WHERE EXISTS (SELECT '1'
2859: FROM OKL_TXL_ASSETS_B
2860: WHERE asset_number = p_asset_number; --);
2861: /*CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2862: SELECT 1
2863: --FROM DUAL
2864: --WHERE EXISTS (SELECT '1'
2865: FROM OKX_ASSET_LINES_V

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

2863: --FROM DUAL
2864: --WHERE EXISTS (SELECT '1'
2865: FROM OKX_ASSET_LINES_V
2866: WHERE asset_number = p_asset_number; --); */
2867: CURSOR c_okx_asset_lines_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2868: SELECT 1
2869: FROM fa_additions a
2870: WHERE a.asset_number = p_asset_number
2871: and exists

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

2874: where b.jtot_object1_code = 'OKX_ASSET'
2875: and b.object1_id1 = to_char(a.asset_id)
2876: );
2877:
2878: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2879: SELECT 1
2880: --FROM DUAL
2881: --WHERE EXISTS (SELECT '1'
2882: FROM OKX_ASSETS_V

Line 2882: FROM OKX_ASSETS_V

2878: CURSOR c_okx_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2879: SELECT 1
2880: --FROM DUAL
2881: --WHERE EXISTS (SELECT '1'
2882: FROM OKX_ASSETS_V
2883: WHERE asset_number = p_asset_number; --);
2884:
2885: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2886: SELECT 1

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

2881: --WHERE EXISTS (SELECT '1'
2882: FROM OKX_ASSETS_V
2883: WHERE asset_number = p_asset_number; --);
2884:
2885: CURSOR c_txd_assets_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE) is
2886: SELECT 1
2887: --FROM DUAL
2888: --WHERE EXISTS (SELECT '1'
2889: FROM OKL_TRX_ASSETS TAS,

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

2949: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2950: END IF;
2951: CLOSE c_txl_asset_number;
2952:
2953: -- Validate if the Asset Number exists in OKX_ASSETS_V
2954: OPEN c_okx_assets_v(p_asset_number);
2955: FETCH c_okx_assets_v into ln_okx_assets_v;
2956: IF c_okx_assets_v%NOTFOUND THEN
2957: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2954: OPEN c_okx_assets_v(p_asset_number);

2950: END IF;
2951: CLOSE c_txl_asset_number;
2952:
2953: -- Validate if the Asset Number exists in OKX_ASSETS_V
2954: OPEN c_okx_assets_v(p_asset_number);
2955: FETCH c_okx_assets_v into ln_okx_assets_v;
2956: IF c_okx_assets_v%NOTFOUND THEN
2957: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2958: END IF;

Line 2955: FETCH c_okx_assets_v into ln_okx_assets_v;

2951: CLOSE c_txl_asset_number;
2952:
2953: -- Validate if the Asset Number exists in OKX_ASSETS_V
2954: OPEN c_okx_assets_v(p_asset_number);
2955: FETCH c_okx_assets_v into ln_okx_assets_v;
2956: IF c_okx_assets_v%NOTFOUND THEN
2957: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2958: END IF;
2959: CLOSE c_okx_assets_v;

Line 2956: IF c_okx_assets_v%NOTFOUND THEN

2952:
2953: -- Validate if the Asset Number exists in OKX_ASSETS_V
2954: OPEN c_okx_assets_v(p_asset_number);
2955: FETCH c_okx_assets_v into ln_okx_assets_v;
2956: IF c_okx_assets_v%NOTFOUND THEN
2957: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2958: END IF;
2959: CLOSE c_okx_assets_v;
2960:

Line 2959: CLOSE c_okx_assets_v;

2955: FETCH c_okx_assets_v into ln_okx_assets_v;
2956: IF c_okx_assets_v%NOTFOUND THEN
2957: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2958: END IF;
2959: CLOSE c_okx_assets_v;
2960:
2961: -- Validate if the Asset Number exists in OKX_ASSET_LINES_V
2962: OPEN c_okx_asset_lines_v(p_asset_number);
2963: FETCH c_okx_asset_lines_v into ln_okx_asset_lines_v;

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

2974: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2975: END IF;
2976: CLOSE c_txd_assets_v;
2977:
2978: IF (ln_okl_txl_assets_v = 1) OR (ln_okx_assets_v = 1) OR
2979: (ln_okx_asset_lines_v = 1) OR (ln_okl_txd_assets_v = 1) THEN
2980: -- store SQL error message on message stack
2981: OKL_API.set_message(p_app_name => G_APP_NAME,
2982: p_msg_name => G_ASSET_NUMBER);

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

2980: -- store SQL error message on message stack
2981: OKL_API.set_message(p_app_name => G_APP_NAME,
2982: p_msg_name => G_ASSET_NUMBER);
2983: RAISE G_EXCEPTION_HALT_VALIDATION;
2984: ELSIF (ln_okl_txl_assets_v = 1) AND (ln_okx_assets_v = 1) AND
2985: (ln_okx_asset_lines_v = 1) AND (ln_okl_txd_assets_v = 1) THEN
2986: -- store SQL error message on message stack
2987: OKL_API.set_message(p_app_name => G_APP_NAME,
2988: p_msg_name => G_ASSET_NUMBER);

Line 3003: IF c_okx_assets_v%ISOPEN THEN

2999: -- If the cursor is open then it has to be closed
3000: IF c_txl_asset_number%ISOPEN THEN
3001: CLOSE c_txl_asset_number;
3002: END IF;
3003: IF c_okx_assets_v%ISOPEN THEN
3004: CLOSE c_okx_assets_v;
3005: END IF;
3006: IF c_okx_asset_lines_v%ISOPEN THEN
3007: CLOSE c_okx_asset_lines_v;

Line 3004: CLOSE c_okx_assets_v;

3000: IF c_txl_asset_number%ISOPEN THEN
3001: CLOSE c_txl_asset_number;
3002: END IF;
3003: IF c_okx_assets_v%ISOPEN THEN
3004: CLOSE c_okx_assets_v;
3005: END IF;
3006: IF c_okx_asset_lines_v%ISOPEN THEN
3007: CLOSE c_okx_asset_lines_v;
3008: END IF;

Line 3030: IF c_okx_assets_v%ISOPEN THEN

3026: -- If the cursor is open then it has to be closed
3027: IF c_txl_asset_number%ISOPEN THEN
3028: CLOSE c_txl_asset_number;
3029: END IF;
3030: IF c_okx_assets_v%ISOPEN THEN
3031: CLOSE c_okx_assets_v;
3032: END IF;
3033: IF c_okx_asset_lines_v%ISOPEN THEN
3034: CLOSE c_okx_asset_lines_v;

Line 3031: CLOSE c_okx_assets_v;

3027: IF c_txl_asset_number%ISOPEN THEN
3028: CLOSE c_txl_asset_number;
3029: END IF;
3030: IF c_okx_assets_v%ISOPEN THEN
3031: CLOSE c_okx_assets_v;
3032: END IF;
3033: IF c_okx_asset_lines_v%ISOPEN THEN
3034: CLOSE c_okx_asset_lines_v;
3035: END IF;

Line 3055: p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,

3051: -- Parameters : OUT Return Status, IN Rec Info
3052: -- Version : 1.0
3053: -- End of Commnets
3054: PROCEDURE Validate_asset_tax_book(x_return_status OUT NOCOPY VARCHAR2,
3055: p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3056: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3057: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) IS
3058: ln_asset_lines_dtls NUMBER := 0;
3059: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,

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

3055: p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3056: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3057: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) IS
3058: ln_asset_lines_dtls NUMBER := 0;
3059: CURSOR c_asset_lines_dtls_v(p_asset_number OKX_ASSETS_V.ASSET_NUMBER%TYPE,
3060: p_tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE,
3061: p_tal_id OKL_TXL_ASSETS_B.ID%TYPE) is
3062: SELECT 1
3063: --FROM DUAL

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

5894: lv_dummy VARCHAR2(3);
5895: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
5896: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
5897: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_FA_LINE_ITEM';
5898: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,
5899: p_id2 OKX_ASSETS_V.ID2%TYPE,
5900: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
5901: IS
5902: SELECT 1

Line 5899: p_id2 OKX_ASSETS_V.ID2%TYPE,

5895: ln_tas_id OKL_TRX_ASSETS.ID%TYPE;
5896: ln_line_number OKL_TXL_ASSETS_V.LINE_NUMBER%TYPE;
5897: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_FA_LINE_ITEM';
5898: CURSOR c_asset_exist_chr(p_id1 OKX_ASSETS_V.ID1%TYPE,
5899: p_id2 OKX_ASSETS_V.ID2%TYPE,
5900: p_dnz_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE)
5901: IS
5902: SELECT 1
5903: --FROM DUAL