1) 使用PLSQL,或SI Object Browser 执行如下sql语句
--oracle 查询当前用户所有包含某一字段的表,并修改此字段的值
create or replace procedure fdlis.pro_edit_column
is
col_new_value varchar2(40):='00020002';--字段新值
col_old_value varchar2(40):='00000072';--字段旧值
cursor cur_list is SELECT utc.TABLE_NAME, utc.COLUMN_NAME FROM user_tab_cols utc WHERE utc.COLUMN_NAME = 'HOSPITAL_CODE'; --字段名称(大写) 查询当前用户包含HOSPITAL_CODE字段的所有表
v_table_name user_tab_cols.table_name%type;
v_column_name user_tab_cols.column_name%type;
sql_str varchar2(1000);
begin
DBMS_OUTPUT.ENABLE(buffer_size=>null) ;
open cur_list;
loop
fetch cur_list into v_table_name,v_column_name;
exit when cur_list%notfound;
sql_str:= 'update ' || v_table_name || ' set ' || v_column_name || '=''' || col_new_value || ''' where ' || v_column_name || '=''' || col_old_value ||'''';
dbms_output.put_line(sql_str); --输出语句
execute immediate sql_str; --执行语句并提交事物
commit;
/*if (v_table_name = 'LIS_DATA_RESULT_18') then
dbms_output.put_line('表名与LIS_DATA_RESULT_18相等');
else
dbms_output.put_line('不等');
end if;*/
end loop;
end pro_edit_column;
--当我们写完存储过程之后,我们可以在 command window下执行,oracle默认是不显示输出的,
--所以我们要 set serveroutput on 命令来显示输出结果,然后exec pro_edit_column()即可输出结果。
2) 如果使用plsql工具,进入sql命令窗口, 执行 set serversoutput on 命令后, 再执行 exec pro_edit_column();
3) 如果使用的SI工具, 进入dos命令 sqlplus 登陆用户信息, 执行 2) 操作;