*DECK CMSSDA
          IDENT  CMS.SDA
  
 ERRCK    EQU    1
*CALL SDA 
          END 
