DBA Data[Home] [Help]

APPS.GMD_DEBUG dependencies on UTL_FILE

Line 43: LOG UTL_FILE.FILE_TYPE;

39: ( p_file_name IN VARCHAR2)
40: IS
41:
42: l_location VARCHAR2(500);
43: LOG UTL_FILE.FILE_TYPE;
44:
45: CURSOR c_get_1st_location IS
46: SELECT NVL( SUBSTR( value, 1, instr( value, ',')-1), value)
47: FROM v$parameter

Line 48: WHERE name = 'utl_file_dir';

44:
45: CURSOR c_get_1st_location IS
46: SELECT NVL( SUBSTR( value, 1, instr( value, ',')-1), value)
47: FROM v$parameter
48: WHERE name = 'utl_file_dir';
49:
50:
51:
52:

Line 89: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||p_file_name, 'w', 32767);

85: FETCH c_get_1st_location
86: INTO G_LOG_LOCATION;
87: CLOSE c_get_1st_location;
88:
89: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||p_file_name, 'w', 32767);
90: UTL_FILE.put_line(LOG, 'Log file opened at '||to_char(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||' With log mode: '||G_LOG_MODE);
91: UTL_FILE.fflush(LOG);
92: UTL_FILE.fclose(LOG);
93: G_FILE_NAME := p_file_name;

Line 90: UTL_FILE.put_line(LOG, 'Log file opened at '||to_char(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||' With log mode: '||G_LOG_MODE);

86: INTO G_LOG_LOCATION;
87: CLOSE c_get_1st_location;
88:
89: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||p_file_name, 'w', 32767);
90: UTL_FILE.put_line(LOG, 'Log file opened at '||to_char(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||' With log mode: '||G_LOG_MODE);
91: UTL_FILE.fflush(LOG);
92: UTL_FILE.fclose(LOG);
93: G_FILE_NAME := p_file_name;
94: END IF;

Line 91: UTL_FILE.fflush(LOG);

87: CLOSE c_get_1st_location;
88:
89: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||p_file_name, 'w', 32767);
90: UTL_FILE.put_line(LOG, 'Log file opened at '||to_char(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||' With log mode: '||G_LOG_MODE);
91: UTL_FILE.fflush(LOG);
92: UTL_FILE.fclose(LOG);
93: G_FILE_NAME := p_file_name;
94: END IF;
95:

Line 92: UTL_FILE.fclose(LOG);

88:
89: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||p_file_name, 'w', 32767);
90: UTL_FILE.put_line(LOG, 'Log file opened at '||to_char(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||' With log mode: '||G_LOG_MODE);
91: UTL_FILE.fflush(LOG);
92: UTL_FILE.fclose(LOG);
93: G_FILE_NAME := p_file_name;
94: END IF;
95:
96: /* Bug # 4576699 Added code below for checking the Profile option and then logging messages */

Line 106: LOG := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'w');

102: FETCH c_get_1st_location
103: INTO global_gmdlog_location;
104: CLOSE c_get_1st_location;
105:
106: LOG := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'w');
107: UTL_FILE.put_line(LOG, 'Debug log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
108: UTL_FILE.fflush(LOG);
109: UTL_FILE.fclose(LOG);
110: END IF;

Line 107: UTL_FILE.put_line(LOG, 'Debug log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));

103: INTO global_gmdlog_location;
104: CLOSE c_get_1st_location;
105:
106: LOG := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'w');
107: UTL_FILE.put_line(LOG, 'Debug log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
108: UTL_FILE.fflush(LOG);
109: UTL_FILE.fclose(LOG);
110: END IF;
111: /* Bug # 4576699 End */

Line 108: UTL_FILE.fflush(LOG);

104: CLOSE c_get_1st_location;
105:
106: LOG := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'w');
107: UTL_FILE.put_line(LOG, 'Debug log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
108: UTL_FILE.fflush(LOG);
109: UTL_FILE.fclose(LOG);
110: END IF;
111: /* Bug # 4576699 End */
112:

Line 109: UTL_FILE.fclose(LOG);

105:
106: LOG := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'w');
107: UTL_FILE.put_line(LOG, 'Debug log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
108: UTL_FILE.fflush(LOG);
109: UTL_FILE.fclose(LOG);
110: END IF;
111: /* Bug # 4576699 End */
112:
113:

Line 142: LOG UTL_FILE.FILE_TYPE;

138: , p_file_name IN VARCHAR2
139: )
140: IS
141:
142: LOG UTL_FILE.FILE_TYPE;
143: l_file_name VARCHAR2(50);
144:
145: CURSOR c_get_1st_location IS
146: SELECT NVL( SUBSTR( value, 1, instr( value, ',')-1), value)

Line 148: WHERE name = 'utl_file_dir';

144:
145: CURSOR c_get_1st_location IS
146: SELECT NVL( SUBSTR( value, 1, instr( value, ',')-1), value)
147: FROM v$parameter
148: WHERE name = 'utl_file_dir';
149:
150: -- Bug 4576699: added l_log
151: l_log UTL_FILE.file_type;
152:

Line 151: l_log UTL_FILE.file_type;

147: FROM v$parameter
148: WHERE name = 'utl_file_dir';
149:
150: -- Bug 4576699: added l_log
151: l_log UTL_FILE.file_type;
152:
153: BEGIN
154: IF ((G_LOG_MODE <> 'OFF') AND (NVL(p_priority, 100) >= G_LOG_LEVEL))
155: THEN

Line 165: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||l_file_name, 'a', 32767);

