*DECK CMFALV
          IDENT  CMF.ALV
  
 ERRCK    EQU    0
*CALL ALV 
          END 
