*DECK S$STVAR 
          IDENT  S$STVAR
          TITLE  S$STVAR
          COMMENT  LOCATION OF THE STATUS VARIABLE
          SPACE 4 
**        S$STVAR - LOCATION OF THE SM5ST VARIABLE
  
*       USAGE - 
* 
*         SET IN THE ROUTINE 'SM5ST' AND USED IN THE ROUTINE 'S$SSTAT'
*         CONTAINS THE ADDRESS OF THE VARIABLE GIVEN AS A PARAMETER 
*         IN THE SM5ST CALL 
* 
  
          ENTRY  S$STVAR
 S$STVAR  BSSZ   1
  
  
          END 
