DBA Data[Home] [Help]

APPS.GMD_COA_DATA_OM_NEW dependencies on UTL_FILE

Line 1952: LOG UTL_FILE.FILE_TYPE;

1948: -- #**************************************************************************/
1949: PROCEDURE Log_Initialize
1950: IS
1951:
1952: LOG UTL_FILE.FILE_TYPE;
1953: l_file_name VARCHAR2(10) := 'GMDLOG.txt';
1954:
1955: CURSOR c_get_1st_location IS
1956: SELECT NVL( SUBSTR( value, 1, INSTR( value, ',')-1), value)

Line 1958: WHERE name = 'utl_file_dir';

1954:
1955: CURSOR c_get_1st_location IS
1956: SELECT NVL( SUBSTR( value, 1, INSTR( value, ',')-1), value)
1957: FROM v$parameter
1958: WHERE name = 'utl_file_dir';
1959:
1960: BEGIN
1961:
1962: OPEN c_get_1st_location;

Line 1967: LOG := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'w');

1963: FETCH c_get_1st_location
1964: INTO g_gmdlog_location;
1965: CLOSE c_get_1st_location;
1966:
1967: LOG := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'w');
1968: UTL_FILE.put_line(LOG, 'Log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
1969: UTL_FILE.fflush(LOG);
1970: UTL_FILE.fclose(LOG);
1971:

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

1964: INTO g_gmdlog_location;
1965: CLOSE c_get_1st_location;
1966:
1967: LOG := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'w');
1968: UTL_FILE.put_line(LOG, 'Log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
1969: UTL_FILE.fflush(LOG);
1970: UTL_FILE.fclose(LOG);
1971:
1972: EXCEPTION

Line 1969: UTL_FILE.fflush(LOG);

1965: CLOSE c_get_1st_location;
1966:
1967: LOG := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'w');
1968: UTL_FILE.put_line(LOG, 'Log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
1969: UTL_FILE.fflush(LOG);
1970: UTL_FILE.fclose(LOG);
1971:
1972: EXCEPTION
1973: WHEN OTHERS THEN

Line 1970: UTL_FILE.fclose(LOG);

1966:
1967: LOG := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'w');
1968: UTL_FILE.put_line(LOG, 'Log file opened: '||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
1969: UTL_FILE.fflush(LOG);
1970: UTL_FILE.fclose(LOG);
1971:
1972: EXCEPTION
1973: WHEN OTHERS THEN
1974: NULL;

Line 1994: WHERE name = 'utl_file_dir';

1990:
1991: CURSOR get_log_file_location IS
1992: SELECT NVL( SUBSTR( value, 1, instr( value, ',')-1), value)
1993: FROM v$parameter
1994: WHERE name = 'utl_file_dir';
1995:
1996:
1997: l_log UTL_FILE.file_type;
1998: l_file_name VARCHAR2(80) := 'GMDLOG.txt';

Line 1997: l_log UTL_FILE.file_type;

1993: FROM v$parameter
1994: WHERE name = 'utl_file_dir';
1995:
1996:
1997: l_log UTL_FILE.file_type;
1998: l_file_name VARCHAR2(80) := 'GMDLOG.txt';
1999:
2000: BEGIN
2001:

Line 2008: l_log := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'a');

2004: FETCH get_log_file_location into gmd_coa_data_om_new.g_gmdlog_location;
2005: CLOSE get_log_file_location;
2006: END IF;
2007:
2008: l_log := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'a');
2009: IF UTL_FILE.IS_OPEN(l_log) THEN
2010: UTL_FILE.put_line(l_log, p_msg);
2011: UTL_FILE.fflush(l_log);
2012: UTL_FILE.fclose(l_log);

Line 2009: IF UTL_FILE.IS_OPEN(l_log) THEN

2005: CLOSE get_log_file_location;
2006: END IF;
2007:
2008: l_log := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'a');
2009: IF UTL_FILE.IS_OPEN(l_log) THEN
2010: UTL_FILE.put_line(l_log, p_msg);
2011: UTL_FILE.fflush(l_log);
2012: UTL_FILE.fclose(l_log);
2013: END IF;

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

2006: END IF;
2007:
2008: l_log := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'a');
2009: IF UTL_FILE.IS_OPEN(l_log) THEN
2010: UTL_FILE.put_line(l_log, p_msg);
2011: UTL_FILE.fflush(l_log);
2012: UTL_FILE.fclose(l_log);
2013: END IF;
2014:

Line 2011: UTL_FILE.fflush(l_log);

2007:
2008: l_log := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'a');
2009: IF UTL_FILE.IS_OPEN(l_log) THEN
2010: UTL_FILE.put_line(l_log, p_msg);
2011: UTL_FILE.fflush(l_log);
2012: UTL_FILE.fclose(l_log);
2013: END IF;
2014:
2015: EXCEPTION

Line 2012: UTL_FILE.fclose(l_log);

2008: l_log := UTL_FILE.fopen(g_gmdlog_location, l_file_name, 'a');
2009: IF UTL_FILE.IS_OPEN(l_log) THEN
2010: UTL_FILE.put_line(l_log, p_msg);
2011: UTL_FILE.fflush(l_log);
2012: UTL_FILE.fclose(l_log);
2013: END IF;
2014:
2015: EXCEPTION
2016: