免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1730 | 回复: 1
打印 上一主题 下一主题

[求助] 游标推出内循环异常 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2013-03-25 15:34 |只看该作者 |倒序浏览
本帖最后由 luiszhu 于 2013-03-25 15:46 编辑

当ca2遇到空时,无数据时会结束程序,但其实ca1的内容还没历遍. 我需要跳出ca2,继续执行。请看看**问题?

cursor ca1 is
  select PALLET_ID,CC_PART_NUM,SN_QTY,SUBINVENTORY,LOCATOR,COMMENTS
  from ISS_inventory;
ca1_rec ca1%rowtype;

cursor ca2 is
  select SERIAL_NUM,LAST_DDSR_DATE,LAST_OP,FIRST_DDSR_DATE
  from ISS_FIFO_DDSR
  where PALLET_ID = v_pallet_id;
ca2_rec ca2%rowtype;

......
  begin
      open ca1;
          loop
           fetch ca1 into ca1_rec;
            exit when ca1%notfound;
                v_pallet_id:=ca1_rec.PALLET_ID;
                v_cc_part_num:=ca1_rec.CC_PART_NUM;
                v_sn_qty:=ca1_rec.SN_QTY;
                v_subinventory:=ca1_rec.SUBINVENTORY;
                v_locator:=ca1_rec.LOCATOR;
                v_comments:=ca1_rec.COMMENTS;
           open ca2;
             loop
                fetch ca2 into ca2_rec;
                        exit when ca2%notfound;
                         v_sn:= ca2_rec.SERIAL_NUM;
                         v_last_ddsr_date:= ca2_rec.LAST_DDSR_DATE;
                         v_last_op:= ca2_rec.LAST_OP;
                         v_first_ddsr_date:= ca2_rec.FIRST_DDSR_DATE;
                        utl_file.put_line(out_file,v_pallet_id||','||v_cc_part_num||','||v_sn_qty||','||v_subinventory||','||v_locator||','||v_comments||','||v_sn||','||v_last_ddsr_date||','||v_last_op||','||v_first_ddsr_date);

            end loop;
           close ca2;
        end loop;
     close ca1;
  end;

论坛徽章:
0
2 [报告]
发表于 2013-03-25 16:26 |只看该作者
找到问题了,原来定义的
v_comments              varchar2(32);
但实际有值超过32位。扩大位数,问题解决。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP