oracle过程希望大家给我帮助
create   or   replace   procedure   prc_ibss_data_collect
                --Created   :   2007-6-23
--Purpose   :   ibss系统采集
--Last   modified   time   :  
--Version   :   0.0.1
is
      coursor     c_b9i   is
                            SELECT   *  
            FROM   t114_interface  
          where   flag   =   0;
      v_b9i               c_b9i%rowtype;
           
begin
             
              open   c_b9i;
              loop
                              fetch   c_b9i
                              into   v_b9i;
              exit   when   c_b9i%notfound;

    insert   into   t114_interface_log
    values
(
  v_b9i.SNO,
  v_b9i.ACTION,
  v_b9i.ACTIONDATE,
  v_b9i.CUSTNMANE,
  v_b9i.OLDCUSTNAME,
                  v_b9i.UNIT,
  v_b9i.OLDUNIT,
  v_b9i.ALIAS,
  v_b9i.NUM,
  v_b9i.OLDNUM,
                  v_b9i.ADDR,
                                  v_b9i.OLDADDR,
                  v_b9i.TELTYPE,
  v_b9i.OLDTELTYPE,
  v_b9i.UNITTYPE,
  v_b9i.OLDUNITTYPE,
                  v_b9i.COUNTY,
  v_b9i.SRCTYPE,
                  v_b9i.CUSTPW,
  v_b9i.OLDCUSTPW,
  v_b9i.FLAG,
  v_b9i.ON_114,
  v_b9i.GETDATA_DATE,
  v_b9i.GEOID,
                  v_b9i.INTER_MEMO,
  v_b9i.PRODUCTTYPE,
                  sysdate);
  delete   from   t114_interface   where   current   of   c_b9i;
      end   loop;
      close   c_b9i;
      commit;
 
end;


我是个新手希望大家耐心给于提示
我这个过成有编译错误,希望大家给我提示~~~~~
//鲜明的是错误提示

7/19           PLS-00103:   出现符号   "IS "在需要下列之一时：
                  :=.(@%;notnullrangedefault
                  character

52/4           PLS-00103:   出现符号   "end-of-file "在需要下列之一时：
                  beginfunction
  &nbs