31: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AR_ENABLE_DEBUG_OUTPUT'), 'N');
32:
33: -- Bug 8859419 Start
34:
35: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
36: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32:
33: -- Bug 8859419 Start
34:
35: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
36: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
40: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
33: -- Bug 8859419 Start
34:
35: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
36: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
40: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
41: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
34:
35: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
36: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
40: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
41: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
42: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'JG.PLSQL.JG_GLOBE_FLEX_VAL';
35: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
36: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
40: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
41: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
42: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'JG.PLSQL.JG_GLOBE_FLEX_VAL';
43:
36: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
40: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
41: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
42: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'JG.PLSQL.JG_GLOBE_FLEX_VAL';
43:
44: -- Bug 8859419 End
37: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
38: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
39: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
40: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
41: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
42: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'JG.PLSQL.JG_GLOBE_FLEX_VAL';
43:
44: -- Bug 8859419 End
45:
2687: l_debug_info Varchar2(2000);
2688: Begin
2689: l_debug_info := 'Begining of Function';
2690: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2691: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2692: End If;
2693:
2694: l_exist := 'No';
2695:
2696: --Bug 9080741
2697: --fnd_profile.get('JGZZ_COUNTRY_CODE', l_country_code);
2698: --l_debug_info := 'Country Code is : ' || l_country_code;
2699: --If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2700: -- Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2701: --End If;
2702:
2703: --If (l_country_code = 'AR') THEN --Bug 9080741
2704: l_debug_info := 'Index Value : ' || p_gdf_context;
2702:
2703: --If (l_country_code = 'AR') THEN --Bug 9080741
2704: l_debug_info := 'Index Value : ' || p_gdf_context;
2705: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2706: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2707: End If;
2708: If G_GDF_CONTEXT_T.Count > 0 Then
2709: If G_GDF_CONTEXT_T.Exists(p_gdf_context) Then
2710: l_exist := 'Yes';
2709: If G_GDF_CONTEXT_T.Exists(p_gdf_context) Then
2710: l_exist := 'Yes';
2711: l_debug_info := 'GDF Context ' || p_gdf_context || ' found in the PL/SQL Table' ;
2712: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2713: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2714: End If;
2715: Else
2716: For C_Gdf_Context_Rec in C_Gdf_Context Loop
2717: G_GDF_CONTEXT_T(p_gdf_context).global_attribute_category := p_gdf_context;
2717: G_GDF_CONTEXT_T(p_gdf_context).global_attribute_category := p_gdf_context;
2718: l_exist := C_Gdf_Context_Rec.exist_flag;
2719: l_debug_info := 'GDF Context ' || p_gdf_context || ' found in the Database' ;
2720: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2721: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2722: End If;
2723: End Loop;
2724: End If;
2725: Else
2727: G_GDF_CONTEXT_T(p_gdf_context).global_attribute_category := p_gdf_context;
2728: l_exist := C_Gdf_Context_Rec.exist_flag;
2729: l_debug_info := 'GDF Context ' || p_gdf_context || ' found in the Database' ;
2730: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2731: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2732: End If;
2733: End Loop;
2734: End If;
2735: --End If;
2735: --End If;
2736: If upper(l_exist) = 'YES' THEN
2737: l_debug_info := 'GDF Context ' || p_gdf_context || ' found, returning TRUE' ;
2738: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2739: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2740: End If;
2741: Return TRUE;
2742: Else
2743: l_debug_info := 'GDF Context ' || p_gdf_context || ' not found , returning FALSE' ;
2741: Return TRUE;
2742: Else
2743: l_debug_info := 'GDF Context ' || p_gdf_context || ' not found , returning FALSE' ;
2744: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) Then
2745: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2746: End If;
2747: Return FALSE;
2748: End If;
2749: Exception
2749: Exception
2750: When Others Then
2751: l_debug_info := 'Exception Encountered, returning FALSE' ;
2752: If (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2753: Fnd_Log.String(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2754: End If;
2755: Return FALSE;
2756: End Gdf_Context_Exists;
2757: