DBA Data[Home] [Help]

APPS.FTE_FREIGHT_PRICING_UTIL dependencies on UTL_FILE

Line 5: g_utl_file_name VARCHAR2(255);

1: PACKAGE BODY FTE_FREIGHT_PRICING_UTIL AS
2: /* $Header: FTEFRUTB.pls 120.2 2005/10/25 14:52:41 susurend noship $ */
3:
4: -- package global variables
5: g_utl_file_name VARCHAR2(255);
6: g_utl_file_dir VARCHAR2(255);
7: g_file_ptr utl_file.file_type;
8: g_log_level NUMBER := G_LOG;
9: g_msg_count NUMBER := 0; -- this variable keeps track of how many messages we added to the

Line 6: g_utl_file_dir VARCHAR2(255);

2: /* $Header: FTEFRUTB.pls 120.2 2005/10/25 14:52:41 susurend noship $ */
3:
4: -- package global variables
5: g_utl_file_name VARCHAR2(255);
6: g_utl_file_dir VARCHAR2(255);
7: g_file_ptr utl_file.file_type;
8: g_log_level NUMBER := G_LOG;
9: g_msg_count NUMBER := 0; -- this variable keeps track of how many messages we added to the
10: -- fnd message stack

Line 7: g_file_ptr utl_file.file_type;

3:
4: -- package global variables
5: g_utl_file_name VARCHAR2(255);
6: g_utl_file_dir VARCHAR2(255);
7: g_file_ptr utl_file.file_type;
8: g_log_level NUMBER := G_LOG;
9: g_msg_count NUMBER := 0; -- this variable keeps track of how many messages we added to the
10: -- fnd message stack
11:

Line 127: IF (utl_file.is_open(g_file_ptr)) THEN

123: END;
124:
125: PROCEDURE printf(p_msg IN VARCHAR2) IS
126: BEGIN
127: IF (utl_file.is_open(g_file_ptr)) THEN
128: utl_file.put_line(g_file_ptr,p_msg);
129: --utl_file.put_line(g_file_ptr,''||p_msg||'');
130: utl_file.fflush(g_file_ptr);
131: END IF;

Line 128: utl_file.put_line(g_file_ptr,p_msg);

124:
125: PROCEDURE printf(p_msg IN VARCHAR2) IS
126: BEGIN
127: IF (utl_file.is_open(g_file_ptr)) THEN
128: utl_file.put_line(g_file_ptr,p_msg);
129: --utl_file.put_line(g_file_ptr,''||p_msg||'');
130: utl_file.fflush(g_file_ptr);
131: END IF;
132: END printf;

Line 129: --utl_file.put_line(g_file_ptr,''||p_msg||'');

125: PROCEDURE printf(p_msg IN VARCHAR2) IS
126: BEGIN
127: IF (utl_file.is_open(g_file_ptr)) THEN
128: utl_file.put_line(g_file_ptr,p_msg);
129: --utl_file.put_line(g_file_ptr,''||p_msg||'');
130: utl_file.fflush(g_file_ptr);
131: END IF;
132: END printf;
133:

Line 130: utl_file.fflush(g_file_ptr);

126: BEGIN
127: IF (utl_file.is_open(g_file_ptr)) THEN
128: utl_file.put_line(g_file_ptr,p_msg);
129: --utl_file.put_line(g_file_ptr,''||p_msg||'');
130: utl_file.fflush(g_file_ptr);
131: END IF;
132: END printf;
133:
134: PROCEDURE print_msg( p_log_level IN NUMBER DEFAULT G_LOG, p_msg IN VARCHAR2 )

Line 173: utl_file.fflush(g_file_ptr);

169: -- flushes the log buffers
170: PROCEDURE flush_logs IS
171: BEGIN
172: IF (g_debug_mode = 'FILE') THEN
173: utl_file.fflush(g_file_ptr);
174: END IF;
175: END flush_logs;
176:
177:

Line 187: IF (utl_file.is_open(g_file_ptr)) THEN

183: -- END IF;
184: printf('PROGRAM END TIME '||to_char(sysdate,'DD-MON-YYYY HH24:MI:SS')||'');
185: print_tag(p_msg => '');
186: IF (g_debug_mode = 'FILE') THEN
187: IF (utl_file.is_open(g_file_ptr)) THEN
188: utl_file.fclose(g_file_ptr);
189: END IF;
190: g_utl_file_name := NULL;
191: ELSIF (g_debug_mode = 'CONC') THEN

