80: END IF;
81: CLOSE DIST_CUR;
82:
83: exception
84: when utl_FILE.INVALID_PATH THEN
85: -- dbms_output.put_line('Invalid Path....');
86: errbufx := 'Invalid path - '||to_char(SQLCODE) || ' ' || SQLERRM;
87: when utl_FILE.INVALID_MODE THEN
88: -- dbms_output.put_line('Invalid Mode ....');
83: exception
84: when utl_FILE.INVALID_PATH THEN
85: -- dbms_output.put_line('Invalid Path....');
86: errbufx := 'Invalid path - '||to_char(SQLCODE) || ' ' || SQLERRM;
87: when utl_FILE.INVALID_MODE THEN
88: -- dbms_output.put_line('Invalid Mode ....');
89: errbufx := 'Invalid Mode - '||to_char(SQLCODE) || ' ' || SQLERRM;
90: when utl_file.invalid_filehandle then
91: errbufx := 'Invalid filehandle - '||to_char(SQLCODE) || ' ' || SQLERRM;
86: errbufx := 'Invalid path - '||to_char(SQLCODE) || ' ' || SQLERRM;
87: when utl_FILE.INVALID_MODE THEN
88: -- dbms_output.put_line('Invalid Mode ....');
89: errbufx := 'Invalid Mode - '||to_char(SQLCODE) || ' ' || SQLERRM;
90: when utl_file.invalid_filehandle then
91: errbufx := 'Invalid filehandle - '||to_char(SQLCODE) || ' ' || SQLERRM;
92:
93: when utl_FILE.INVALID_OPERATION THEN
94: -- dbms_output.put_line('Invalid Operation....');
89: errbufx := 'Invalid Mode - '||to_char(SQLCODE) || ' ' || SQLERRM;
90: when utl_file.invalid_filehandle then
91: errbufx := 'Invalid filehandle - '||to_char(SQLCODE) || ' ' || SQLERRM;
92:
93: when utl_FILE.INVALID_OPERATION THEN
94: -- dbms_output.put_line('Invalid Operation....');
95: errbufx := 'Invalid operation - '||to_char(SQLCODE) || ' ' || SQLERRM;
96: when utl_file.write_error then
97: errbufx := 'Write error - '||to_char(SQLCODE) || ' ' || SQLERRM;
92:
93: when utl_FILE.INVALID_OPERATION THEN
94: -- dbms_output.put_line('Invalid Operation....');
95: errbufx := 'Invalid operation - '||to_char(SQLCODE) || ' ' || SQLERRM;
96: when utl_file.write_error then
97: errbufx := 'Write error - '||to_char(SQLCODE) || ' ' || SQLERRM;
98:
99: when validation_error then
100: -- dbms_output.put_line('Validation Errors Detected....');