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.OKC_KSQ_PVT dependencies on OKC_DEBUG

Line 2386: Okc_Debug.Set_Indentation('Is_K_Autogenerted');

2382: -- there is no sequence defined at the class/category level
2383: --
2384: Begin
2385: IF (l_debug = 'Y') THEN
2386: Okc_Debug.Set_Indentation('Is_K_Autogenerted');
2387: Okc_Debug.Log('1600: Entering cls_scs_found', 2);
2388: END IF;
2389: If g_seq_header.cls_scs_none = 'NON' Then
2390: IF (l_debug = 'Y') THEN

Line 2387: Okc_Debug.Log('1600: Entering cls_scs_found', 2);

2383: --
2384: Begin
2385: IF (l_debug = 'Y') THEN
2386: Okc_Debug.Set_Indentation('Is_K_Autogenerted');
2387: Okc_Debug.Log('1600: Entering cls_scs_found', 2);
2388: END IF;
2389: If g_seq_header.cls_scs_none = 'NON' Then
2390: IF (l_debug = 'Y') THEN
2391: Okc_Debug.Log('1700: Not set at Class/category level');

Line 2391: Okc_Debug.Log('1700: Not set at Class/category level');

2387: Okc_Debug.Log('1600: Entering cls_scs_found', 2);
2388: END IF;
2389: If g_seq_header.cls_scs_none = 'NON' Then
2390: IF (l_debug = 'Y') THEN
2391: Okc_Debug.Log('1700: Not set at Class/category level');
2392: END IF;
2393: l_found := True;
2394: Elsif g_seq_header.cls_scs_none = 'CLS' Then
2395: IF (l_debug = 'Y') THEN

Line 2396: Okc_Debug.Log('1800: Set at Class level');

2392: END IF;
2393: l_found := True;
2394: Elsif g_seq_header.cls_scs_none = 'CLS' Then
2395: IF (l_debug = 'Y') THEN
2396: Okc_Debug.Log('1800: Set at Class level');
2397: END IF;
2398: If g_cls_code_tbl(i) = l_cls_code Then
2399: l_found := True;
2400: End If;

Line 2403: Okc_Debug.Log('1900: Set at Category level');

2399: l_found := True;
2400: End If;
2401: Elsif g_seq_header.cls_scs_none = 'SCS' Then
2402: IF (l_debug = 'Y') THEN
2403: Okc_Debug.Log('1900: Set at Category level');
2404: END IF;
2405: If g_scs_code_tbl(i) = p_scs_code Then
2406: l_found := True;
2407: End If;

Line 2410: Okc_Debug.Log('2000: Exiting cls_scs_found', 2);

2406: l_found := True;
2407: End If;
2408: End If;
2409: IF (l_debug = 'Y') THEN
2410: Okc_Debug.Log('2000: Exiting cls_scs_found', 2);
2411: Okc_Debug.Reset_Indentation;
2412: END IF;
2413: Return l_found;
2414: End;

Line 2411: Okc_Debug.Reset_Indentation;

2407: End If;
2408: End If;
2409: IF (l_debug = 'Y') THEN
2410: Okc_Debug.Log('2000: Exiting cls_scs_found', 2);
2411: Okc_Debug.Reset_Indentation;
2412: END IF;
2413: Return l_found;
2414: End;
2415: Begin

Line 2417: Okc_Debug.Set_Indentation('Is_K_Autogenerted');

2413: Return l_found;
2414: End;
2415: Begin
2416: IF (l_debug = 'Y') THEN
2417: Okc_Debug.Set_Indentation('Is_K_Autogenerted');
2418: Okc_Debug.Log('100: Is_K_Autogenerted', 2);
2419: END IF;
2420: x_return_status := okc_api.g_false;
2421:

Line 2418: Okc_Debug.Log('100: Is_K_Autogenerted', 2);

