oracle中的刷新,有什么方法可以从Oracle中的PL / SQL刷新输出？

如果可能，应使用自己的函数替换对dbms_output.put_line的调用。

以下是此功能的代码g_DEBUG:=FALSE-如果您希望能够在2种日志记录解决方案之间进行选择：

将日志写入自主事务中的表

CREATE OR REPLACE PROCEDURE to_dbg_table(p_log varchar2)

-- table mode:

-- requires

-- CREATE TABLE dbg (u varchar2(200) --- username

-- , d timestamp --- date

-- , l varchar2(4000) --- log

-- );

AS

pragma autonomous_transaction;

BEGIN

insert into dbg(u, d, l) values (user, sysdate, p_log);

commit;

END to_dbg_table;

/

或直接写入托管数据库的数据库服务器

这使用Oracle目录g_DEBUG:=FALSE

CREATE OR REPLACE PROCEDURE to_dbg_file(p_fname varchar2, p_log varchar2)

-- file mode:

-- requires

--- CREATE OR REPLACE DIRECTORY TMP_DIR as '/directory/where/oracle/can/write/on/DB_server/';

AS

l_file utl_file.file_type;

BEGIN

l_file := utl_file.fopen('TMP_DIR', p_fname, 'A');

utl_file.put_line(l_file, p_log);

utl_file.fflush(l_file);

utl_file.fclose(l_file);

END to_dbg_file;

/

g_DEBUG:=FALSE

然后可以在两种用途之间切换或禁用该2994218118119721387008程序以避免性能损失(2994218119721972700700)。

CREATE OR REPLACE PROCEDURE write_log(p_log varchar2) AS

-- g_DEBUG can be set as a package variable defaulted to FALSE

-- then change it when debugging is required

g_DEBUG boolean := true;

-- the log file name can be set with several methods...

g_logfname varchar2(32767) := 'my_output.log';

-- choose between 2 logging solutions:

-- file mode:

g_TYPE varchar2(7):= 'file';

-- table mode:

--g_TYPE varchar2(7):= 'table';

-----------------------------------------------------------------

BEGIN

if g_DEBUG then

if g_TYPE='file' then

to_dbg_file(g_logfname, p_log);

elsif g_TYPE='table' then

to_dbg_table(p_log);

end if;

end if;

END write_log;

/

这是如何测试以上内容：

1)从您的SQLPLUS启动此(文件模式)：

BEGIN

write_log('this is a test');

for i in 1..100 loop

DBMS_LOCK.sleep(1);

write_log('iter=' || i);

end loop;

write_log('test complete');

END;

/

2)在数据库服务器上，打开一个shell并

tail -f -n500 /directory/where/oracle/can/write/on/DB_server/my_output.log