*DECK CMFSLF
          IDENT  CMF.SLF
  
 ERRCK    EQU    0
*CALL SLF 
          END 