2414: End;
2415: Begin
2416: IF (l_debug = 'Y') THEN
2417: Okc_Debug.Set_Indentation('Is_K_Autogenerted');
2418: Okc_Debug.Log('100: Is_K_Autogenerted', 2);
2419: END IF;
2420: x_return_status := okc_api.g_false;
2421:
2422: --NPALEPU ADDED ON 22-AUG-2006 FOR BUG # 5470760

Line 2447: Okc_Debug.Log('200: No Header Found');

2443: If l_row_notfound then
2444: -- If there is no header, there is no setup. So
2445: -- return immediately after setting the global status.
2446: IF (l_debug = 'Y') THEN
2447: Okc_Debug.Log('200: No Header Found');
2448: END IF;
2449: g_seq_status := G_NO_SETUP_FOUND;
2450: Raise g_exception_halt_validation;
2451: End If;

Line 2458: Okc_Debug.Log('300: Sequence set for User Function');

2454: -- In case of user defined function, there would not be any
2455: -- line details. Just make sure that pdf has been properly
2456: -- set in this case.
2457: IF (l_debug = 'Y') THEN
2458: Okc_Debug.Log('300: Sequence set for User Function');
2459: END IF;
2460: g_seq_status := G_SETUP_FOUND;
2461: If g_seq_header.pdf_id Is Null Then
2462: g_seq_status := G_NO_PDF_FOUND;

Line 2494: Okc_Debug.Log('400: No details found');

2490:
2491: If g_doc_sequence_id_tbl.count = 0 Then
2492: -- If there is no line details, no sequence can be ganarated.
2493: IF (l_debug = 'Y') THEN
2494: Okc_Debug.Log('400: No details found');
2495: END IF;
2496: g_seq_status := G_NO_SETUP_FOUND;
2497: Raise g_exception_halt_validation;
2498: End If;

Line 2509: Okc_Debug.Log('500: Sequence set at Site level');

2505:
2506: g_index := 0;
2507: If g_seq_header.site_yn = 'Y' Then
2508: IF (l_debug = 'Y') THEN
2509: Okc_Debug.Log('500: Sequence set at Site level');
2510: END IF;
2511: g_index := g_doc_sequence_id_tbl.First;
2512: Elsif g_seq_header.bg_ou_none = 'BUG' Then
2513: IF (l_debug = 'Y') THEN

Line 2514: Okc_Debug.Log('600: Sequence set at Business Group level');

2510: END IF;
2511: g_index := g_doc_sequence_id_tbl.First;
2512: Elsif g_seq_header.bg_ou_none = 'BUG' Then
2513: IF (l_debug = 'Y') THEN
2514: Okc_Debug.Log('600: Sequence set at Business Group level');
2515: END IF;
2516: For i in g_business_group_id_tbl.First..g_business_group_id_tbl.Last
2517: Loop
2518: If g_business_group_id_tbl(i) = l_bug Then

Line 2527: Okc_Debug.Log('700: Sequence set at Operating Unit level');

2523: End If;
2524: End Loop;
2525: Elsif g_seq_header.bg_ou_none = 'OPU' Then
2526: IF (l_debug = 'Y') THEN
2527: Okc_Debug.Log('700: Sequence set at Operating Unit level');
2528: END IF;
2529: For i in g_operating_unit_id_tbl.First..g_operating_unit_id_tbl.Last
2530: Loop
2531: If g_operating_unit_id_tbl(i) = l_opu Then

Line 2540: Okc_Debug.Log('800: Sequence set at Class level');

2536: End If;
2537: End Loop;
2538: Elsif g_seq_header.cls_scs_none = 'CLS' Then
2539: IF (l_debug = 'Y') THEN
2540: Okc_Debug.Log('800: Sequence set at Class level');
2541: END IF;
2542: For i in g_cls_code_tbl.First..g_cls_code_tbl.Last
2543: Loop
2544: If g_cls_code_tbl(i) = l_cls_code Then

