*DECK CMFSFF
          IDENT  CMF.SFF
  
 ERRCK    EQU    0
*CALL SFF 
          END 
