C
C  *** / W H C O M / ***
C
C  WHERE CLAUSE COMMON BLOCK
C
      COMMON /WHCOM/ NBOO,BOO(10),KATTP(10),KATTL(10),KATTY(10),
     1    KOMTYP(10),KOMPOS(10),KOMLEN(10),KOMPOT(10),KSTRT,MAXTU
     2   ,LIMTU,WHRVAL(300),WHRLEN(100)
      INTEGER BOO
      INTEGER WHRVAL,WHRLEN
C
C  VARIABLE DEFINITIONS:
C              NBOO----NUMBER OF SIMPLE BOOLEAN CONDITIONS (MAX 5)
C              BOO-----ARRAY OF CONDITION AND/OR CONNECTORS (3HAND,2HOR)
C              KATTP---ARRAY OF ATTRIBUTE COLUMN NUMBERS
C                      (0 IF "TUPLE" WHERE CLAUSE)
C              KATTL---ARRAY OF ATTRIBUTE LENGTHS IN WORDS EXCEPT TEXT
C                      IS IN CHARACTERS (0 IF "TUPLE" WHERE CLAUSE)
C              KATTY---ARRAY OF ATTRIBUTE TYPES
C                      (0 IF "TUPLE" WHERE CLAUSE)
C              KOMTYP--ARRAY OF BOOLEAN COMPARISON INTEGER IDENTIFIERS
C              KOMPOS--ARRAY OF POSITION POINTERS IN WHRVAL
C                      FOR THE START OF THE VALUE LIST
C                      OR THE COLUMN NUMBER OF THE SECOND ATTRIBUTE
C              KOMLEN--ARRAY INDICATING THE NUMBER OF ITEMS IN THE
C                      VALUE LIST
C              KOMPOT--ARRAY OF POINTERS TO WHRLEN
C              KSTRT---RECORD NUMBER OF THE STARTING NODE IN THE
C                      B-TREE IF KEY PROCESSING IS USED
C              MAXTU---MAXIMUM TUPLE NUMBER REQUESTED OR 0
C              LIMTU---MAXIMUM NUMBER OF TUPLES TO ACTUALLY PROCESS
C              WHRVAL--ARRAY OF VALUES POINTED TO BY KOMPOS
C              WHRLEN--ARRAY OF "ATTLEN" STYLE INFORMATION