ORACLE数据库记录输出到文本文件的实现

ORACLE数据库记录应该如何才能输出到文本文件呢？下面就教您一个ORACLE数据库记录输出到文本文件的实现方法啊，希望对您学习ORACLE数据库记录方面能有所帮助。

在某些情况下，比如说为了与其他数据库进行数据交换，我们需要把ORACLE数据库里的数据输出来，保存到一个中间文件，然后再作处理。那么如何输出ORACLE数据库里的数据呢？

假设这些数据是文本类型的数据（字符、数字、日期），我们至少有两种办法输出，一种是利用制表功能，把所有数据以表格形式输出，并把表格保存到一个文本文件。另一种办法更简单，就是利用UTL_FILE包，直接把数据输入到文本文件。

在使用UTL_FILE包前需要在ORACLE数据库的初始化文件(initsid.ora）定义UTL_FILE的可写目录，例如

 
 
 
  
  
  UTL_FILE=/eXPort/home/oracle/output

另外,还要注重的是输出记录中字段***大小是1023字节，假如有字段超过这个限制，就需要把它截断成几部分，就如下面的例子一样。
这里给出一个实例，朋友们可以先照搬，然后根据自己数据库的实际情况，修改后使用。

 
 
 
  
  
  DECLARE 
  
  
  OutputFile UTL_FILE.FILE_TYPE; 
  
  
  vart_title perd11.ART_TITLE%TYPE; 
  
  
  vart_author perd11.ART_AUTHOR%TYPE; 
  
  
  vart_keyWord perd11.ART_KEYWORD%TYPE; 
  
  
  vart_abstract perd11.ART_ABSTRACT%TYPE; 
  
  
  vart_abs1 perd11.ART_ABSTRACT%TYPE; 
  
  
  vart_abs2 perd11.ART_ABSTRACT%TYPE; 
  
  
  vart_authorinstitute perd11.ART_AUTHORINSTITUTE%TYPE; 
  
  
  vperd_volume perd11.PERD_VOLUME%TYPE; 
  
  
  vperd_issue perd11.PERD_ISSUE%TYPE; 
  
  
  vperd_date perd11.PERD_DATE%TYPE; 
  
  
  vpub_name perd11.PUB_NAME%TYPE; 
  
  
  vpub_issn perd11.PUB_ISSN%TYPE; 
  
  
  vclass_name perd11.CLASS_NAME%TYPE; 
  
  
  
  
  
  CURSOR cperd11 IS 
  
  
  select * from perd11; 
  
  
  
  
  
  BEGIN 
  
  
  OutputFile := UTL_FILE.FOPEN 
  
  
  (’/export/home/oracle/output’,'perd11.out’,'a’); 
  
  
  open cperd11; 
  
  
  LOOP 
  
  
  fetch cperd11 into vart_no,vart_title, 
  
  
  vart_author,vart_keyword,vart_abstract, 
  
  
  vart_authorinstitute,vperd_volume, 
  
  
  vperd_issue,vperd_date,vpub_name, 
  
  
  vpub_issn,vclass_name; 
  
  
  IF length(vart_abstract)>1000 THEN 
  
  
  vart_abs1:=substr(vart_abstract,0,1000); 
  
  
  vart_abs2:=substr(vart_abstract,1001); 
  
  
  ELSE 
  
  
  vart_abs1:=vart_abstract; 
  
  
  vart_abs2:=”; 
  
  
  END IF; 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【期刊类别】\n%s\n’,vclass_name); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【期刊刊号】\n%s\n’,vpub_issn); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【期刊名称】\n%s\n’,vpub_name); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【期刊卷号】\n%s\n’,vperd_volume); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【期刊期号】\n%s\n’,vperd_issue); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【出版日期】\n%s\n’,vperd_date); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【中文标题】\n%s\n’,vart_chntitle); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【中文作者】\n%s\n’,vart_chnauthor); 
  
  
  
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【作者单位】\n%s\n’,vart_authorinstitute); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【中文要害词】\n%s\n’,vart_chnkeyword); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【中文文摘】\n%s\n’,vart_engabs1); 
  
  
  UTL_FILE.PUTF(OutputFile,’ 
  
  
  【中文文摘2】\n%s\n’,vart_engabs2); 
  
  
  UTL_FILE.FFLUSH(OutputFile); 
  
  
  exit when cperd11%NOTFOUND; 
  
  
  END LOOP; 
  
  
  close cperd11; 
  
  
  
  
  
  END;  
  
  
  
  
  
  -

网站标题：ORACLE数据库记录输出到文本文件的实现
URL链接：http://www.hantingmc.com/qtweb/news8/410658.html

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

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

猜你还喜欢下面的内容