oracle利用user_db_like的存储过程

CREATE OR REPLACE PROCEDURE hello
as
  --定义参数
  --得到objectid
  cursor Cursor_Objectid is
   select id  from (select a1.id from resource_wap_data_finish a1 union select b1.id from resource_client_data_finish b1);
  
  --定义接收游标中的数据变量
  v_objectid resource_wap_data_finish.id%type;

Begin

  --删除表数据
  --打开游标
  open Cursor_Objectid;
  --取游标中的数据
  loop
   -- v_countDelobjID := v_countDelobjID + 1;
    --遍历游标中的下一行数据
    fetch Cursor_Objectid
      into v_objectid;
    --检测是否已经达到最后一行
    exit when Cursor_Objectid%notfound;
    --删除数据信息
    
     EXECUTE IMMEDIATE 'insert into  t_iiss_c_resoperationlog@LINK_BFMDB(gid,rescode,opttype)values(SEQ_IISS_UNION.NEXTVAL@LINK_BFMDB,'||v_objectid||',5) ';
  end loop;
  close Cursor_Objectid;
  --执行完游标
  commit;
  --提交异常 信息
    exception
    when others then
   DBMS_OUTPUT.PUT_LINE('sssssssssssssssssssssssssssssssssss'); 

         rollback ;
end hello;