学习PL/SQ 写的第一个存储过程

create table script_table_name(

       table_name varchar2(40),

       flag number);

comment on table script_table_name is '上线脚本表名表';

comment on column script_table_name.table_name is '表名';

comment on column script_table_name.flag is '状态位';

create or replace procedure script_table_name_proc is

begin 

  for x in (select * from user_tables) loop

     update script_table_name t

       set t.flag = 1

     where t.table_name = x.table_name;

     commit;

  end loop;

end script_table_name_proc;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/23446692/viewspace-692217/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/23446692/viewspace-692217/