亚洲欧美激情另类校园_欧美理论电影在线播放_国产精品久久久一区_久久99国产精品久久久久久久久_亚洲人成网站999久久久综合_日韩av日韩在线观看_欧美精品激情在线_…久久精品99久久香蕉国产_亚洲最大福利网站_久久精品欧美视频_国产精品免费视频久久久_欧美一区二区三区图_国产精品一区二区久久精品_中国日韩欧美久久久久久久久_亚洲免费福利视频_最新69国产成人精品视频免费

過程樣例：
create or replace procedure real_user as
  c_count number(10);
begin

  DECLARE
    TYPE mobile_type IS TABLE OF mobile_dabenying.mobile%TYPE;  --按表字段類型來定義變量類型
    t_mobile mobile_type := mobile_type();
  
  BEGIN
    select mobile BULK COLLECT  --批量選擇數據
      INTO t_mobile
      from (select mobile from mobile_dabenying order by mobile);
  
    if (t_mobile.COUNT > 0) then
      FOR i IN t_mobile.FIRST .. t_mobile.LAST LOOP
      
        select count(*)  --從號段中過濾
          into c_count
          from mobile_region
         where t_mobile(i) between start_mobile and end_mobile;
      
        if (c_count > 0) then
          c_count := 0;
          insert into mobile_dabenying2 (mobile) values (t_mobile(i));  --真實用戶
        else
          dbms_output.put_line(t_mobile(i));
          insert into mobile_dabenying3 (mobile) values (t_mobile(i));  --假用戶
        end if;
      
      END LOOP;
    end if;
  
  END;

end;