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中能正确执行，同时程序通过斜杠分割之后也能够正确执行。