The following lines contain the word 'select', 'insert', 'update' or 'delete':
update_table IN BOOLEAN,
ignore_active IN BOOLEAN,
concat_segs IN VARCHAR2,
vals_not_ids IN BOOLEAN,
use_column_def IN BOOLEAN,
column_def IN FND_FLEX_SERVER1.ColumnDefinitions,
rowid_in IN ROWID,
alt_tbl_name IN VARCHAR2,
data_field_name IN VARCHAR2,
nvalidated OUT nocopy NUMBER,
displayed_vals OUT nocopy FND_FLEX_SERVER1.ValueArray,
stored_vals OUT nocopy FND_FLEX_SERVER1.ValueArray,
segment_ids OUT nocopy FND_FLEX_SERVER1.ValueIdArray,
descriptions OUT nocopy FND_FLEX_SERVER1.ValueDescArray,
desc_lengths OUT nocopy FND_FLEX_SERVER1.NumberArray,
seg_colnames OUT nocopy FND_FLEX_SERVER1.TabColArray,
seg_coltypes OUT nocopy FND_FLEX_SERVER1.CharArray,
segment_types OUT nocopy FND_FLEX_SERVER1.SegFormats,
displayed_segs OUT nocopy FND_FLEX_SERVER1.DisplayedSegs,
seg_delimiter OUT nocopy VARCHAR2,
v_status OUT nocopy NUMBER,
seg_codes OUT nocopy VARCHAR2,
err_segnum OUT nocopy NUMBER) IS
nvals NUMBER;
if(update_table) then
FND_FLEX_SERVER1.add_debug(', Update Table');
fnd_dsql.add_text('select SUBSTRB(' || datafield || ', 1, 2000)' ||
' from ' || table_name ||
' where rowid = CHARTOROWID(');
rstat := FND_FLEX_SERVER1.x_dsql_select_one(concat_segids);
fnd_dsql.add_text('select SUBSTRB(' || dflex_info.context_column || ', 1, 80)' ||
' from ' || table_name ||
' where rowid = CHARTOROWID(');
rstat := FND_FLEX_SERVER1.x_dsql_select_one(context);
FND_FLEX_SERVER1.add_debug('Selecting all columns ');
fnd_dsql.add_text('select ');
fnd_dsql.add_text(FND_FLEX_SERVER1.select_clause
(cols(i), coltypes(i),
value_component, segfmts.vs_format(i), segfmts.vs_maxsize(i)));
rstat := FND_FLEX_SERVER1.x_dsql_select(ncols, segs);
SELECT
descriptive_flex_context_code,
descriptive_flex_context_name,
description,
global_flag
INTO
g_cache_value.varchar2_1,
g_cache_value.varchar2_2,
g_cache_value.varchar2_3,
g_cache_value.varchar2_4
FROM fnd_descr_flex_contexts_vl
WHERE application_id = appl_id
AND descriptive_flexfield_name = dflex_name
AND ((p_id_or_value = 'I' AND
descriptive_flex_context_code = seg_in) OR
(p_id_or_value = 'V' AND
descriptive_flex_context_name = seg_in))
AND enabled_flag = 'Y';
SELECT
descriptive_flex_context_code
INTO
g_cache_value.varchar2_1
FROM fnd_descr_flex_contexts
WHERE application_id = appl_id
AND descriptive_flexfield_name = dflex_name
AND enabled_flag = 'Y'
AND global_flag = 'Y';