APPS.ENG_CHANGE_ATTR_UTIL dependencies on UTL_FILE

Line 7: g_debug_file UTL_FILE.FILE_TYPE ;

3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'ENG_CHANGE_ATTR_UTIL' ;
5:
6: -- For Debug
7: g_debug_file UTL_FILE.FILE_TYPE ;
8: g_debug_flag BOOLEAN := FALSE ; -- For Debug, set TRUE
9: g_output_dir VARCHAR2(240) := null ;
10: g_debug_filename VARCHAR2(30) := 'EngChangeAttrUtil.log' ;
11: g_debug_errmesg VARCHAR2(400);

Line 37: l_utl_file_dir VARCHAR2(2000);

33: , p_file_name IN VARCHAR2 := NULL
34: )
35: IS
36: l_found NUMBER := 0;
37: l_utl_file_dir VARCHAR2(2000);
38: l_error_mesg VARCHAR2(400) ;
39:
40: BEGIN
41: NULL ;

Line 64: INTO l_utl_file_dir

60:
61: END IF;
62:
63: select value
64: INTO l_utl_file_dir
65: FROM v$parameter
66: WHERE name = 'utl_file_dir';
67:
68: l_found := INSTR(l_utl_file_dir, g_output_dir);

Line 66: WHERE name = 'utl_file_dir';

62:
63: select value
64: INTO l_utl_file_dir
65: FROM v$parameter
66: WHERE name = 'utl_file_dir';
67:
68: l_found := INSTR(l_utl_file_dir, g_output_dir);
69:
70: IF l_found = 0

Line 68: l_found := INSTR(l_utl_file_dir, g_output_dir);

64: INTO l_utl_file_dir
65: FROM v$parameter
66: WHERE name = 'utl_file_dir';
67:
68: l_found := INSTR(l_utl_file_dir, g_output_dir);
69:
70: IF l_found = 0
71: THEN
72: l_error_mesg := 'Debug Session could not be started. ' ||

Line 78: -- ' value in v$parameter for name = utl_file_dir ';

74:
75: -- 'Debug Session could not be started because the ' ||
76: -- ' output directory name is invalid. ' ||
77: -- ' Output directory must be one of the directory ' ||
78: -- ' value in v$parameter for name = utl_file_dir ';
79:
80: -- FND_MSG_PUB.Add_Exc_Msg
81: -- ( G_PKG_NAME ,
82: -- 'Open_Debug_Session' ,

Line 89: g_debug_file := utl_file.fopen( g_output_dir

85: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
86: -- RETURN;
87: END IF;
88:
89: g_debug_file := utl_file.fopen( g_output_dir
90: , g_debug_filename
91: , 'w');
92:
93: g_debug_flag := TRUE ;

Line 111: IF utl_file.is_open(g_debug_file)

107: IS
108: l_error_mesg VARCHAR2(400) ;
109: BEGIN
110:
111: IF utl_file.is_open(g_debug_file)
112: THEN
113: utl_file.fclose(g_debug_file);
114: END IF ;
115:

Line 113: utl_file.fclose(g_debug_file);

109: BEGIN
110:
111: IF utl_file.is_open(g_debug_file)
112: THEN
113: utl_file.fclose(g_debug_file);
114: END IF ;
115:
116: EXCEPTION
117: WHEN OTHERS THEN

Line 147: -- IF utl_file.is_open(g_debug_file)

143: -- NEED TO ENHANCE THIS LATER
144: -- FND_FILE.put_line(FND_FILE.LOG, 'Write_Debug => '|| p_debug_message ) ;
145:
146: --
147: -- IF utl_file.is_open(g_debug_file)
148: -- THEN
149: -- utl_file.put_line(g_debug_file, p_debug_message);
150: -- END IF ;
151:

Line 149: -- utl_file.put_line(g_debug_file, p_debug_message);

145:
146: --
147: -- IF utl_file.is_open(g_debug_file)
148: -- THEN
149: -- utl_file.put_line(g_debug_file, p_debug_message);
150: -- END IF ;
151:
152: EXCEPTION
153: WHEN OTHERS THEN