+-------------------------------IBM Extension--------------------------------+
Purpose
Terminates the program. It truncates all open output files to the current position of the file pointer, closes all open files, and sends the signal to the current process.
If the is neither caught nor ignored, and if the current directory is writable, the system produces a core file in the current directory.
Class
Subroutine
Examples
The following is an example of a statement using the ABORT subroutine.
IF (ERROR_CONDITION) CALL ABORT
+----------------------------End of IBM Extension----------------------------+