Line 2551: Okc_Debug.Log('900: Sequence set at Category level');

2547: End If;
2548: End Loop;
2549: Elsif g_seq_header.cls_scs_none = 'SCS' Then
2550: IF (l_debug = 'Y') THEN
2551: Okc_Debug.Log('900: Sequence set at Category level');
2552: END IF;
2553: For i in g_scs_code_tbl.First..g_scs_code_tbl.Last
2554: Loop
2555: If g_scs_code_tbl(i) = p_scs_code Then

Line 2564: Okc_Debug.Log('1000: No matching details found');

2560: End If;
2561:
2562: If g_index = 0 Then
2563: IF (l_debug = 'Y') THEN
2564: Okc_Debug.Log('1000: No matching details found');
2565: END IF;
2566: g_seq_status := G_NO_SETUP_FOUND;
2567: Raise g_exception_halt_validation;
2568: End If;

Line 2573: Okc_Debug.Log('1100: Matching details found');

2569:
2570: g_seq_status := G_SETUP_FOUND;
2571:
2572: IF (l_debug = 'Y') THEN
2573: Okc_Debug.Log('1100: Matching details found');
2574: END IF;
2575: If g_manual_override_yn_tbl(g_index) = 'Y' Then
2576: IF (l_debug = 'Y') THEN
2577: Okc_Debug.Log('1200: Manual Override is Yes');

Line 2577: Okc_Debug.Log('1200: Manual Override is Yes');

2573: Okc_Debug.Log('1100: Matching details found');
2574: END IF;
2575: If g_manual_override_yn_tbl(g_index) = 'Y' Then
2576: IF (l_debug = 'Y') THEN
2577: Okc_Debug.Log('1200: Manual Override is Yes');
2578: END IF;
2579: Raise g_exception_halt_validation;
2580: End If;
2581:

Line 2584: Okc_Debug.Log('1300: Exiting Is_K_Autogenerated', 2);

2580: End If;
2581:
2582: x_return_status := okc_api.g_true;
2583: IF (l_debug = 'Y') THEN
2584: Okc_Debug.Log('1300: Exiting Is_K_Autogenerated', 2);
2585: Okc_Debug.Reset_Indentation;
2586: END IF;
2587: Exception
2588: When g_exception_halt_validation Then

Line 2585: Okc_Debug.Reset_Indentation;

2581:
2582: x_return_status := okc_api.g_true;
2583: IF (l_debug = 'Y') THEN
2584: Okc_Debug.Log('1300: Exiting Is_K_Autogenerated', 2);
2585: Okc_Debug.Reset_Indentation;
2586: END IF;
2587: Exception
2588: When g_exception_halt_validation Then
2589: IF (l_debug = 'Y') THEN

Line 2590: Okc_Debug.Log('1400: Exiting Is_K_Autogenerated', 2);

2586: END IF;
2587: Exception
2588: When g_exception_halt_validation Then
2589: IF (l_debug = 'Y') THEN
2590: Okc_Debug.Log('1400: Exiting Is_K_Autogenerated', 2);
2591: Okc_Debug.Reset_Indentation;
2592: END IF;
2593: When Others Then
2594: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 2591: Okc_Debug.Reset_Indentation;

2587: Exception
2588: When g_exception_halt_validation Then
2589: IF (l_debug = 'Y') THEN
2590: Okc_Debug.Log('1400: Exiting Is_K_Autogenerated', 2);
2591: Okc_Debug.Reset_Indentation;
2592: END IF;
2593: When Others Then
2594: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
2595: p_msg_name => g_unexpected_error,

Line 2603: Okc_Debug.Log('1500: Exiting Is_K_Autogenerated', 2);

