DBA Data[Home] [Help]

APPS.ARP_DEBUG dependencies on UTL_FILE

Line 35: pg_fp utl_file.file_type;

31: debug_flag boolean := false;
32:
33: pg_file_name VARCHAR2(100) := NULL;
34: pg_path_name VARCHAR2(100) := NULL;
35: pg_fp utl_file.file_type;
36:
37: procedure file_debug(line in varchar2) IS
38: x number;
39: begin

Line 41: utl_file.put_line(pg_fp, line);

37: procedure file_debug(line in varchar2) IS
38: x number;
39: begin
40: if (pg_file_name is not null) THEN
41: utl_file.put_line(pg_fp, line);
42: utl_file.fflush(pg_fp);
43: end if;
44: end file_debug;
45:

Line 42: utl_file.fflush(pg_fp);

38: x number;
39: begin
40: if (pg_file_name is not null) THEN
41: utl_file.put_line(pg_fp, line);
42: utl_file.fflush(pg_fp);
43: end if;
44: end file_debug;
45:
46:

Line 61: pg_fp := utl_file.fopen(path_name, file_name, 'a');

57: x number;
58: begin
59:
60: if (pg_file_name is null) THEN
61: pg_fp := utl_file.fopen(path_name, file_name, 'a');
62: pg_file_name := file_name;
63: pg_path_name := path_name;
64: end if;
65:

Line 68: when utl_file.invalid_path then

64: end if;
65:
66:
67: exception
68: when utl_file.invalid_path then
69: app_exception.raise_exception;
70: when utl_file.invalid_mode then
71: app_exception.raise_exception;
72:

Line 70: when utl_file.invalid_mode then

66:
67: exception
68: when utl_file.invalid_path then
69: app_exception.raise_exception;
70: when utl_file.invalid_mode then
71: app_exception.raise_exception;
72:
73: end ;
74:

Line 79: utl_file.fclose(pg_fp);

75:
76: procedure disable_file_debug is
77: begin
78: if (pg_file_name is not null) THEN
79: utl_file.fclose(pg_fp);
80: end if;
81: end;
82:
83: