Oracle动态执行脚本创建序号

-----------------------动态创建序列的脚本---------------------------

declare

  type num_list is varray(14) of varchar2(8);

  -- 老师表、学生表

  xz num_list := num_list('TEACHER','STUDENT');

  maxid integer:=1;

  have integer;

begin

  for i in 1..xz.count

  loop --循环

    execute immediate 'select count(1) from all_sequences where sequence_name = ''SEQ_'|| xz(i) ||'_X_OID''' into have;

    if have=0 then

        execute immediate 'select nvl(max(x_oid),1)+1 from gddbms.' || xz(i) into maxid;

        execute immediate 'create sequence gddbms.seq_'|| xz(i) ||'_x_oid start with '

           ||maxid||' increment by 1 nomaxvalue';

    end if;

  end loop;

end;

/

-----------------------动态删除序列的脚本---------------------------

declare

  type num_list is varray(18) of varchar2(8);

  xz num_list := num_list('TEACHER','STUDENT');

  maxid integer:=1;

  have integer;

begin

  for i in 1..xz.count

  loop --循环

    execute immediate 'select count(1) from all_sequences where sequence_name = ''SEQ_'|| xz(i) ||'_X_OID''' into have;

    if have>0 then

        execute immediate 'drop sequence gddbms.seq_'|| xz(i) ||'_x_oid';

    end if;

  end loop;

end;

总结一下这里面大概有如下几个知识点：
1.num_list是定义的一个数组类型，xz是这个类型的一个对象，for用于循环xz对象。
2.execute immediate用于动态执行一串sql语句。
3.execute immediate **** into *** 用于将执行的结果赋值给某个变量。
4.if xxx then xxxx end if 就是if条件判断。
5.如上，我们每个语句之间用斜杠(/)分割，在pl/sql中能正确执行，同时程序通过斜杠分割之后也能够正确执行。