Line 188: utl_file.fclose(g_file_ptr);

184: printf('PROGRAM END TIME '||to_char(sysdate,'DD-MON-YYYY HH24:MI:SS')||'');
185: print_tag(p_msg => '');
186: IF (g_debug_mode = 'FILE') THEN
187: IF (utl_file.is_open(g_file_ptr)) THEN
188: utl_file.fclose(g_file_ptr);
189: END IF;
190: g_utl_file_name := NULL;
191: ELSIF (g_debug_mode = 'CONC') THEN
192: -- FND_FILE.close;

Line 190: g_utl_file_name := NULL;

186: IF (g_debug_mode = 'FILE') THEN
187: IF (utl_file.is_open(g_file_ptr)) THEN
188: utl_file.fclose(g_file_ptr);
189: END IF;
190: g_utl_file_name := NULL;
191: ELSIF (g_debug_mode = 'CONC') THEN
192: -- FND_FILE.close;
193: null;
194: ELSE

Line 237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN

233:
234: l_log_level_prof_val := nvl(FND_PROFILE.value('FTE_PRC_LOG_LEVEL'),'1');
235: g_log_level := TO_NUMBER(l_log_level_prof_val);
236:
237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN
238:
239:
240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');
241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');

Line 240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');

236:
237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN
238:
239:
240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');
241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');
242: IF g_utl_file_dir IS NULL THEN
243:
244: --set_exception(p_met=>p_met,p_exc=>p_exc);

Line 241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');

237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN
238:
239:
240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');
241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');
242: IF g_utl_file_dir IS NULL THEN
243:
244: --set_exception(p_met=>p_met,p_exc=>p_exc);
245: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_MISSING_LOG_DIR');

Line 242: IF g_utl_file_dir IS NULL THEN

238:
239:
240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');
241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');
242: IF g_utl_file_dir IS NULL THEN
243:
244: --set_exception(p_met=>p_met,p_exc=>p_exc);
245: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_MISSING_LOG_DIR');
246: FND_MSG_PUB.ADD;

Line 253: INTO g_utl_file_name

249: RETURN;
250:
251: END IF;
252: SELECT 'prc_'||to_char(sysdate,'MMDDYYHH24MISS')||'-'||fte_prc_debug_s.nextval|| '.dbg'
253: INTO g_utl_file_name
254: FROM dual;
255: g_file_ptr := utl_file.fopen(g_utl_file_dir, g_utl_file_name, 'w');
256:
257: print_tag(p_msg => '');

Line 255: g_file_ptr := utl_file.fopen(g_utl_file_dir, g_utl_file_name, 'w');

251: END IF;
252: SELECT 'prc_'||to_char(sysdate,'MMDDYYHH24MISS')||'-'||fte_prc_debug_s.nextval|| '.dbg'
253: INTO g_utl_file_name
254: FROM dual;
255: g_file_ptr := utl_file.fopen(g_utl_file_dir, g_utl_file_name, 'w');
256:
257: print_tag(p_msg => '');
258: printf('PROGRAM START TIME '||to_char(sysdate,'DD-MON-YYYY HH24:MI:SS')||'');
259:

Line 286: IF (g_utl_file_name is NOT NULL) THEN

282: FUNCTION get_log_file_name RETURN VARCHAR2
283: IS
284: l_ret_val VARCHAR2(255);
285: BEGIN
286: IF (g_utl_file_name is NOT NULL) THEN
287: l_ret_val := g_utl_file_dir||'/'||g_utl_file_name;
288: END IF;
289: RETURN l_ret_val;
290: END get_log_file_name;

Line 287: l_ret_val := g_utl_file_dir||'/'||g_utl_file_name;

283: IS
284: l_ret_val VARCHAR2(255);
285: BEGIN
286: IF (g_utl_file_name is NOT NULL) THEN
287: l_ret_val := g_utl_file_dir||'/'||g_utl_file_name;
288: END IF;
289: RETURN l_ret_val;
290: END get_log_file_name;
291: