QUIZ Question

[Pickering, John (NORBORD)]

Don

Your code doesn't pass the syntax checker.

>ACCESS *FAC904D LINK JFLIST TO REF-M-KEY OF D-PER-REF-DETL OPTIONAL
>
>SELECT IF INITIATIVE = REF-D-MATCH1 OF REF-M-KEY AND &
>  NOT RECORD REF-M-KEY EXISTS

The SELECT statement says "OF REF-M-KEY". I suspect this is a key while the
syntax requires that this be a file. Try it with "OF D-PER-REF-DETL"
instead.

Regards,
JWP

> -----Original Message-----
> From:	Harrington, Don [SMTP:don.harrington@BOEING.COM]
> Sent:	Thursday, February 14, 2002 1:40 PM
> To:	HP3000-L@RAVEN.UTC.EDU
> Subject:	QUIZ Question
> 
> OK gang, why can't I link the subfile to the dataset?
> 
> Here's the QUIZ program that creates the subfile:
> 
> ;FILE FAC904Z - REPORTS MJOB NOT REFERENCED IN D-PER-REF-DETL
> 
> ;       History: $fac904z.qz $
> 
> ACCESS MJOB
> 
> SELECT IF JSTATUS <> "C" AND JSTATUS <> "X"
> 
> SET REPORT LIMIT 35000
> SET SUBFILE NAME FAC904D
> 
> DEFINE JFLIST CHAR*22 = "JOBFUNLIST            "
> 
> SORT ON LOC ON JOB
> 
> REPORT SUMMARY JOB LOC INITIATIVE JSTATUS JFLIST
> 
> BUILD FAC904Z.EXE
> 
> Here's the QUIZ program that reads the subfile:
> 
> ;FILE FAC904ZA - REPORTS MJOB NOT REFERENCED IN D-PER-REF-DETL
> 
> ;       History: $fac904za.qz $
> 
> ACCESS *FAC904D LINK JFLIST TO REF-M-KEY OF D-PER-REF-DETL OPTIONAL
> 
> SELECT IF INITIATIVE = REF-D-MATCH1 OF REF-M-KEY AND &
>   NOT RECORD REF-M-KEY EXISTS
> 
> SET REPORT DEVICE PRINTER NAME FAC904R LIMIT 35000
> SET PAGE WIDTH 80 LENGTH 66
> 
> SORT ON LOC ON JOB
> 
> PAGE HEADING "FAC904Z" &
>   TAB 20 "MJOB NOT REFERENCED IN D-PER-REF-DETL" &
>   TAB 70 SYSDATE SKIP &
>   TAB 70 "PAGE:" SYSPAGE SKIP 2 &
>   TAB 5 "SITE" &
>   TAB 20 "JOB" &
>   TAB 30 "JSTATUS" SKIP 2
> 
> FOOTING AT LOC SKIP 2
> 
> REPORT TAB 6 LOC &
>   TAB 18 JOB &
>   TAB 33 JSTATUS
> 
> BUILD FAC904ZA.EXE
> 
> Here's the error I get:
> 
> > USE FAC904Z NOL
> The file FAC904Z.EXE.PROD already exists. Ok to delete?Y
> > GO
> 
> Records selected:  4070
> Records sorted:    4070
> Records written:   4070
> 
> > USE FAC904ZA
> > ;FILE FAC904ZA - REPORTS MJOB NOT REFERENCED IN D-PER-REF-DETL
> >
> > ;       History: $fac904za.qz $
> >
> > ACCESS *FAC904D LINK JFLIST TO REF-M-KEY OF D-PER-REF-DETL OPTIONAL
> *E* Can't establish linkage to D-PER-REF-DETL.
> 
> Obviously, I'm doing something wrong, but I can't figure out what.
> 
> TIA,
> Don Harrington
> Sr. Systems Analyst
> Facilities Applications Support
> Shared Services Group
> The Boeing Company
> P.O. Box 3707 M/C 6C-AK
> Seattle, WA  98124-2207
> (v) 425-234-1145 (f) 425-234-0464 (p) 206-797-6360
> 
> The opinions expressed in this e-mail reflect those of the sender.  They
> do
> not necessarily reflect the opinions of The Boeing Company unless
> specifically stated otherwise.
> 
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *