[focus-l] Re: Alternate view TABLE FILE
- From: "Winfred Gunter" <winfred.gunter@xxxxxxxxxxxxx>
- To: <focus-l@xxxxxxxxxxxxx>
- Date: Thu, 17 Jun 2004 06:21:43 -0500
Sandy,
The FOC269 says it. If you take an indexed view (.PC_BIG_KEY) then you must
use the EQ operator (no GE or LE allowed).
WG
----- Original Message -----
From: "Sandy Weller" <wellergroup@xxxxxxxxx>
To: <informationbuilders-l@xxxxxxxxxxxxxxxxxxxx>
Cc: <FOCUS-L@xxxxxxxxxxxxx>
Sent: Wednesday, June 16, 2004 4:44 PM
Subject: [focus-l] Alternate view TABLE FILE
> Also known as an INDEXED view.
>
> Running 7.2.5 under MVS
>
> I get a FOC269 error tellng me
> EQUALITY SCREENING TESTS MUST BE PROVIDED IN AN INDEXED VIEW
>
> See below; I've got it.
>
> Is it because I also have PC_YYM as a WHERE field?
> Any other ideas.
>
> Thanks
> Sandy Weller
>
>
> The MFD:
> FILE=PCRSUM1,SUFFIX=FOC
> SEGNAME=DATEINFO,SEGTYPE=S1,$
> FIELD=PC_YYM ,,FORMAT=YYM ,INDEX=I,$
> $
> SEGNAME=CUST ,SEGTYPE=S1,PARENT=DATEINFO,$
> FIELD=PC_SOLD_NBR ,,FORMAT=I6L,TITLE='SOLD,NBR',INDEX=I,$
> $
> SEGNAME=PRODUCT,SEGTYPE=S2,PARENT=CUST,$
> FIELD=PC_VENDOR_NM ,,FORMAT=A10 ,TITLE='VENDOR,NAME',INDEX=I,$
> FIELD=PC_PROD_CLS ,,FORMAT=A4 ,TITLE='PROD,CLS',INDEX=I,$
> FIELD=PC_BIG_KEY ,,FORMAT=A20 ,TITLE='KEY,FOR,JOIN',INDEX=I,$
> FIELD=GRS_SLS ,,FORMAT=P13.2C ,TITLE='GROSS,SALES',$
> .
> etc.
>
> PC_BIG_KEY is a concatenation of SOLD_NBR VENDOR_NM PROD_CLS I need to be
able
> to get all records for upto 24 months.
>
> My code looks like this:
> -READ BKEYIN &BIGKEY.A20.
> -*
> TABLE FILE PCRSUM1.PC_BIG_KEY
> PRINT
> GRS_SLS
> .
> etc.
> BY PC_YYM
> BY PC_SOLD_NBR
> BY PC_VENDOR_NM
> BY PC_PROD_CLS
> WHERE PC_BIG_KEY EQ '&BIGKEY' (Assigned above in -READ)
> WHERE PC_YYM LE CY_YYM OR PC_YYM GE PY_YYMJ (defined above; not
shown)
> ON TABLE HOLD AS HISTDATA
> END
> -*
>
>
>
>
>
>
> __________________________________
> Do you Yahoo!?
> New and Improved Yahoo! Mail - 100MB free storage!
> http://promotions.yahoo.com/new_mail
>
Other related posts:
