1: PACKAGE BODY fnd_flex_val_api AS
2: /* $Header: AFFFVAIB.pls 120.29 2011/10/19 20:43:07 hgeorgi ship $ */
3:
4:
5: chr_newline CONSTANT VARCHAR2(8) := fnd_global.newline;
112:
113: PROCEDURE message(msg VARCHAR2) IS
114: BEGIN
115: internal_messages := internal_messages || msg ||
116: fnd_flex_val_api.chr_newline; /* hack to add LF */
117: END;
118:
119: PROCEDURE message_init IS
120: BEGIN
2378: x_select => x_select,
2379: x_mapping_code => x_mapping_code,
2380: x_success => l_success);
2381: x_success := l_success;
2382: IF (l_success = fnd_flex_val_api.g_ret_vtype_mismatch) THEN
2383: message(l_func_name || 'Value set is not table validated.');
2384: x_success := g_ret_not_table_validated;
2385: END IF;
2386: EXCEPTION
2452: x_select => x_select,
2453: x_mapping_code => x_mapping_code,
2454: x_success => l_success);
2455: x_success := l_success;
2456: IF (l_success = fnd_flex_val_api.g_ret_vtype_mismatch) THEN
2457: message(l_func_name || 'Value set is not independent.');
2458: l_success := g_ret_not_indep_validated;
2459: END IF;
2460: EXCEPTION
2527: x_select => x_select,
2528: x_mapping_code => x_mapping_code,
2529: x_success => l_success);
2530: x_success := l_success;
2531: IF (l_success = fnd_flex_val_api.g_ret_vtype_mismatch) THEN
2532: message(l_func_name || 'Value set is not dependent.');
2533: x_success := g_ret_not_dep_validated;
2534: END IF;
2535: EXCEPTION
2577: RETURN(FALSE);
2578: EXCEPTION
2579: WHEN OTHERS THEN
2580: x_message :=
2581: 'FND_FLEX_VAL_API.IS_TABLE_USED is failed. ' || chr_newline ||
2582: 'SQLERRM : ' || Sqlerrm;
2583: RETURN(TRUE);
2584: END is_table_used;
2585:
2644: RETURN(FALSE);
2645: EXCEPTION
2646: WHEN OTHERS THEN
2647: x_message :=
2648: 'FND_FLEX_VAL_API.IS_COLUMN_USED is failed. ' || chr_newline ||
2649: 'SQLERRM : ' || Sqlerrm;
2650: RETURN(TRUE);
2651: END is_column_used;
2652:
5215:
5216:
5217: /* END_PUBLIC */
5218:
5219: END fnd_flex_val_api; /* package body*/