APPS.GML_GPOAO dependencies on UTL_FILE

Line 70: v_OutputFilePtr utl_file.file_type;

66: v_RunID NUMBER := 0;
67: v_OutputWidth INTEGER := 4000;
68: v_TransactionType VARCHAR2(120) := 'GPOAO';
69: v_CommunicationMethod VARCHAR2(120) := 'EDI';
70: v_OutputFilePtr utl_file.file_type;
71: v_OutputLine VARCHAR2(2000);
72: v_OutputRecordCount NUMBER;
73: v_Trace VARCHAR2(80);
74: v_industry VARCHAR2(240);

Line 206: v_OutputFilePtr := utl_file.fopen(v_OutputPath,v_FileName,'W');

202:
203: xProgress := 'GPOAO-10-1060';
204: IF v_OutputRecordCount > 0 THEN
205: xProgress := 'GPOAO-10-1070';
206: v_OutputFilePtr := utl_file.fopen(v_OutputPath,v_FileName,'W');
207:
208: xProgress := 'GPOAO-10-1080';
209: OPEN c_OutputSource;
210: xProgress := 'GPOAO-10-1090';

Line 220: utl_file.put_line(v_OutputFilePtr,v_OutputLine);

216: xProgress := 'GPOAO-10-1110';
217: EXIT WHEN c_OutputSource%NOTFOUND;
218:
219: xProgress := 'GPOAO-10-1120';
220: utl_file.put_line(v_OutputFilePtr,v_OutputLine);
221: END LOOP;
222:
223: xProgress := 'GPOAO-10-1130';
224: CLOSE c_OutputSource;

Line 227: utl_file.fclose(v_OutputFilePtr);

223: xProgress := 'GPOAO-10-1130';
224: CLOSE c_OutputSource;
225:
226: xProgress := 'GPOAO-10-1140';
227: utl_file.fclose(v_OutputFilePtr);
228: END IF;
229:
230: xProgress := 'GPOAO-10-1170';
231: ec_debug.pl ( 0, 'EC', 'GML_GPOAO_COMPLETE' ,NULL );

Line 253: WHEN utl_file.write_error THEN

249: ec_debug.disable_debug;
250: COMMIT;
251:
252: EXCEPTION
253: WHEN utl_file.write_error THEN
254: ec_debug.pl ( 0, 'EC', 'ECE_UTL_WRITE_ERROR', NULL );
255:
256: ec_debug.pl ( 0, 'EC', 'ECE_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM );
257:

Line 263: WHEN utl_file.invalid_path THEN

259: ec_debug.disable_debug;
260: ROLLBACK;
261: RAISE;
262:
263: WHEN utl_file.invalid_path THEN
264: ec_debug.pl ( 0, 'EC', 'ECE_UTL_INVALID_PATH', NULL );
265:
266: ec_debug.pl ( 0, 'EC', 'ECE_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM );
267:

Line 273: WHEN utl_file.invalid_operation THEN

269: ec_debug.disable_debug;
270: ROLLBACK;
271: RAISE;
272:
273: WHEN utl_file.invalid_operation THEN
274: ec_debug.pl ( 0,
275: 'EC',
276: 'ECE_UTL_INVALID_OPERATION',
277: NULL );