DBA Data[Home] [Help]

APPS.WSH_ITM_ASYN_MSGMAP_ASSISTANT dependencies on UTL_FILE

Line 7: G_FILE_PTR UTL_FILE.File_Type;

3: --
4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_ITM_ASYN_MSGMAP_ASSISTANT';
5: G_ITM_LOG_LEVEL WSH_ITM_PARAMETER_SETUPS_B.VALUE%TYPE;
6: G_LOG_FILENAME VARCHAR2(100);
7: G_FILE_PTR UTL_FILE.File_Type;
8: G_REQ_CONTROL_ID NUMBER;
9: G_PRV_REQ_CONTROL_ID NUMBER := -1;
10: G_DEBUG_PROCESS BOOLEAN;
11: --

Line 612: l_file_ptr UTL_FILE.File_Type;

608: END IF;
609: --
610: END MESSAGE_POSTPROCESS;
611: PROCEDURE Initialize_Debug IS
612: l_file_ptr UTL_FILE.File_Type;
613: l_log_directory VARCHAR2(4000);
614: l_log_filename VARCHAR2(100);
615: l_dbg_level VARCHAR2(100);
616: l_dbg_module VARCHAR2(100);

Line 643: IF utl_file.is_open(g_file_ptr) THEN

639: --Generating log file for each Request Control even if it processed
640: --within one concurrent process
641: --Close the file if its already open
642: IF G_PRV_REQ_CONTROL_ID <> G_REQ_CONTROL_ID THEN
643: IF utl_file.is_open(g_file_ptr) THEN
644: utl_file.fclose(g_file_ptr);
645: END IF;
646: END IF;
647:

Line 644: utl_file.fclose(g_file_ptr);

640: --within one concurrent process
641: --Close the file if its already open
642: IF G_PRV_REQ_CONTROL_ID <> G_REQ_CONTROL_ID THEN
643: IF utl_file.is_open(g_file_ptr) THEN
644: utl_file.fclose(g_file_ptr);
645: END IF;
646: END IF;
647:
648: G_PRV_REQ_CONTROL_ID := G_REQ_CONTROL_ID;

Line 662: l_file_ptr := UTL_FILE.Fopen(l_log_directory, G_LOG_FILENAME, 'a');

658: --G_LOG_FILENAME := 'wshitm_async_' || g_req_control_id || '.dbg';
659:
660: G_LOG_FILENAME := 'wshitm_' || g_req_control_id || '_' || to_char(sysdate,'MMYYHH24MISS') ||'.dbg';
661:
662: l_file_ptr := UTL_FILE.Fopen(l_log_directory, G_LOG_FILENAME, 'a');
663:
664: --Debug messages will be generated in a log file instead of
665: --being printed in concurrent request log file
666: WSH_DEBUG_SV.G_ITM_ASYN_PROC := TRUE;

Line 734: IF utl_file.is_open(g_file_ptr) THEN

730: END IF;
731: --
732:
733: IF ( G_DEBUG_PROCESS ) THEN
734: IF utl_file.is_open(g_file_ptr) THEN
735: utl_file.fclose(g_file_ptr);
736: END IF;
737: END IF;
738:

Line 735: utl_file.fclose(g_file_ptr);

731: --
732:
733: IF ( G_DEBUG_PROCESS ) THEN
734: IF utl_file.is_open(g_file_ptr) THEN
735: utl_file.fclose(g_file_ptr);
736: END IF;
737: END IF;
738:
739: -- Added Exception handler so that we will proceed further