*DECK CMFOPB
          IDENT  CMF.OPB
  
 ERRCK    EQU    0
*CALL OPB 
          END 