2599: p_token2_value => sqlerrm);
2600: -- set error flag as UNEXPETED error
2601: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2602: IF (l_debug = 'Y') THEN
2603: Okc_Debug.Log('1500: Exiting Is_K_Autogenerated', 2);
2604: Okc_Debug.Reset_Indentation;
2605: END IF;
2606: End Is_K_Autogenerated;
2607:

Line 2604: Okc_Debug.Reset_Indentation;

2600: -- set error flag as UNEXPETED error
2601: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2602: IF (l_debug = 'Y') THEN
2603: Okc_Debug.Log('1500: Exiting Is_K_Autogenerated', 2);
2604: Okc_Debug.Reset_Indentation;
2605: END IF;
2606: End Is_K_Autogenerated;
2607:
2608: PROCEDURE Get_K_Number(

Line 2686: Okc_Debug.Set_Indentation('Contract_Is_Unique');

2682: l_ret Boolean;
2683: l_dummy Varchar2(1);
2684: Begin
2685: IF (l_debug = 'Y') THEN
2686: Okc_Debug.Set_Indentation('Contract_Is_Unique');
2687: Okc_Debug.Log('100: Entering Contract_Is_Unique', 2);
2688: Okc_Debug.Log('125: Contract Number: '|| p_contract_number, 2);
2689: Okc_Debug.Log('150: Modifier : '|| p_contract_number_modifier, 2);
2690: END IF;

Line 2687: Okc_Debug.Log('100: Entering Contract_Is_Unique', 2);

2683: l_dummy Varchar2(1);
2684: Begin
2685: IF (l_debug = 'Y') THEN
2686: Okc_Debug.Set_Indentation('Contract_Is_Unique');
2687: Okc_Debug.Log('100: Entering Contract_Is_Unique', 2);
2688: Okc_Debug.Log('125: Contract Number: '|| p_contract_number, 2);
2689: Okc_Debug.Log('150: Modifier : '|| p_contract_number_modifier, 2);
2690: END IF;
2691: If p_contract_number_modifier Is Null OR

Line 2688: Okc_Debug.Log('125: Contract Number: '|| p_contract_number, 2);

2684: Begin
2685: IF (l_debug = 'Y') THEN
2686: Okc_Debug.Set_Indentation('Contract_Is_Unique');
2687: Okc_Debug.Log('100: Entering Contract_Is_Unique', 2);
2688: Okc_Debug.Log('125: Contract Number: '|| p_contract_number, 2);
2689: Okc_Debug.Log('150: Modifier : '|| p_contract_number_modifier, 2);
2690: END IF;
2691: If p_contract_number_modifier Is Null OR
2692: p_contract_number_modifier = OKC_API.G_MISS_CHAR

Line 2689: Okc_Debug.Log('150: Modifier : '|| p_contract_number_modifier, 2);

2685: IF (l_debug = 'Y') THEN
2686: Okc_Debug.Set_Indentation('Contract_Is_Unique');
2687: Okc_Debug.Log('100: Entering Contract_Is_Unique', 2);
2688: Okc_Debug.Log('125: Contract Number: '|| p_contract_number, 2);
2689: Okc_Debug.Log('150: Modifier : '|| p_contract_number_modifier, 2);
2690: END IF;
2691: If p_contract_number_modifier Is Null OR
2692: p_contract_number_modifier = OKC_API.G_MISS_CHAR
2693: Then

Line 2695: Okc_Debug.Log('200: cursor opened is c2', 2);

2691: If p_contract_number_modifier Is Null OR
2692: p_contract_number_modifier = OKC_API.G_MISS_CHAR
2693: Then
2694: IF (l_debug = 'Y') THEN
2695: Okc_Debug.Log('200: cursor opened is c2', 2);
2696: END IF;
2697: Open c2;
2698: Fetch c2 Into l_dummy;
2699: l_ret := c2%NotFound;

Line 2703: Okc_Debug.Log('300: cursor opened is c3', 2);

2699: l_ret := c2%NotFound;
2700: Close c2;
2701: Else
2702: IF (l_debug = 'Y') THEN
2703: Okc_Debug.Log('300: cursor opened is c3', 2);
2704: END IF;
2705: Open c3;
2706: Fetch c3 Into l_dummy;
2707: l_ret := c3%NotFound;

Line 2712: Okc_Debug.Log('400: Contract not exists');

2708: Close c3;
2709: End If;
2710: If (l_ret) Then
2711: IF (l_debug = 'Y') THEN
2712: Okc_Debug.Log('400: Contract not exists');
2713: END IF;
2714: Else
2715: IF (l_debug = 'Y') THEN
2716: Okc_Debug.Log('500: Contract exists');

Line 2716: Okc_Debug.Log('500: Contract exists');

2712: Okc_Debug.Log('400: Contract not exists');
2713: END IF;
2714: Else
2715: IF (l_debug = 'Y') THEN
2716: Okc_Debug.Log('500: Contract exists');
2717: END IF;
2718: End If;
2719: IF (l_debug = 'Y') THEN
2720: Okc_Debug.ReSet_Indentation;

Line 2720: Okc_Debug.ReSet_Indentation;

2716: Okc_Debug.Log('500: Contract exists');
2717: END IF;
2718: End If;
2719: IF (l_debug = 'Y') THEN
2720: Okc_Debug.ReSet_Indentation;
2721: END IF;
2722: Return (l_ret);
2723:
2724: End;

Line 2727: Okc_Debug.Set_Indentation('Get_K_Number');

2723:
2724: End;
2725: Begin
2726: IF (l_debug = 'Y') THEN
2727: Okc_Debug.Set_Indentation('Get_K_Number');
2728: Okc_Debug.Log('2100: Entering Get_K_Number', 2);
2729: END IF;
2730: x_return_status := okc_api.g_ret_sts_success;
2731: -- First of check the sequence profile option. If it is

Line 2728: Okc_Debug.Log('2100: Entering Get_K_Number', 2);

2724: End;
2725: Begin
2726: IF (l_debug = 'Y') THEN
2727: Okc_Debug.Set_Indentation('Get_K_Number');
2728: Okc_Debug.Log('2100: Entering Get_K_Number', 2);
2729: END IF;
2730: x_return_status := okc_api.g_ret_sts_success;
2731: -- First of check the sequence profile option. If it is
2732: -- not 'Always Used' then we need to loop to retrieve the

Line 2756: Okc_Debug.Log('2105: Sequence Profile : ' || l_seq_profile);

2752: End If;
2753:
2754: l_seq_profile := Fnd_Profile.Value('UNIQUE:SEQ_NUMBERS');
2755: IF (l_debug = 'Y') THEN
2756: Okc_Debug.Log('2105: Sequence Profile : ' || l_seq_profile);
2757: END IF;
2758: If Nvl(l_seq_profile, 'N') NOT IN ('A','P') Then
2759: Loop
2760: select okc_k_headers_s1.nextval

Line 2764: Okc_Debug.Log('2106: Contract Number : ' || l_contract_number);

2760: select okc_k_headers_s1.nextval
2761: into l_contract_number
2762: from dual;
2763: IF (l_debug = 'Y') THEN
2764: Okc_Debug.Log('2106: Contract Number : ' || l_contract_number);
2765: END IF;
2766: Exit When Contract_Is_Unique(l_contract_number);
2767: End Loop;
2768: x_contract_number := l_contract_number;

Line 2770: Okc_Debug.Log('2107: before Raise g_exception_halt_validation ');

2766: Exit When Contract_Is_Unique(l_contract_number);
2767: End Loop;
2768: x_contract_number := l_contract_number;
2769: IF (l_debug = 'Y') THEN
2770: Okc_Debug.Log('2107: before Raise g_exception_halt_validation ');
2771: END IF;
2772: Raise g_exception_halt_validation;
2773: IF (l_debug = 'Y') THEN
2774: Okc_Debug.Log('2108: after Raise g_exception_halt_validation ');

Line 2774: Okc_Debug.Log('2108: after Raise g_exception_halt_validation ');

2770: Okc_Debug.Log('2107: before Raise g_exception_halt_validation ');
2771: END IF;
2772: Raise g_exception_halt_validation;
2773: IF (l_debug = 'Y') THEN
2774: Okc_Debug.Log('2108: after Raise g_exception_halt_validation ');
2775: END IF;
2776: End If;
2777: --
2778: -- It is quite likely that this procedure will be called in the

Line 2827: Okc_Debug.Log('2110: User Defined Function');

2823: End If;
2824:
2825: If g_seq_header.user_function_yn = 'Y' Then
2826: IF (l_debug = 'Y') THEN
2827: Okc_Debug.Log('2110: User Defined Function');
2828: END IF;
2829: --
2830: -- Get the process defs details
2831: --

Line 2863: Okc_Debug.Log('2120: Pl/Sql Block : ' || l_plsql_block);

2859: '''' || pdf_param_rec.parm_value || '''';
2860: End Loop;
2861: l_plsql_block := l_plsql_block || ' ); END;';
2862: IF (l_debug = 'Y') THEN
2863: Okc_Debug.Log('2120: Pl/Sql Block : ' || l_plsql_block);
2864: END IF;
2865: --
2866: -- Finally execute this block dynamically
2867: --

Line 2872: Okc_Debug.Log('2130: l_contract_number : ' || l_contract_number);

2868: Execute Immediate l_plsql_block
2869: Using IN OUT l_contract_number,
2870: IN OUT l_return_status;
2871: IF (l_debug = 'Y') THEN
2872: Okc_Debug.Log('2130: l_contract_number : ' || l_contract_number);
2873: Okc_Debug.Log('2140: l_return_status : ' || l_return_status);
2874: END IF;
2875: If l_return_status <> Okc_Api.g_ret_sts_success Then
2876: x_return_status := l_return_status;

Line 2873: Okc_Debug.Log('2140: l_return_status : ' || l_return_status);

2869: Using IN OUT l_contract_number,
2870: IN OUT l_return_status;
2871: IF (l_debug = 'Y') THEN
2872: Okc_Debug.Log('2130: l_contract_number : ' || l_contract_number);
2873: Okc_Debug.Log('2140: l_return_status : ' || l_return_status);
2874: END IF;
2875: If l_return_status <> Okc_Api.g_ret_sts_success Then
2876: x_return_status := l_return_status;
2877: Raise g_exception_halt_validation;

Line 2927: Okc_Debug.Log('2200: l_return_status ' || l_return_status);

2923: l_seq,
2924: l_doc_sequence_id);
2925:
2926: IF (l_debug = 'Y') THEN
2927: Okc_Debug.Log('2200: l_return_status ' || l_return_status);
2928: END IF;
2929: If To_Number(l_return_status) <> FND_SEQNUM.SEQSUCC Then
2930: x_return_status := okc_api.g_ret_sts_error;
2931: Raise g_exception_halt_validation;

