[focus-l] Re: Alternate view TABLE FILE
- From: "Bill Scott" <bills@xxxxxxxxxxxxxxx>
- To: <focus-l@xxxxxxxxxxxxx>
- Date: Thu, 17 Jun 2004 05:23:57 -0400
Sandy,
One thing that might be worth a try:
Try substituting this:
IF PC_BIG_KEY EQ '&BIGKEY'
for what you currently have:
WHERE PC_BIG_KEY EQ '&BIGKEY'
----- Original Message -----
From: "Sandy Weller" <wellergroup@xxxxxxxxx>
To: <informationbuilders-l@xxxxxxxxxxxxxxxxxxxx>
Cc: <FOCUS-L@xxxxxxxxxxxxx>
Sent: Wednesday, June 16, 2004 5: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:
