DBA Data[Home] [Help]

APPS.INV_LABEL dependencies on UTL_FILE

Line 1322: l_file UTL_FILE.FILE_TYPE;

1318: l_file_name VARCHAR2(100) := 'LABEL_XML.log';
1319: l_dir_seperator VARCHAR2(1);
1320:
1321: l_length NUMBER;
1322: l_file UTL_FILE.FILE_TYPE;
1323: l_substr VARCHAR2(254);
1324: i NUMBER;
1325: l_last_index NUMBER;
1326: l_cur_index NUMBER;

Line 1367: l_file := UTL_FILE.fopen(rtrim(l_dir,l_dir_seperator), l_file_name, 'a');

1363: l_dir := substr(l_dir, 1, instr(l_dir, l_dir_seperator, -1, 1)-1);
1364:
1365: --Write XML string to file
1366: l_length := length(xml);
1367: l_file := UTL_FILE.fopen(rtrim(l_dir,l_dir_seperator), l_file_name, 'a');
1368: utl_file.put_line(l_file, 'LABEL_XML *** New Session. : '|| To_char(Sysdate, 'DD-MON-YY HH:MI:SS') ||' ***');
1369:
1370:
1371: l_last_index :=1;

Line 1368: utl_file.put_line(l_file, 'LABEL_XML *** New Session. : '|| To_char(Sysdate, 'DD-MON-YY HH:MI:SS') ||' ***');

1364:
1365: --Write XML string to file
1366: l_length := length(xml);
1367: l_file := UTL_FILE.fopen(rtrim(l_dir,l_dir_seperator), l_file_name, 'a');
1368: utl_file.put_line(l_file, 'LABEL_XML *** New Session. : '|| To_char(Sysdate, 'DD-MON-YY HH:MI:SS') ||' ***');
1369:
1370:
1371: l_last_index :=1;
1372: l_cur_index := instr(xml, '>', l_last_index);

Line 1376: utl_file.put_line(l_file, l_substr);

1372: l_cur_index := instr(xml, '>', l_last_index);
1373:
1374: WHILE l_cur_index <> 0 LOOP
1375: l_substr := substr(xml, l_last_index, l_cur_index-l_last_index+1);
1376: utl_file.put_line(l_file, l_substr);
1377: l_last_index := l_cur_index + 1;
1378: IF(substr(xml, l_last_index+1,1) = 'v') THEN
1379: l_cur_index := instr(xml, '>', l_last_index, 2);
1380: ELSE

Line 1384: utl_file.fclose(l_file);

1380: ELSE
1381: l_cur_index := instr(xml, '>', l_last_index, 1);
1382: END IF;
1383: END LOOP;
1384: utl_file.fclose(l_file);
1385: ELSE
1386: NULL;
1387: END IF;
1388: EXCEPTION

Line 1389: WHEN utl_file.invalid_path THEN

1385: ELSE
1386: NULL;
1387: END IF;
1388: EXCEPTION
1389: WHEN utl_file.invalid_path THEN
1390: IF (l_debug = 1) THEN
1391: trace(' Invalid path in ' || G_PKG_NAME||'.WriteIntoFile, can not write into file', TRACE_PROMPT, TRACE_LEVEL);
1392: END IF;
1393: IF (utl_file.IS_OPEN(l_file)) THEN

Line 1393: IF (utl_file.IS_OPEN(l_file)) THEN

1389: WHEN utl_file.invalid_path THEN
1390: IF (l_debug = 1) THEN
1391: trace(' Invalid path in ' || G_PKG_NAME||'.WriteIntoFile, can not write into file', TRACE_PROMPT, TRACE_LEVEL);
1392: END IF;
1393: IF (utl_file.IS_OPEN(l_file)) THEN
1394: utl_file.fclose(l_file);
1395: END IF;
1396: IF (l_debug = 1) THEN
1397: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);

Line 1394: utl_file.fclose(l_file);