Line 2955: Okc_Debug.Log('2300: l_contract_Number ' || l_contract_Number);

2951: l_contract_number := g_contract_number_prefix_tbl(g_index) ||
2952: Lpad(l_seq, l_seq_len, '0') ||
2953: g_contract_number_suffix_tbl(g_index);
2954: IF (l_debug = 'Y') THEN
2955: Okc_Debug.Log('2300: l_contract_Number ' || l_contract_Number);
2956: END IF;
2957: --
2958: -- Make sure this contract number and the modifier
2959: -- still constitute a unique key, otherwise continue

Line 2966: Okc_Debug.Log('2400: Final contract_Number ' || l_contract_Number);

2962: Exit When Contract_Is_Unique(l_contract_number);
2963: End Loop;
2964: x_contract_number := l_contract_number;
2965: IF (l_debug = 'Y') THEN
2966: Okc_Debug.Log('2400: Final contract_Number ' || l_contract_Number);
2967: Okc_Debug.Log('2500: Exiting Get_K_Number', 2);
2968: Okc_Debug.Reset_Indentation;
2969: END IF;
2970: Exception

Line 2967: Okc_Debug.Log('2500: Exiting Get_K_Number', 2);

2963: End Loop;
2964: x_contract_number := l_contract_number;
2965: IF (l_debug = 'Y') THEN
2966: Okc_Debug.Log('2400: Final contract_Number ' || l_contract_Number);
2967: Okc_Debug.Log('2500: Exiting Get_K_Number', 2);
2968: Okc_Debug.Reset_Indentation;
2969: END IF;
2970: Exception
2971: When G_EXCEPTION_HALT_VALIDATION Then

Line 2968: Okc_Debug.Reset_Indentation;

2964: x_contract_number := l_contract_number;
2965: IF (l_debug = 'Y') THEN
2966: Okc_Debug.Log('2400: Final contract_Number ' || l_contract_Number);
2967: Okc_Debug.Log('2500: Exiting Get_K_Number', 2);
2968: Okc_Debug.Reset_Indentation;
2969: END IF;
2970: Exception
2971: When G_EXCEPTION_HALT_VALIDATION Then
2972: IF (l_debug = 'Y') THEN

Line 2973: Okc_Debug.Log('2600: Exiting Get_K_Number', 2);

2969: END IF;
2970: Exception
2971: When G_EXCEPTION_HALT_VALIDATION Then
2972: IF (l_debug = 'Y') THEN
2973: Okc_Debug.Log('2600: Exiting Get_K_Number', 2);
2974: Okc_Debug.Log('2601: G_EXCEPTION_HALT_VALIDATION occured',2);
2975: Okc_Debug.Reset_Indentation;
2976: END IF;
2977: When OTHERS then

Line 2974: Okc_Debug.Log('2601: G_EXCEPTION_HALT_VALIDATION occured',2);

2970: Exception
2971: When G_EXCEPTION_HALT_VALIDATION Then
2972: IF (l_debug = 'Y') THEN
2973: Okc_Debug.Log('2600: Exiting Get_K_Number', 2);
2974: Okc_Debug.Log('2601: G_EXCEPTION_HALT_VALIDATION occured',2);
2975: Okc_Debug.Reset_Indentation;
2976: END IF;
2977: When OTHERS then
2978: -- store SQL error message on message stack

