*COMDECK  EXIT
 EXIT     TITLE  EXIT - ENDRUN
**        EXIT - ENDRUN 
* 
*         EXIT1 - ISSUE MESSAGE AND ABORT (X3=MESSAGE CODE) 
* 
*         EXIT2 - ABORT JOB 
* 
  
 EXIT     BSS 
          ENDRUN
  
 EXIT1    BSS 
 BRWERR4  BSS    0
 BRWERR5  BSS    0
          RJ     STRMGA      ASSEMBLE AND ISSUE ABORT MESSAGE 
  
 EXIT2    BSS 
          ABORT  ,ND         ABORT JOB - SUPRESS XP DUMP
  
          USE    // 
 RFL=     BSS    0
          USE    0
