ORACLE ͨ¹ýÓαêʹÓÃÀ´Á˽âcursor µÄºÃ´¦£¡

ÓÐÁËÓα꣬¾Í¿ÉÒÔ²»ÓÃÿÌõÊý¾ÝÈ¥¼ì²éÊÇ·ñ·ûºÏÌõ¼þ£¬ÏÈ¿´Ò»ÏÂÏÂÃæµÄ£º
--ÓαêʹÓã¨ÓαêÆäʵÊÇÒ»¸ö·ÅÈëÄÚ´æÁÙʱ±í£©
declare
   money cms3_simcard.card_fee%type :=0; --¶¨ÒåÓë±í×Ö¶ÎÏàͬÀàÐÍ
   cursor mycursor is --¶¨ÒåÓαê
          select * from cms3_simcard
          where return_flag = 1 and msisdn like '138%';
   my_record mycursor%rowtype;  --¶¨ÒåÓαê¼Ç¼ÀàÐÍ
   Counter int :=0;
  
begin
   open mycursor;  --´ò¿ªÓαê
   if mycursor%isopen  then  --Åжϴò¿ª³É¹¦
   loop --Ñ­»·»ñÈ¡¼Ç¼¼¯
     fetch mycursor into my_record; --»ñÈ¡ÓαêÖеļǼ
         if mycursor%found then  --ÓαêµÄfoundÊôÐÔÅжÏÊÇ·ñÓмǼ
            dbms_output.put_line(my_record.card_fee);
         else
            exit;
         end if;
   end loop;
   else
     dbms_output.put_line('ÓαêûÓдò¿ª');
   end if;
  close mycursor;
end;