The following lines contain the word 'select', 'insert', 'update' or 'delete':
statement := 'select install_group_num from '||upper(aol_schema)||
'.fnd_oracle_userid where read_only_flag = ''U'''||
' order by install_group_num' ;
statement := 'select language, attribute_column_name, '||
'translated_column_number from '||
aol_schema||'.ak_language_attribute_xrefs '||
'where language not in (select nls_language '||
'from '||aol_schema||'.fnd_languages '||
'where installed_flag = ''B'') ';
select_list out nocopy varchar2)
is
c integer;
lselect_list varchar2(20000) := null;
'select dtc.column_name, '||
' decode(atc.column_name,'''',''N'',''Y'') mlsized, '||
' translated_column_number '||
'from all_tab_columns dtc, '||
aol_schema||'.ak_translated_columns atc '||
'where dtc.table_name = upper(:table_name) '||
'and nvl(atc.enabled_flag,''Y'') = ''Y'' '||
'and dtc.owner = upper(:table_owner) '||
'and atc.table_name (+) = dtc.table_name '||
'and atc.column_name (+) = dtc.column_name '||
'order by dtc.column_id ';
lselect_list := lselect_list || ', ';
lselect_list := lselect_list || ad_mls.mls_decode_1 ||
'"'||column_name || '"), "' || column_name ||'")' ;
lselect_list := lselect_list || ad_mls.mls_decode_2 ||
'"'||column_name || '"), "' || column_name ||'")' ;
lselect_list := lselect_list||'"'|| column_name||'"';
lselect_list := lselect_list ||'"'|| column_name||'"';
select_list := lselect_list;
lview_column_list||','||lselect_list||
'):'||ad_apps_private.error_buf;