*DECK CMSFAF                                                             CMSFAF 
          IDENT  CMS.FAF                                                 CMSFAF 
                                                                         CMSFAF 
 ERRCK    EQU    1                                                       CMSFAF 
*CALL FAF                                                                CMSFAF 
          END                                                            CMSFAF 
