oracle中游标的使用案例

DECLARE
userid WEB_SITE.USERID%TYPE;
id WEB_SITE.ID%TYPE;
CURSOR site IS select id,userid from  web_site;
begin
OPEN site; 
 LOOP
fetch site into id,userid;
EXIT WHEN site%NOTFOUND;
 
 INSERT INTO  web_model (id,userId,siteId,name,type,codeHeadLeft,
 codeHeadRight,code,codeEdit,codeWeb,model,bgColor,style)
  values(id+1,userid,id,'搜索','网站默认','','','','搜索结果列表',
  '<iframe id=searchDiv_dongtai width=100% height=2000px frameborder=no border=0 marginwidth=0 marginheight=0></iframe><script src="/webSite/webLink/fixed/search.js" type="text/javascript"></script>',
  '','','0');
 
  INSERT INTO  web_page (id,userId,siteId,model,fatherNode,fatherNodeName,name,title,
  keyWords,introduction,bgColor,posterCode,code,style,isShow,isShowImgHead,isShowNavigation,
  isShowFooter,pageType) values (id+2,userid,id,'2','0','','搜索结果','搜索结果','搜索结果',
  '','','-1,-1,-1','widget-place-1=|widget-place-2=widget-'||(id+1),'0','0','1','1','1','1');
   
END LOOP; 
close site;
 end;