HP3000-L Archives

February 2002, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Harrington, Don" <[log in to unmask]>
Reply To:
Harrington, Don
Date:
Thu, 14 Feb 2002 11:13:21 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (165 lines)
Kathy;

Here you go:

- SHOW RECORD D-PER-REF-DETL
02/14/02                 ISDS FACILITIES SYSTEMS                  Page    1
                         R E C O R D   R E P O R T
                           For DICTIONARY:  PHD
    Record:             D-PER-REF-DETL
    of File:            PERDB1
    Organization:       DETAIL
    Type:               TURBOIMAGE
    Open:               D-PER-REF-DETL of PERDB1.DB
    Description:
             Used to store miscellaneous information
             <file owner: M Goodwin >
    Record Size:        110 Bytes

-- Record Contents --
    Item                                 Type            Size  Occ  Offset
    REF-M-KEY                            CHARACTER         22            0
    REF-D-MATCH1                         CHARACTER         10           22
    REF-D-MATCH2                         CHARACTER          4           32
    REF-D-DESC                           CHARACTER         40           36
    REF-D-COMMENT                        CHARACTER         30           76
    REF-D-SITE                           CHARACTER          4          106

Maybe the key isn't defined?  I'll look into that.

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.



-----Original Message-----
From: Kathy Konek [mailto:[log in to unmask]]
Sent: Thursday, February 14, 2002 10:59 AM
To: 'Harrington, Don'
Subject: RE: QUIZ Question


Can we get a QSHOW on D-PER-REF-DETL or Show Items or something with the
file format?
Thanks

-----Original Message-----
From: Harrington, Don [mailto:[log in to unmask]]
Sent: Thursday, February 14, 2002 10:40 AM
To: PowerHouse-L (E-mail)
Cc: HP3000-L (E-mail)
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.



= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: [log in to unmask]
Subscribe: "subscribe" in message body to [log in to unmask]
Unsubscribe: "unsubscribe" in message body to
[log in to unmask]
http://lists.swau.edu/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2