1390: IF (l_debug = 1) THEN
1391: trace(' Invalid path in ' || G_PKG_NAME||'.WriteIntoFile, can not write into file', TRACE_PROMPT, TRACE_LEVEL);
1392: END IF;
1393: IF (utl_file.IS_OPEN(l_file)) THEN
1394: utl_file.fclose(l_file);
1395: END IF;
1396: IF (l_debug = 1) THEN
1397: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);
1398: trace('ERROR MESSAGE = ' || SQLERRM, TRACE_PROMPT, TRACE_LEVEL);

Line 1405: IF (utl_file.IS_OPEN(l_file)) THEN

1401: WHEN fnd_api.g_exc_error THEN
1402: IF (l_debug = 1) THEN
1403: trace(' Expected Error In '|| G_PKG_NAME||'.WriteIntoFile', TRACE_PROMPT, TRACE_LEVEL);
1404: END IF;
1405: IF (utl_file.IS_OPEN(l_file)) THEN
1406: utl_file.fclose(l_file);
1407: END IF;
1408: IF (l_debug = 1) THEN
1409: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);

Line 1406: utl_file.fclose(l_file);

1402: IF (l_debug = 1) THEN
1403: trace(' Expected Error In '|| G_PKG_NAME||'.WriteIntoFile', TRACE_PROMPT, TRACE_LEVEL);
1404: END IF;
1405: IF (utl_file.IS_OPEN(l_file)) THEN
1406: utl_file.fclose(l_file);
1407: END IF;
1408: IF (l_debug = 1) THEN
1409: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);
1410: trace('ERROR MESSAGE = ' || SQLERRM, TRACE_PROMPT, TRACE_LEVEL);

Line 1417: IF (utl_file.IS_OPEN(l_file)) THEN

1413: WHEN fnd_api.g_exc_unexpected_error THEN
1414: IF (l_debug = 1) THEN
1415: trace(' Unexpected Error In '|| G_PKG_NAME||'.WriteIntoFile', TRACE_PROMPT, TRACE_LEVEL);
1416: END IF;
1417: IF (utl_file.IS_OPEN(l_file)) THEN
1418: utl_file.fclose(l_file);
1419: END IF;
1420: IF (l_debug = 1) THEN
1421: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);

Line 1418: utl_file.fclose(l_file);

1414: IF (l_debug = 1) THEN
1415: trace(' Unexpected Error In '|| G_PKG_NAME||'.WriteIntoFile', TRACE_PROMPT, TRACE_LEVEL);
1416: END IF;
1417: IF (utl_file.IS_OPEN(l_file)) THEN
1418: utl_file.fclose(l_file);
1419: END IF;
1420: IF (l_debug = 1) THEN
1421: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);
1422: trace('ERROR MESSAGE = ' || SQLERRM, TRACE_PROMPT, TRACE_LEVEL);

Line 1429: IF (utl_file.IS_OPEN(l_file)) THEN

1425: WHEN others THEN
1426: IF (l_debug = 1) THEN
1427: trace(' Other Error In '|| G_PKG_NAME||'.WriteIntoFile', TRACE_PROMPT, TRACE_LEVEL);
1428: END IF;
1429: IF (utl_file.IS_OPEN(l_file)) THEN
1430: utl_file.fclose(l_file);
1431: END IF;
1432: IF (l_debug = 1) THEN
1433: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);

Line 1430: utl_file.fclose(l_file);

1426: IF (l_debug = 1) THEN
1427: trace(' Other Error In '|| G_PKG_NAME||'.WriteIntoFile', TRACE_PROMPT, TRACE_LEVEL);
1428: END IF;
1429: IF (utl_file.IS_OPEN(l_file)) THEN
1430: utl_file.fclose(l_file);
1431: END IF;
1432: IF (l_debug = 1) THEN
1433: trace('ERROR CODE = ' || SQLCODE, TRACE_PROMPT, TRACE_LEVEL);
1434: trace('ERROR MESSAGE = ' || SQLERRM, TRACE_PROMPT, TRACE_LEVEL);