RE: OPNQRYF

["DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>]

When testing a character field for a value, you must specify the value in
apostrophes....

OPNQRYF    FILE((CPP001)) QRYSLT('C1ADAT *GE ' *CAT +
                                 &FRDAT *CAT ' *AND C1ADAT *LE ' *CAT +
                                 &TODAT *CAT ' *AND C1SCAC *EQ ''' *CAT +
                                 &SCAC *cat '''') KEYFLD((C1CODE) (C1ADAT))


Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: fkany@averittexpress.com [mailto:fkany@averittexpress.com]
Sent: Wednesday, December 18, 2002 3:59 PM
To: midrange-l@midrange.com
Subject: OPNQRYF


Hello,

Can anyone see what I'm doing wrong or missing out of OPNQRYF #2?

==================
OPNQRYF #1 works:
==================
OPNQRYF    FILE((CPP001)) QRYSLT('C1ADAT *GE ' *CAT +
                                 &FRDAT *CAT ' *AND C1ADAT *LE ' *CAT +
                                 &TODAT) KEYFLD((C1CODE) (C1ADAT))

===========================
OPNQRYF #2 DOES NOT work:
===========================
OPNQRYF    FILE((CPP001)) QRYSLT('C1ADAT *GE ' *CAT +
                                 &FRDAT *CAT ' *AND C1ADAT *LE ' *CAT +
                                 &TODAT *CAT ' *AND C1SCAC *EQ ' *CAT +
                                 &SCAC) KEYFLD((C1CODE) (C1ADAT))

Below is the error message from job dump:

"Field TOWE on QRYSLT pa QQQBLQDT
 parameter not found."

TOWE is the value of &SCAC.  &SCAC is parameter being passed into the
program.

TIA,

Frank

_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.