*DECK CMFFAF                                                             CMFFAF 
          IDENT  CMF.FAF                                                 CMFFAF 
                                                                         CMFFAF 
 ERRCK    EQU    0                                                       CMFFAF 
*CALL FAF                                                                CMFFAF 
          END                                                            CMFFAF 