161: ELSE
162: l_file_name := p_file_name;
163: END IF;
164:
165: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||l_file_name, 'a', 32767);
166: UTL_FILE.put_line(LOG, p_msg);
167: UTL_FILE.fflush(LOG);
168: UTL_FILE.fclose(LOG);
169:

Line 166: UTL_FILE.put_line(LOG, p_msg);

162: l_file_name := p_file_name;
163: END IF;
164:
165: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||l_file_name, 'a', 32767);
166: UTL_FILE.put_line(LOG, p_msg);
167: UTL_FILE.fflush(LOG);
168: UTL_FILE.fclose(LOG);
169:
170: ELSIF (G_LOG_MODE = 'SQL')

Line 167: UTL_FILE.fflush(LOG);

163: END IF;
164:
165: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||l_file_name, 'a', 32767);
166: UTL_FILE.put_line(LOG, p_msg);
167: UTL_FILE.fflush(LOG);
168: UTL_FILE.fclose(LOG);
169:
170: ELSIF (G_LOG_MODE = 'SQL')
171: THEN

Line 168: UTL_FILE.fclose(LOG);

164:
165: LOG := UTL_FILE.fopen(G_LOG_LOCATION, G_LOG_USERNAME||l_file_name, 'a', 32767);
166: UTL_FILE.put_line(LOG, p_msg);
167: UTL_FILE.fflush(LOG);
168: UTL_FILE.fclose(LOG);
169:
170: ELSIF (G_LOG_MODE = 'SQL')
171: THEN
172: -- SQL*Plus session: uncomment the next line during unit test

Line 194: l_log := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'a');

190: INTO global_gmdlog_location;
191: CLOSE c_get_1st_location;
192: END IF;
193:
194: l_log := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'a');
195: IF UTL_FILE.IS_OPEN(l_log) THEN
196: UTL_FILE.put_line(l_log, p_msg);
197: UTL_FILE.fflush(l_log);
198: UTL_FILE.fclose(l_log);

Line 195: IF UTL_FILE.IS_OPEN(l_log) THEN

191: CLOSE c_get_1st_location;
192: END IF;
193:
194: l_log := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'a');
195: IF UTL_FILE.IS_OPEN(l_log) THEN
196: UTL_FILE.put_line(l_log, p_msg);
197: UTL_FILE.fflush(l_log);
198: UTL_FILE.fclose(l_log);
199: END IF;

Line 196: UTL_FILE.put_line(l_log, p_msg);

192: END IF;
193:
194: l_log := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'a');
195: IF UTL_FILE.IS_OPEN(l_log) THEN
196: UTL_FILE.put_line(l_log, p_msg);
197: UTL_FILE.fflush(l_log);
198: UTL_FILE.fclose(l_log);
199: END IF;
200: END IF;

Line 197: UTL_FILE.fflush(l_log);

193:
194: l_log := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'a');
195: IF UTL_FILE.IS_OPEN(l_log) THEN
196: UTL_FILE.put_line(l_log, p_msg);
197: UTL_FILE.fflush(l_log);
198: UTL_FILE.fclose(l_log);
199: END IF;
200: END IF;
201: /* Bug # 4576699 End*/

Line 198: UTL_FILE.fclose(l_log);

194: l_log := UTL_FILE.fopen(global_gmdlog_location, global_file_name, 'a');
195: IF UTL_FILE.IS_OPEN(l_log) THEN
196: UTL_FILE.put_line(l_log, p_msg);
197: UTL_FILE.fflush(l_log);
198: UTL_FILE.fclose(l_log);
199: END IF;
200: END IF;
201: /* Bug # 4576699 End*/
202: