DBA Data[Home] [Help]

APPS.FND_FILE dependencies on FND_FILE

Line 1: package body FND_FILE as

1: package body FND_FILE as
2: /* $Header: AFCPPIOB.pls 120.4 2006/05/24 05:34:03 anittala ship $ */
3:
4:
5: F_LOG utl_file.file_type;

Line 140: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_path', FALSE);

136:
137: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_PATH');
138: fnd_message.set_token('FILE_DIR', TEMP_DIR, FALSE);
139: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
140: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_path', FALSE);
141: end if;
142: raise_application_error(-20100, user_error);
143: when UTL_FILE.INVALID_MODE then
144: fnd_message.set_name('FND', 'CONC-FILE_ERROR');

Line 153: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_mode', FALSE);

149: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_MODE');
150: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
151: fnd_message.set_token('FILE_MODE', 'w', FALSE);
152: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
153: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_mode', FALSE);
154: end if;
155: raise_application_error(-20100, user_error);
156: when UTL_FILE.INVALID_OPERATION then
157: fnd_message.set_name('FND', 'CONC-FILE_ERROR');

Line 166: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_operatn', FALSE);

162: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_OPERATN');
163: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
164: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
165: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
166: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_operatn', FALSE);
167: end if;
168: raise_application_error(-20100, user_error);
169: when UTL_FILE.INVALID_MAXLINESIZE then
170: fnd_message.set_name('FND', 'CONC-FILE_ERROR');

Line 179: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_maxline', FALSE);

175: fnd_message.set_name('FND', 'CONC-TEMPFILE_INVALID_MAXLINE');
176: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
177: fnd_message.set_token('MAXLINE', MAX_LINESIZE, FALSE);
178: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
179: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.open_files.invalid_maxline', FALSE);
180: end if;
181: raise_application_error(-20100, user_error);
182: when others then
183: raise;

Line 301: -- call fnd_file_private.put_names with these values

297:
298: LOG_FNAME := 'l' || BASE || '.tmp';
299: OUT_FNAME := 'o' || BASE || '.tmp';
300:
301: -- call fnd_file_private.put_names with these values
302: fnd_file_private.put_names(LOG_FNAME, OUT_FNAME, TEMP_DIR );
303:
304: -- CAUTION: for NT, we can ignore this area for NT
305: -- log the temp file info in fnd_temp_files table

Line 302: fnd_file_private.put_names(LOG_FNAME, OUT_FNAME, TEMP_DIR );

