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;
- -
【编辑推荐】