Compile Insert ix_select_constants

* Index predicate constants
* for index reduction logic.

EQU OP.ALL$          TO  1
EQU OP.DESC$         TO  2
EQU OP.EQ$           TO  3
EQU OP.NE$           TO  4
EQU OP.LT$           TO  5
EQU OP.LE$           TO  6
EQU OP.GT$           TO  7
EQU OP.GE$           TO  8
EQU OP.START$        TO  9
EQU OP.NOT.START$    TO 10
EQU OP.END$          TO 11
EQU OP.NOT.END$      TO 12
EQU OP.CONTAIN$      TO 13
EQU OP.NOT.CONTAIN$  TO 14
EQU OP.FROM.TO$      TO 15
EQU OP.NOT.FROM.TO$  TO 16
EQU OP.MATCH$        TO 17
EQU OP.NOT.MATCH$    TO 18
EQU OP.LIKE$         TO 19
EQU OP.NOT.LIKE$     TO 20
EQU OP.NULL$         TO 21
EQU OP.NOT.NULL$     TO 22

EQUATE IX_REDUCE$    TO 1  ;* SELECT TEST RETURN - REDUCTION FLAG
EQUATE IX_SORT$      TO 2  ;* SELECT TEST RETURN - SORT FLAG
EQUATE IX_FULLMAP$   TO 6  ;* SELECT TEST RETURN - FULL MAP POSSIBLE BY BFS


* PAT: adding all the constants used in the SI_REDUCTION
* field constant used for the FMC in SI_REDUCTION
EQU IND.VAL1$        TO  1
EQU IND.VAL2$        TO  2
EQU IND.OCONV$       TO  3
EQU IND.CASE$        TO  4
EQU KEY.POS$         TO  5
EQU LIST.POS$        TO  6
EQU IND.FIX$         TO  7
EQU IND.MODE$        TO  8
EQU FLD.JUST$        TO  9 ;* field is 'AR' or 'AL' justified Pat 10/5/90
EQU BLK.SEARCH$      TO 10 ;* this is only used for type 1# mentioned in SI.MFS Pat 12/10/90
EQU FIRST.TIME$      TO 11
Equ BITMAP.FLAG$     TO 22 ; * rjc 02-16-10  set by SELECT.INDEX if Bitmap index