oracle utl_file包讀取數據的實例

Oracle utl_file包相信大家都有一定的了解，下面為您介紹的是Oracle utl_file包讀取數據的實現方法，如果您對Oracle utl_file包方面感興趣的話，不妨一看。

create or replace directory MY_DIR as '/usr/test/';  
create or replace function f_exportTxt(  
  --傳入參數  
  i_query in varchar2,  
  i_separator in varchar2,  
  i_dir in varchar2,  
  i_filename in varchar2  
) return number  
is  
  /**  
  ** 函數名:f_exportTxt  
  ** 參數:1.i_query 查詢sql語句; 2.i_separator 分隔符,默認為',' ;  
  **      3.i_dir存放目錄; 4.i_filename文件名,默認在文件名前加上yyyymmddhh24mi  
  ** 返回: 大於等於0即為寫入文件記錄數,負為異常  
  ** 功能: 用戶數據抽取,並生成文件到指定目錄下  
  ** 備注:  
  ** 作者:lingo  
  ** 修改日期:2010-04-15  
  **/  
  --定義參數  
  v_file utl_file.file_type;  
  v_theCursor integer default dbms_sql.open_cursor;  
  v_columnValue varchar2(2000); --臨時(列值)  
  v_colCnt number default 0; --列總數  
  v_separator varchar2(10) default ',';--分隔符,默認為#@  
  v_cnt number default 0;  --記錄總數  
  v_filename varchar2(100);--時間  
  v_status integer;--執行SQL後返回狀態值  
  v_count number default 10000 ; --每次查詢的數量，大於該數量則多次讀取數據到游標  
  v_tmp number ;--臨時(總記錄數,通過SQL統計算出,假如v_cnt不等於v_tmp,則導出有誤)  
  v_sql varchar2(2000) ; --組合sql語句  
  v_loops number ; --循環次數  
begin  
  --select to_char(sysdate,'yyyymmddhh24mi') into v_filename from dual; --取時間年月日時分做文件名前綴  
  v_filename :='';  
  v_filename := v_filename||i_filename ; --組建文件名  
  v_sql := 'select count(''x'') from (' ||i_query||')' ;--統計總數  
  execute immediate v_sql into v_tmp;  
  select trunc(v_tmp/v_count) into v_loops from dual ; --循環次數  
  if mod(v_tmp,v_count) > 0 then  
    v_loops := v_loops+1;  
  end if;  
  v_file := utl_file.fopen(i_dir,v_filename,'W'); --打開文件  
  for i in 1 .. v_loops loop  
      v_sql := 'select * from ( select m.*,rownum r fr ......