create or replace procedure p_child_ins(sid in string,sstats in string)  as
  v_ename BacterinInfo.BacterinCode%TYPE; 
  CURSOR c_emp IS SELECT BacterinCode FROM BacterinInfo;
begin
   OPEN c_emp; 
   LOOP  
  FETCH c_emp INTO v_ename; 
  EXIT WHEN c_emp%NOTFOUND; 
   insert into ChildBacterin(ChildID,BacterinCode,InoculStats) values(sid,v_ename,sstats);
  end loop;
   close c_emp; 
end p_child_ins;LINE/COL ERROR
-------- -----------------------------------------------------------------
2/2      PLS-00103: 出现符号 ""在需要下列之一时:
         beginfunctionpackagepragma
         proceduresubtypetypeuse<an identifier>
         <a double-quoted delimited-identifier>cursorformcurrent
         externallanguage

解决方案 »

  1.   

    create or replace procedure p_child_ins(sid in varchar2,sstats in varchar2)  as
      v_ename BacterinInfo.BacterinCode%TYPE; 
      CURSOR c_emp IS SELECT BacterinCode FROM BacterinInfo;
    begin
       OPEN c_emp; 
       LOOP  
       EXIT WHEN c_emp%NOTFOUND;   --放在前面
      FETCH c_emp INTO v_ename; 
     
       insert into ChildBacterin(ChildID,BacterinCode,InoculStats) values(sid,v_ename,sstats);
      end loop;
       close c_emp; 
    end p_child_ins;