RE: PROBLEM WITH OPNQRYF

  There's also GTSOUR *EQ "AR" lines in there also.  I know this is quite
  messy.  Its not my code however. I'm just trying to add to it.

    ----------------------------------------------------------------------

    From:  "Lapeyre, Francis" <FLAPEYRE@xxxxxxxx>
    Reply-To:  Midrange Systems Technical Discussion
    <midrange-l@xxxxxxxxxxxx>
    To:  "'Midrange Systems Technical Discussion'" <midrange-l@xxxxxxxxxxxx>
    Subject:  RE: PROBLEM WITH OPNQRYF
    Date:  Fri, 18 Aug 2006 14:32:22 -0500
    >It can be boiled down to:
    >
    >
    >QSYS/OPNQRYF FILE((DOR400/GLTRAN)) QRYSLT('GTBDTE *EQ ' +
    >              *CAT &BOOK *CAT ' *AND GTACCT *EQ +
    >              %VALUES(3120 3140 3150 3170) *AND GTSOUR *EQ +
    >              "BI" *AND GTDIV *EQ &DIV') KEYFLD((GTREF))
    >
    >You can also replace the *EQ with =.
    >
    >Francis Lapeyre
    >IS Dept. Programmer/Analyst
    >Stewart Enterprises, Inc.
    >E-mail: flapeyre@xxxxxxxx
    >
    >-----Original Message-----
    >From: midrange-l-bounces@xxxxxxxxxxxx
    >[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob O.
    >Sent: Friday, August 18, 2006 1:52 PM
    >To: midrange-l@xxxxxxxxxxxx
    >Subject: PROBLEM WITH OPNQRYF
    >
    >    I can't seem to get this to work no matter what I do!!!
    >
    >    I keep getting the following message in the job log.
    >
    >    CPF9899
    >    Missing operand on expression in QRYSLT parameter.
    >
    >
    >    QSYS/OPNQRYF FILE((DOR400/GLTRAN))  QRYSLT('GTBDTE *EQ
    '  *CAT  &BOOK
    >    *CAT  ' +
    >    *AND GTACCT *EQ 3120 +
    >    *AND GTSOUR *EQ ''BI'' +
    >    *AND GTDIV *EQ *DIV *OR +
    >    GTBDTE *EQ '  *CAT  &BOOK  *CAT  ' +
    >    *AND GTACCT *EQ 3140 +
    >    *AND GTSOUR *EQ ''BI'' +
    >    *AND GTDIV *EQ &DIV *OR +
    >    GTBDTE *EQ '  *CAT  &BOOK  *CAT  ' +
    >    *AND GTACCT *EQ 3150 +
    >    *AND GTSOUR *EQ ''BI'' +
    >    *AND GTDIV *EQ &DIV *OR +
    >    GTBDTE *EQ '  *CAT  &BOOK  *CAT  ' +
    >    *AND GTACCT *EQ 3170 +
    >    *AND GTSOUR *EQ ''BI'' +
    >    *AND GTDIV *EQ *DIV ')  +
    >    KEYFLD((GTREF))
    >--
    >This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
    list
    >To post a message email: MIDRANGE-L@xxxxxxxxxxxx
    >To subscribe, unsubscribe, or change list options,
    >visit: http://lists.midrange.com/mailman/listinfo/midrange-l
    >or email: MIDRANGE-L-request@xxxxxxxxxxxx
    >Before posting, please take a moment to review the archives
    >at http://archive.midrange.com/midrange-l.
    >
    >--
    >This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
    list
    >To post a message email: MIDRANGE-L@xxxxxxxxxxxx
    >To subscribe, unsubscribe, or change list options,
    >visit: http://lists.midrange.com/mailman/listinfo/midrange-l
    >or email: MIDRANGE-L-request@xxxxxxxxxxxx
    >Before posting, please take a moment to review the archives
    >at http://archive.midrange.com/midrange-l.
    >