*     COPYRIGHT, (C) HONEYWELL INFORMATION SYSTEMS INC., 1979
*
      CHARACTER*1 ANS,NAME*31
      COMMON/QUERY/ANS,NAME
      INTEGER RESP,VAL
      COMMON/QUERY1/RESP,VAL
      INTEGER BLNK1
      DATA BLNK1/' '/
      INTEGER TGRP,TSET,TCOUNT
      COMMON/TEMPS/TGRP,TSET,TCOUNT

