Re: OPNQRYF

[Vern Hamberg <vhamberg@xxxxxxxxxxxxxxxxxxxxxxxxx>]

Frank

I think you need apostrophes around the value from the field.

Instead of

   *CAT &SCAC

you need

   *CAT '''' *CAT &SCAC *CAT ''''

That's 4 apostrophes before and after.

I've sometimes declared a variable called &APOST

DCL &APOST *CHAR 1 ''''

The the above would become

   *CAT &APOST *CAT &SCAC *CAT &APOST

HTH

Vern

At 03:59 PM 12/18/2002 -0600, you wrote:
> 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