29:
30: PROCEDURE enable_debug is
31: BEGIN
32: debug_flag := TRUE;
33: dbms_output.enable;
34: END enable_debug;
35:
36: PROCEDURE enable_debug(buffer_size NUMBER) is
37: BEGIN
35:
36: PROCEDURE enable_debug(buffer_size NUMBER) is
37: BEGIN
38: debug_flag := TRUE;
39: dbms_output.enable( buffer_size );
40: END;
41:
42: PROCEDURE enable_debug(path_name in varchar2,
43: file_name in varchar2 default 'DEFAULT') IS
82: loop
83: if( rest is null ) then
84: exit;
85: else
86: dbms_output.put_line(substrb(rest, 1, 255));
87: rest := substrb(rest, 256);
88: end if;
89:
90: end loop;