*COMDECK ABEND
          IDENT  ABEND
          ENTRY  ABORT
          ENTRY  ENDRUN 
          SYSCOM B1 
          TITLE  ABORT - ABORT JOB  /  ENDRUN - END CENTRAL PROGRAM.
          COMMENT ABORT/ENDRUN. 
          COMMENT COPYRIGHT CONTROL DATA CORP. 1978.
 ABORT    SPACE  4,10 
***       ABORT - ABORT JOB.
* 
*         CALL ABORT
* 
*         ABORT;  (*SYMPL* CALL)
* 
*         USES   B - 1. 
* 
*         MACROS ABORT. 
  
  
 ABORT    SUBR               ENTRY/EXIT 
          SB1    1
          ABORT  ,ND         SUPPRESS *DMPX* ON NOS/BE
 ENDRUN   SPACE  4,10 
***       ENDRUN - END CENTRAL PROGRAM. 
* 
*         CALL ENDRUN.
* 
*         ENDRUN;            (*SYMPL* CALL) 
* 
*         USES   B - 1. 
* 
*         NOTE - A *STOP;* IN *SYMPL* DOES THE SAME THING.
  
  
 ENDRUN   SUBR               ENTRY/EXIT 
          SB1    1
          ENDRUN
  
          END 
