*DECK LISTER
      PROC LISTER;
*CALL COMLISTR
