DBA Data[Home] [Help]

APPS.ARP_STANDARD dependencies on UTL_FILE

Line 83: pg_fp utl_file.file_type;

79: MD_OPTIONS NUMBER := INT_MD_MSG_NUMBER + INT_MD_MSG_TEXT;
80:
81: pg_file_name VARCHAR2(100) := NULL;
82: pg_path_name VARCHAR2(100) := NULL;
83: pg_fp utl_file.file_type;
84: pg_period gl_date_type;
85: pg_period_open gl_date_type;
86:
87: /*-------------------------------------------------------------------------+

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

492: procedure file_debug(line in varchar2) IS
493: x number;
494: begin
495: if (pg_file_name is not null) THEN
496: utl_file.put_line(pg_fp, line);
497: utl_file.fflush(pg_fp);
498: end if;
499: end file_debug;
500:

Line 497: utl_file.fflush(pg_fp);

493: x number;
494: begin
495: if (pg_file_name is not null) THEN
496: utl_file.put_line(pg_fp, line);
497: utl_file.fflush(pg_fp);
498: end if;
499: end file_debug;
500:
501: procedure enable_file_debug(path_name in varchar2,

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

504: x number;
505: begin
506:
507: if (pg_file_name is null) THEN
508: pg_fp := utl_file.fopen(path_name, file_name, 'a');
509: pg_file_name := file_name;
510: pg_path_name := path_name;
511: end if;
512:

Line 516: when utl_file.invalid_path then

512:
513: -- fnd_message does not compile here, since it is redefined in this scope.
514:
515: exception
516: when utl_file.invalid_path then
517: -- fnd_message.set_name('AR', 'GENERIC_MESSAGE');
518: -- fnd_message.set_token('GENERIC_TEXT', 'Invalid path: '||path_name);
519: -- x := 1/0;
520: app_exception.raise_exception;

Line 521: when utl_file.invalid_mode then

517: -- fnd_message.set_name('AR', 'GENERIC_MESSAGE');
518: -- fnd_message.set_token('GENERIC_TEXT', 'Invalid path: '||path_name);
519: -- x := 1/0;
520: app_exception.raise_exception;
521: when utl_file.invalid_mode then
522: -- fnd_message.set_name('AR', 'GENERIC_MESSAGE');
523: -- fnd_message.set_token('GENERIC_TEXT', 'Cannot open file '||file_name||
524: -- ' in write mode.');
525: app_exception.raise_exception;

Line 532: utl_file.fclose(pg_fp);

528:
529: procedure disable_file_debug is
530: begin
531: if (pg_file_name is not null) THEN
532: utl_file.fclose(pg_fp);
533: end if;
534: end;
535:
536: procedure debug( line in varchar2,