Re: OPNQRYF

["Michael Naughton" <mnaughton@xxxxxxxxxxxx>]

Frank,

As others have pointed out, you need to include single quotes in your
query string. I'll just add that one trick I like is to define a field
having a value of single quote, e.g.:

        DCL   &SQ  *CHAR   1   VALUE(X'7D')

Then you can construct your string like this:

. . . . *CAT ' *AND C1SCAC *EQ ' *CAT &SQ *CAT &SCAC *CAT &SQ . . . .

(Personally, I find this more readable and easier to change or debug than
"'")

hth

midrange-l@midrange.com writes:
>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))



Mike Naughton
Senior Programmer/Analyst
Judd Wire, Inc.
124 Turnpike Road
Turners Falls, MA  01376
413-863-4357 x444
mnaughton@juddwire.com