oracle utl_file权限,Oracle内建包UTL_FILE使用说明

在数据库的开发中，当PL/SQL语句很复杂的时候，我想写一些Log，就像java的Log4j那样。这样就可以很好的跟踪程序的运行情况。在网上找到的文章不是很好用，修改了一下。

1：在Oracle服务器上建立一个目录并指定权限(我这个是unix的。windows用c:/tmp之类的就行)

CREATE DIRECTORY TEMP AS '/tmp';

GRANT READ,WRITE ON DIRECTORY TEMP TO PUBLIC;

GRANT   EXECUTE ON SYS.UTL_FILE TO YOU_USER_NAME;

如果出现权限错误的话，注意自己登陆的方式，我是用oralce用户TelNet到Unix上的，然后connect / as sysdba。(windows 用户应该是：用sys用户登录到数据库(ora9i):conn sysdba ，sys用户的缺省密码和system一样，都是manager)

2：写Log文件的SQL语句如下：

declare

file_handle utl_file.file_type;

buff varchar2(20);

cursor c1 is select acloumn from t_atable;

begin

file_handle := utl_file.fopen('TEMP',log.txt','w');

open c1;

loop

fetch c1 into buff;

exit when c1%notfound;

utl_file.put_line(file_handle,buff);

end loop;

close c1;

utl_file.fclose(file_handle);

end;

这样，就应该可以了，file_handle := utl_file.fopen('TEMP',log.txt','w');中的'w'是指write,也可以是'a',append.

封装后是这样的：

procedure writeLog(logMessage in Varchar2) is

begin

IF logSwitch THEN

file_handle := utl_file.fopen('TEMP','x.txt','w');

utl_file.put_line(file_handle,logMessage);

utl_file.fclose(file_handle);

END IF;

end;

其中logSwitch 是boolean型，我定义在包中的。如果直接用的话可以是procedure writeLog(logMessage in Varchar2, logSwitch in boolean )

/************************************************************************************/

最近用到了Oracle的包UTL_FILE，网上却没找到关于它的函数，过程使用说明，虽然都不是很难的东西，但简单列出来，也能提高些效率。

于是有了这篇文。

以下翻译来自《Oracle Built-in Packages》的第六章，只翻译了部分，想了解的更详细，请参考原文。

FOPEN

IS_OPEN

GET_LINE

PUT

NEW_LINE

PUT_LINE

PUTF

FFLUSH</