create or replace procedure P_TEST_SQL is
TYPE ref_cursor_type IS REF CURSOR;  --定義一個動態遊標
tablename varchar2(200) default 'ess_client';
v_sql varchar2(1000);
mobile varchar2(15);
usrs ref_cursor_type;
begin
  --使用連線符拼接成一條完整SQL
  v_sql := 'select usrmsisdn from '||tablename||' where rownum < 11';
  --開啟遊標
  open usrs for v_sql ;
  loop
      fetch usrs into mobile; 
      exit when usrs%notfound;
      insert into tmp(usrmsisdn) values(mobile);
  end loop;
  close usrs;
  commit;
end P_TEST_SQL;