*DECK DDLCGP1                                                           000690
          IDENT  DLF0601                                                000700
*CALL COMCGP1                                                           000710