Line 2975: Okc_Debug.Reset_Indentation;

2971: When G_EXCEPTION_HALT_VALIDATION Then
2972: IF (l_debug = 'Y') THEN
2973: Okc_Debug.Log('2600: Exiting Get_K_Number', 2);
2974: Okc_Debug.Log('2601: G_EXCEPTION_HALT_VALIDATION occured',2);
2975: Okc_Debug.Reset_Indentation;
2976: END IF;
2977: When OTHERS then
2978: -- store SQL error message on message stack
2979: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 2988: Okc_Debug.Log('2700: Exiting Get_K_Number', 2);

2984: p_token2_value => sqlerrm);
2985: -- set error flag as UNEXPETED error
2986: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2987: IF (l_debug = 'Y') THEN
2988: Okc_Debug.Log('2700: Exiting Get_K_Number', 2);
2989: Okc_Debug.Reset_Indentation;
2990: END IF;
2991:
2992: END Get_K_Number;

Line 2989: Okc_Debug.Reset_Indentation;

2985: -- set error flag as UNEXPETED error
2986: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2987: IF (l_debug = 'Y') THEN
2988: Okc_Debug.Log('2700: Exiting Get_K_Number', 2);
2989: Okc_Debug.Reset_Indentation;
2990: END IF;
2991:
2992: END Get_K_Number;
2993: