日期:2014-05-17  浏览次数:20947 次

为什么数据插不进去呢,帮忙看看,谢谢!
现在要初始化数据库中的记录,有两个表的记录是从其他表过来的,写了个程序插入数据库中表的记录,如下方法,编译,运行都没有问题,为什么数据就是插不进去呢?大家帮忙看看,谢谢

方式1:

DECLARE

            v_regionCode   ips_region_code_tbl.REGION_CODE%TYPE;
            v_investigateType   ips_task_time_control.INVESTIGATE_TYPE%TYPE;          

            CURSOR   c1   IS   select   REGION_CODE   from   ips_region_code_tbl   where   region_type= '01 '   and   region_grade=2;          
            CURSOR   c2   IS   select   id   from   investigate_type_tbl;  

BEGIN

          OPEN   c1;
          LOOP
          FETCH   c1   INTO   v_regionCode;
                            EXIT   WHEN   c1%NOTFOUND;
                            open   c2;
                            LOOP

                                    FETCH   c2   into   v_investigateType;  
                                    EXIT   WHEN   c2%NOTFOUND;    

                              insert   into   ips_task_time_control   (no,set_type,branch_code,investigate_type,value,update_user,update_date)   values(seq_ips_task_time.nextval, '1 ',v_regionCode,v_investigateType,15, 'admin ',current_date);

                            END   LOOP;
          END   LOOP;
          CLOSE   c1;
          CLOSE   c2;
          COMMIT;

EXCEPTION

          WHEN   OTHERS   THEN

          ROLLBACK;

END;

 

 

 

 

方法2:

create   or   replace   procedure   test   as

begin

for   p   in   (select   REGION_CODE   from   ips_region_code_tbl   where   region_type= '01 '   and   region_grade=2)

    loop
      for   q   in(select   id   from   investigate_type_tbl)  
      loop
                insert   into   ips_task_time_control   (no,set_type,branch_code,investigate_type,value,update_user,update_date)   values(SEQ_IPS_OPERATE_REGION.NEXTVAL, '1 ',p.region_code,q.id,15, 'admin ',current_date);

      end   loop;
end   loop;
end;


------解决方案-------------