加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

Oracle BULK COLLECT批量取数据解决方法

发布时间:2020-12-12 16:52:53 所属栏目:百科 来源:网络整理
导读:div class="codetitle" a style="CURSOR: pointer" data="41357" class="copybut" id="copybut41357" onclick="doCopy('code41357')" 代码如下:div class="codebody" id="code41357" -- Created on 2010/11/04 by WANGNAN declare -- Local variables here i

<div class="codetitle"><a style="CURSOR: pointer" data="41357" class="copybut" id="copybut41357" onclick="doCopy('code41357')"> 代码如下:<div class="codebody" id="code41357">
-- Created on 2010/11/04 by WANGNAN
declare
-- Local variables here
i integer;
TYPE t_table IS TABLE OF VARCHAR2(10 ) INDEX BY VARCHAR2 (2);
v_t_table t_table; TYPE t_pg3 IS TABLE OF asis.PG3_AGENTCD_CONVERSION% ROWTYPE;
v_pg3_table t_pg3; c_pg3_vendor com.cRef;
v_str VARCHAR2( 250);
begin
-- Test statements here
OPEN c_pg3_vendor FOR SELECT * FROM asis.PG3_AGENTCD_CONVERSION; FETCH c_pg3_vendor BULK COLLECT INTO v_pg3_table;
FOR i IN 1 .. v_pg3_table.count LOOP
v_t_table(v_pg3_table(i).ASIS_AGENT_CD) := v_pg3_table(i).TOBE_VENDOR_CD;
END LOOP; v_str := v_t_table.first;
WHILE v_str is NOT NULL LOOP
dbms_output.put_line(v_str || ' : ' ||v_t_table(v_str));
v_str := v_t_table.next(v_str);
END LOOP; EXCEPTION WHEN OTHERS THEN
dbms_output.put_line( sqlerrm);
END;

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读