oracleutl_file包读取数据的实例

oracle utl_file包相信大家都有一定的了解，下面为您介绍的是oracle utl_file包读取数据的实现方法，如果您对oracle utl_file包方面感兴趣的话，不妨一看。

我们提供的服务有：网站建设、做网站、微信公众号开发、网站优化、网站认证、中阳ssl等。为数千家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的中阳网站制作公司

 
 
 

  
  
  
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 ......  
 
 
 

网站栏目：oracleutl_file包读取数据的实例
文章链接：http://www.gawzjz.com/qtweb/news49/188349.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联