Oracle游标使用方法及语法大全

sql2:=sql2 || sql3;

--打开动态游标，再往下就都一样了 open c1 for sql2; loop

fetch c1 into r_c1; exit when c1%notfound; str1:=''; str2:='';

--打开工序表进行处理 open c2(r_c1.pbom_id); loop fetch c2 into r_c2;

exit when c2%notfound; --没有记录退出 if r_c2.cjjc_name is not null then

str1 :=str1 || to_char(r_c2.cjjc_name); end if;

if r_c2.bz_name is not null then

str2 := str2 || r_c2.bz_name || to_char(r_c2.dd_count); elsif r_c2.gx_name is not null then

str2 := str2 || to_char(r_c2.gx_name) || to_char(r_c2.dd_count); end if;

end loop; close c2;

insert into sc_print_syn(a,b,ip,p_id,r_id) values(str1,str2,s_ip,pd_id,r_c1.pbom_id); COMMIT; end loop; close c1; END mx_print_common;

当然，实现的方法一定很多，甚至可以用隐式游标。但是隐式游标中用动态查询语句也要费一些周折的。 评论:

#re: oracle动态游标的简单实现方法 2008-05-27 09:18 | xzc

----定义

type cursor_type is ref cursor; c1 cursor_type; ----使用

--打开动态游标，再往下就都一样了 open c1 for sql2; loop

fetch c1 into r_c1;

exit when c1%notfound; 回复更多评论

#re: oracle动态游标的简单实现方法 [未登录] 2008-05-27 11:43 | xzc

TYPE cursor_type IS REF CURSOR; c1 cursor_type; --

OPEN c1 FOR lc_sql; LOOP FETCH c1

INTO lc_source_column_pk_value, lc_source_column_npk_value; EXIT WHEN c1%NOTFOUND; null; END LOOP; <>

CLOSE c1; 回复更多评论

#re: oracle动态游标的简单实现方法 [未登录] 2008-05-30 19:32 | xzc

DECLARE

v_cursor NUMBER; v_stat NUMBER; v_row NUMBER;

v_id NUMBER; v_no VARCHAR(100); v_date DATE; v_sql VARCHAR(200); s_id NUMBER; s_date DATE; BEGIN

s_id := 3000; s_date := SYSDATE;

v_sql := 'SELECT id,qan_no,sample_date FROM \WHERE id > :sid and sample_date < :sdate';

v_cursor := dbms_sql.open_cursor; --打开游标；

dbms_sql.parse(v_cursor, v_sql, dbms_sql.native); --解析动态SQL语句； dbms_sql.bind_variable(v_cursor, ':sid', s_id); --绑定输入参数； dbms_sql.bind_variable(v_cursor, ':sdate', s_date);

dbms_sql.define_column(v_cursor, 1, v_id); --定义列 dbms_sql.define_column(v_cursor, 2, v_no, 100); dbms_sql.define_column(v_cursor, 3, v_date);

v_stat := dbms_sql.execute(v_cursor); --执行动态SQL语句。 LOOP

EXIT WHEN dbms_sql.fetch_rows(v_cursor)<=0; --fetch_rows在结果集中移动游标，如果未抵达末尾，返回1。

dbms_sql.column_value(v_cursor, 1, v_id); --将当前行的查询结果写入上面定义的列中。