QUIZ Question

Harrington, Don don.harrington@boeing.com
Thu, 14 Feb 2002 10:39:38 -0800


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.