*DECK TCOM78Q 
      PRGM  TCOM78Q;
      BEGIN 
      CONTROL STEXT;
  
*CALL COM78Q
  
      END 
      TERM
