APPS.AHL_PRD_WORKORDER_PVT dependencies on UTL_FILE

Line 85: fileHandler UTL_FILE.FILE_TYPE;

81: l_full_path VARCHAR2(512);
82: l_new_full_path VARCHAR2(512);
83: l_file_dir VARCHAR2(512);
84:
85: fileHandler UTL_FILE.FILE_TYPE;
86: fileName VARCHAR2(50);
87:
88: l_flag NUMBER;
89: BEGIN

Line 97: WHERE name = 'utl_file_dir';

93: /* get output directory path from database */
94: SELECT value
95: INTO l_full_path
96: FROM v$parameter
97: WHERE name = 'utl_file_dir';
98:
99: l_flag := 0;
100: --l_full_path contains a list of comma-separated directories
101: WHILE(TRUE)

Line 115: fileHandler := UTL_FILE.FOPEN(l_file_dir , filename, 'w');

111: FROM dual;
112:
113: -- check if the dir is valid
114: BEGIN
115: fileHandler := UTL_FILE.FOPEN(l_file_dir , filename, 'w');
116: l_flag := 1;
117: EXCEPTION
118: WHEN utl_file.invalid_path THEN
119: l_flag := 0;

Line 118: WHEN utl_file.invalid_path THEN

114: BEGIN
115: fileHandler := UTL_FILE.FOPEN(l_file_dir , filename, 'w');
116: l_flag := 1;
117: EXCEPTION
118: WHEN utl_file.invalid_path THEN
119: l_flag := 0;
120: WHEN utl_file.invalid_operation THEN
121: l_flag := 0;
122: END;

Line 120: WHEN utl_file.invalid_operation THEN

116: l_flag := 1;
117: EXCEPTION
118: WHEN utl_file.invalid_path THEN
119: l_flag := 0;
120: WHEN utl_file.invalid_operation THEN
121: l_flag := 0;
122: END;
123:
124: IF l_flag = 1 THEN --got a valid directory

Line 125: utl_file.fclose(fileHandler);

121: l_flag := 0;
122: END;
123:
124: IF l_flag = 1 THEN --got a valid directory
125: utl_file.fclose(fileHandler);
126: EXIT;
127: END IF;
128:
129: --earlier found dir was not a valid dir,

Line 170: -- WHERE NAME = 'utl_file_dir';

166:
167: -- SELECT trim(substr(VALUE, 1, DECODE( instr( VALUE, ','), 0, length( VALUE), instr( VALUE, ',') -1 ) ) )
168: -- INTO x_output_dir
169: -- FROM V$PARAMETER
170: -- WHERE NAME = 'utl_file_dir';
171: --Call log path
172: log_path( x_output_dir => l_output_dir);
173: --
174: x_output_dir := l_output_dir;