[Home] [Help]
8: The logging routines in this package are obsolete.
9: They are replaced by routines in the PO_LOG package.
10:
11: For more details on the PO logging strategy, see the document at
12: /podev/po/internal/standards/logging/logging.xml
13:
14: ***************************************************************
15: ***************************************************************
16: */
371: -- FND_LOG_MESSAGES
372: --Locks:
373: -- None.
374: --Function:
375: -- Adds an exception message to the standard API message list
376: -- and to the FND log, when appropriate.
377: --Parameters:
378: --IN:
379: --p_pkg_name
386: -- Indicates whether or not an exception message should be added
387: -- to the API message list.
388: -- TRUE - add a message to the list
389: -- FALSE - don't add a message to the list
390: -- NULL - use FND standard routines to determine whether or not
391: -- to add a message to the list
392: --End of Comments
393: -------------------------------------------------------------------------------
394: PROCEDURE handle_unexp_error(
409: l_add_to_msg_list :=
410: FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR);
411: END IF;
412:
413: -- Add the unexpected error to the standard API message list.
414: IF l_add_to_msg_list THEN
415: FND_MSG_PUB.add_exc_msg(
416: p_pkg_name => p_pkg_name
417: , p_procedure_name => p_proc_name
488: -- Bug 3570793 END
489:
490: -------------------------------------------------------------------------------
491: -------------------------------------------------------------------------------
492: -- 8/20/03: The following procedures are non-standard comformant,
493: -- and should not be used.
494: -- They exist for legacy code.
495: -------------------------------------------------------------------------------
496: -------------------------------------------------------------------------------
501: PROCEDURE NAME: PUT_LINE()
502:
503: ===========================================================================*/
504:
505: -- Write debug messages to file or standard out based on the value of package
506: -- variable PO_DEBUG.write_to_file.
507: --
508: -- Use PO_DEBUG.set_file_io( TRUE / FALSE ) to set this variable.
509:
528: FND_FILE.PUT_LINE(FND_FILE.LOG, v_line);
529:
530: else
531:
532: -- write to standard out
533: x_temp := 'STD OUT';
534: --dbms_output.put_line(v_line);
535:
536: end if;
545: -- because it performs an implicit commit.
546:
547: END PUT_LINE;
548:
549: -- Set flag for writing to file or standard out
550:
551: PROCEDURE set_file_io(flag BOOLEAN) IS
552:
553: BEGIN