我和同事由于需要从用户的数据库中导出大量的表,但是由于种种原因,只能用创建的方式导,因此写了如下存储过程。
可是执行的时候报错“ORA-01002读取违反顺序”。比较合理的解释是:
“create table 这是个ddl语句,系统会隐式自动作commit。在透明网关访问过程中是遵循ansi标准的,根据ansi标准,cursor fetch loop中如果有commit,会自动close cursor。这就造成你在执行fetch 时候出现ORA-01002。可以把cursor的结果写入collection,然后通过另外的处理来进行数据导入。”
可是除了游标和游标变量,在存储过程中无法用其他的collection 。在应用中可以调用,但是想用一个存储过程独立完成的目标看来比较难以实现。或者可以使用建立临时表的方式来解决,不过略显笨拙了些。
另外看到一个for loop的用法,不常见,但是真的比较简洁。
引用至:http://www.cnblogs.com/jjiac/archive/2007/01/24/628831.html
--------------------------------------------------------------------------------
我们在Oracle存储过程中需要遍历一张表,应该怎样做。我想大多少的人第一个念头就是Cursor。
比如:
create or replace procedure StudyCursor(
resulst out integer
) is
v_tablename varchar(30);
v_tabletype varchar(11);
cursor mycursor is select * from cat;
begin
open mycursor;
loop
fetch mycursor into v_tablename,v_tabletype;
null; --you can use tablename and v_tabletype
end loop;
close mycursor;
end StudyCursor;
最近在看代码是,发现其实我们还有一个更方便的方法就是使用for in loop … end loop
create or replace procedure StudyFor(
resulst out integer
) is
begin
for emm in(select * from cat) loop
null; --you can use emm.table_name and emm.table_type
end loop;
return ;
end StudyFor;
是不是更方便,我要使用的查询结果,只需使用emm.table_name和emm.table_type即可。
查找了Oracle的官方文档,似乎没有看见for loop的此种用法。确实很奇妙,只是不知道oracle内部具体的实现方法。
--------------------------------------------------------------------------------
用了for loop来尝试我们的创建表存储过程,还是一样的错误,看来在实现机制上,还是没有跳脱游标的操作。
create or replace procedure createtable is
tablename varchar2(100) ;
sqlstring varchar2(1000);
CURSOR cur_1 is select "name" from sysobjects@sql2000 where "type"='U';
begin
open cur_1;
loop
fetch cur_1 into tablename;
EXIT WHEN cur_1%NOTFOUND;
sqlstring := 'CREATE TABLE ' || tablename || ' as select * from ' || tablename || '@sql2000';
dbms_output.put_line(sqlstring);
EXECUTE IMMEDIATE 'CREATE TABLE ' || tablename || ' as select * from ' || tablename || '@sql2000';
end loop;
close cur_1;
end;
可是执行的时候报错“ORA-01002读取违反顺序”。比较合理的解释是:
“create table 这是个ddl语句,系统会隐式自动作commit。在透明网关访问过程中是遵循ansi标准的,根据ansi标准,cursor fetch loop中如果有commit,会自动close cursor。这就造成你在执行fetch 时候出现ORA-01002。可以把cursor的结果写入collection,然后通过另外的处理来进行数据导入。”
可是除了游标和游标变量,在存储过程中无法用其他的collection 。在应用中可以调用,但是想用一个存储过程独立完成的目标看来比较难以实现。或者可以使用建立临时表的方式来解决,不过略显笨拙了些。
另外看到一个for loop的用法,不常见,但是真的比较简洁。
引用至:http://www.cnblogs.com/jjiac/archive/2007/01/24/628831.html
--------------------------------------------------------------------------------
我们在Oracle存储过程中需要遍历一张表,应该怎样做。我想大多少的人第一个念头就是Cursor。
比如:
create or replace procedure StudyCursor(
resulst out integer
) is
v_tablename varchar(30);
v_tabletype varchar(11);
cursor mycursor is select * from cat;
begin
open mycursor;
loop
fetch mycursor into v_tablename,v_tabletype;
null; --you can use tablename and v_tabletype
end loop;
close mycursor;
end StudyCursor;
最近在看代码是,发现其实我们还有一个更方便的方法就是使用for in loop … end loop
create or replace procedure StudyFor(
resulst out integer
) is
begin
for emm in(select * from cat) loop
null; --you can use emm.table_name and emm.table_type
end loop;
return ;
end StudyFor;
是不是更方便,我要使用的查询结果,只需使用emm.table_name和emm.table_type即可。
查找了Oracle的官方文档,似乎没有看见for loop的此种用法。确实很奇妙,只是不知道oracle内部具体的实现方法。
--------------------------------------------------------------------------------
用了for loop来尝试我们的创建表存储过程,还是一样的错误,看来在实现机制上,还是没有跳脱游标的操作。