298: LOG_FNAME := 'l' || BASE || '.tmp';
299: OUT_FNAME := 'o' || BASE || '.tmp';
300:
301: -- call fnd_file_private.put_names with these values
302: fnd_file_private.put_names(LOG_FNAME, OUT_FNAME, TEMP_DIR );
303:
304: -- CAUTION: for NT, we can ignore this area for NT
305: -- log the temp file info in fnd_temp_files table
306: fnd_conc_private_utils.record_temp_file_use(

Line 328: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT

324:
325: /*
326: ** WRITE_BUFF - Open the file and writes buffer into file.
327: ** IN
328: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT
329: ** WTYPE - TYPE is 'PUT'/'PUT_LINE'/'NEW_LINE'
330: ** BUFF - Text to write
331: ** EXCEPTIONS
332: **

Line 343: if WHICH = FND_FILE.LOG then

339: -- and wirte the buffer into temp file
340: if ( PUT_NAMES_OS ) then
341: OPEN_FILES;
342:
343: if WHICH = FND_FILE.LOG then
344: temp_file := LOG_FNAME;
345: if ( WTYPE = 'PUT' ) then
346: utl_file.put(F_LOG, BUFF);
347: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then

Line 349: 'fnd.plsql.FND_FILE.WRITE_BUFF.put', BUFF);

345: if ( WTYPE = 'PUT' ) then
346: utl_file.put(F_LOG, BUFF);
347: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
348: fnd_log.string(FND_LOG.LEVEL_EVENT,
349: 'fnd.plsql.FND_FILE.WRITE_BUFF.put', BUFF);
350: end if;
351: elsif (WTYPE = 'PUT_LINE' ) then
352: utl_file.put_line(F_LOG, BUFF);
353: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then

Line 355: 'fnd.plsql.FND_FILE.WRITE_BUFF.put_line', BUFF);

351: elsif (WTYPE = 'PUT_LINE' ) then
352: utl_file.put_line(F_LOG, BUFF);
353: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
354: fnd_log.string(FND_LOG.LEVEL_EVENT,
355: 'fnd.plsql.FND_FILE.WRITE_BUFF.put_line', BUFF);
356: end if;
357: elsif (WTYPE = 'NEW_LINE') then
358: utl_file.new_line(F_LOG, to_number(BUFF) );
359: end if;

Line 361: elsif WHICH = FND_FILE.OUTPUT then

357: elsif (WTYPE = 'NEW_LINE') then
358: utl_file.new_line(F_LOG, to_number(BUFF) );
359: end if;
360: utl_file.fflush(F_LOG);
361: elsif WHICH = FND_FILE.OUTPUT then
362: temp_file := OUT_FNAME;
363: if ( WTYPE = 'PUT' ) then
364: utl_file.put(F_OUT, BUFF);
365: elsif (WTYPE = 'PUT_LINE' ) then

Line 384: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.write_buff.invalid_handle', FALSE);

380:
381: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_HANDLE');
382: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
383: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
384: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.write_buff.invalid_handle', FALSE);
385: end if;
386: raise_application_error(-20100, user_error);
387:
388: when UTL_FILE.INVALID_OPERATION then

Line 398: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.write_buff.invalid_operatn', FALSE);

394: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_OPERATN');
395: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
396: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
397: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
398: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.write_buff.invalid_operatn', FALSE);
399: end if;
400: raise_application_error(-20100, user_error);
401:
402: when UTL_FILE.WRITE_ERROR then

Line 412: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.write_buff.write_error', FALSE);

408: fnd_message.set_name('FND', 'CONC-TEMPFILE_WRITE_ERROR');
409: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
410: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
411: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
412: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.write_buff.write_error', FALSE);
413: end if;
414: raise_application_error(-20100, user_error);
415:
416: when others then

Line 425: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT

421: /*
422: ** PUT - Put (write) text to file
423: **
424: ** IN
425: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT
426: ** BUFF - Text to write
427: ** EXCEPTIONS
428: ** utl_file.invalid_path (*) - file location or name was invalid
429: ** utl_file.invalid_mode (*) - the open_mode string was invalid

Line 438: if WHICH = FND_FILE.LOG then

434: procedure PUT(WHICH in number, BUFF in varchar2) is
435: temp_file varchar2(255); -- used for messages
436: user_error varchar2(255); -- to store translated file_error
437: begin
438: if WHICH = FND_FILE.LOG then
439: temp_file := LOG_FNAME;
440: utl_file.put(F_LOG, BUFF);
441: utl_file.fflush(F_LOG);
442: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then

Line 444: 'fnd.plsql.FND_FILE.WRITE_BUFF.put', BUFF);

440: utl_file.put(F_LOG, BUFF);
441: utl_file.fflush(F_LOG);
442: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
443: fnd_log.string(FND_LOG.LEVEL_EVENT,
444: 'fnd.plsql.FND_FILE.WRITE_BUFF.put', BUFF);
445: end if;
446: elsif WHICH = FND_FILE.OUTPUT then
447: temp_file := OUT_FNAME;
448: utl_file.put(F_OUT, BUFF);

Line 446: elsif WHICH = FND_FILE.OUTPUT then

442: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
443: fnd_log.string(FND_LOG.LEVEL_EVENT,
444: 'fnd.plsql.FND_FILE.WRITE_BUFF.put', BUFF);
445: end if;
446: elsif WHICH = FND_FILE.OUTPUT then
447: temp_file := OUT_FNAME;
448: utl_file.put(F_OUT, BUFF);
449: utl_file.fflush(F_OUT);
450: end if;

Line 468: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put.invalid_operatn', FALSE);

464: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_OPERATN');
465: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
466: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
467: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
468: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put.invalid_operatn', FALSE);
469: end if;
470: raise_application_error(-20100, user_error);
471:
472: when UTL_FILE.WRITE_ERROR then

Line 482: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put.write_error', FALSE);

478: fnd_message.set_name('FND', 'CONC-TEMPFILE_WRITE_ERROR');
479: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
480: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
481: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
482: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put.write_error', FALSE);
483: end if;
484: raise_application_error(-20100, user_error);
485:
486: when others then

Line 495: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT

491: /*
492: ** PUT_LINE - Put (write) a line of text to file
493: **
494: ** IN
495: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT
496: ** BUFF - Text to write
497: ** EXCEPTIONS
498: ** utl_file.invalid_path - file location or name was invalid
499: ** utl_file.invalid_mode - the open_mode string was invalid

Line 508: if WHICH = FND_FILE.LOG then

504: procedure PUT_LINE(WHICH in number, BUFF in varchar2) is
505: temp_file varchar2(255); -- used for messages
506: user_error varchar2(255); -- to store translated file_error
507: begin
508: if WHICH = FND_FILE.LOG then
509: temp_file := LOG_FNAME;
510: utl_file.put_line(F_LOG, BUFF);
511: utl_file.fflush(F_LOG);
512: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then

Line 514: 'fnd.plsql.FND_FILE.PUT_LINE', BUFF);

510: utl_file.put_line(F_LOG, BUFF);
511: utl_file.fflush(F_LOG);
512: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
513: fnd_log.string(FND_LOG.LEVEL_EVENT,
514: 'fnd.plsql.FND_FILE.PUT_LINE', BUFF);
515: end if;
516: elsif WHICH = FND_FILE.OUTPUT then
517: temp_file := OUT_FNAME;
518: utl_file.put_line(F_OUT, BUFF);

Line 516: elsif WHICH = FND_FILE.OUTPUT then

512: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
513: fnd_log.string(FND_LOG.LEVEL_EVENT,
514: 'fnd.plsql.FND_FILE.PUT_LINE', BUFF);
515: end if;
516: elsif WHICH = FND_FILE.OUTPUT then
517: temp_file := OUT_FNAME;
518: utl_file.put_line(F_OUT, BUFF);
519: utl_file.fflush(F_OUT);
520: end if;

Line 538: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put_line.invalid_operatn', FALSE);

534: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_OPERATN');
535: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
536: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
537: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
538: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put_line.invalid_operatn', FALSE);
539: end if;
540: raise_application_error(-20100, user_error);
541:
542: when UTL_FILE.WRITE_ERROR then

Line 552: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put_line.write_error', FALSE);

548: fnd_message.set_name('FND', 'CONC-TEMPFILE_WRITE_ERROR');
549: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
550: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
551: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
552: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.put_line.write_error', FALSE);
553: end if;
554: raise_application_error(-20100, user_error);
555:
556: when others then

Line 565: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT

561: /*
562: ** NEW_LINE - Put (write) line terminators to file
563: **
564: ** IN
565: ** WHICH - Log or output file? Either FND_FILE.LOG or FND_FILE.OUTPUT
566: ** LINES - Number of line terminators to write
567: ** EXCEPTIONS
568: ** utl_file.invalid_path - file location or name was invalid
569: ** utl_file.invalid_mode - the open_mode string was invalid

Line 578: if WHICH = FND_FILE.LOG then

574: procedure NEW_LINE(WHICH in number, LINES in natural := 1) is
575: temp_file varchar2(255); -- used for messages
576: user_error varchar2(255); -- to store translated file_error
577: begin
578: if WHICH = FND_FILE.LOG then
579: temp_file := LOG_FNAME;
580: utl_file.new_line(F_LOG, LINES);
581: utl_file.fflush(F_LOG);
582: elsif WHICH = FND_FILE.OUTPUT then

Line 582: elsif WHICH = FND_FILE.OUTPUT then

578: if WHICH = FND_FILE.LOG then
579: temp_file := LOG_FNAME;
580: utl_file.new_line(F_LOG, LINES);
581: utl_file.fflush(F_LOG);
582: elsif WHICH = FND_FILE.OUTPUT then
583: temp_file := OUT_FNAME;
584: utl_file.new_line(F_OUT, LINES);
585: utl_file.fflush(F_OUT);
586: end if;

Line 605: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.newLine.invalid_operatn', FALSE);

601: fnd_message.set_name('FND','CONC-TEMPFILE_INVALID_OPERATN');
602: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
603: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
604: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
605: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.newLine.invalid_operatn', FALSE);
606: end if;
607: raise_application_error(-20100, user_error);
608:
609: when UTL_FILE.WRITE_ERROR then

Line 619: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.new_line.write_error', FALSE);

615: fnd_message.set_name('FND', 'CONC-TEMPFILE_WRITE_ERROR');
616: fnd_message.set_token('TEMP_FILE', temp_file, FALSE);
617: fnd_message.set_token('TEMP_DIR', TEMP_DIR, FALSE);
618: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
619: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.fnd_file.new_line.write_error', FALSE);
620: end if;
621: raise_application_error(-20100, user_error);
622:
623: when others then

Line 628: end fnd_file;

624: raise;
625: end NEW_LINE;
626:
627:
628: end fnd_file;