Thanks, Mike! That did it!
Don Harrington
Sr. Programmer/Analyst
FacApps Support
Facilities Computing Services
Standard Services Group
The Boeing Company
PO Box 3707 M/C 6C-AK
Seattle, WA 98124-2207
(v) 425-234-1145 (f) 425-234-0464 (p) 206-797-6360
Location: 7-42.1, 1C3-2
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: Mike Church [mailto:[log in to unmask]]
Sent: Friday, July 27, 2001 12:53 PM
To: 'Harrington, Don'; [log in to unmask]
Subject: RE: [HP3000-L] Quiz Conundrum
Your defines must follow the access statement....
I think it should work then.....
mc
-----Original Message-----
From: Harrington, Don [mailto:[log in to unmask]]
Sent: Friday, July 27, 2001 3:51 PM
To: [log in to unmask]
Subject: [HP3000-L] Quiz Conundrum
Gang;
A coworker of mine is having difficulty with the Quiz code shown below.
We've looked at this with a number of pairs of eyes and can see nothing
wrong. Any help you can provide would be greatly appreciated. LOC is an X2
filed in an Image database. We're concerned with the first error only. The
second error is a result of the first. We've tried various permutations of
item order and parenthesis.
TIA,
Don Harrington
Sr. Programmer/Analyst
FacApps Support
Facilities Computing Services
Standard Services Group
The Boeing Company
PO Box 3707 M/C 6C-AK
Seattle, WA 98124-2207
(v) 425-234-1145 (f) 425-234-0464 (p) 206-797-6360
Location: 7-42.1, 1C3-2
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.
>
>
> > DEF NAME-MS CHAR*25 = PARM PROMPT "Enter 'Send to' User: "
> > DEF MY-SITE CHAR*1 = PARM PROMPT "Enter Site: "
> > DEF MY-SKILL CHAR*3 = PARM PROMPT "Enter Skill Code: "
> > ACC DENG &
> > LINK PROJ OF DENG TO PROJ OF DETABLE &
> > LINK JOB OF DENG TO JOB OF MJOB &
> > LINK ENGSUPV OF DENG TO SUPV OF MCREW
> >
> > SEL IF (MY-SITE = LOC[1:1] OR MY-SITE = "@" OR MY-SITE = " ") AND &
> ^^^^^^^
> *E* Expected: NOT ( RECORD SETSYSTEMVAL DELETESYSTEMVAL VALIDPATTERN
> MATCHPATTERN MATCHUSER <number> <string> MISSING NULL
CHARACTERS
> LOGONID PORTID SYSDATE SYSTIME SYSNAME SYSDATETIME SIGNONUSER
> SIGNONGROUP SIGNONACCOUNT <qualifier> <item>
> > (SKILL OF DENG = MY-SKILL OR MY-SKILL = "@" OR MY-SKILL = " ")
> ^
> *E* Expected: ACCESS SQL DECLARE BUILD CHOOSE OMNIDEX DEFINE EDIT
> DISPLAY EXECUTE EXIT FINAL FOOTING GO HEADING INITIAL PAGE
> QSHOW QUIT CANCEL REPORT NOREPORT SAVE SELECT AND SET SHOW
> SORT SORTED USE REVISE HELP
> >
>
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|