*DECK CMSCSV
          IDENT  CMS.CSV
  
 ERRCK    EQU    1
*CALL CSV 
          END 
