|
First off, I thought *CAT is used only for numeric variable. &DIV is a one character field as is the GTDIV field in the file. Second, If I take out the lines with:*AND GTDIV *EQ &DIV
the command runs fine. As soon as I add the line, I get the CPF9899 error. Third, how large can I make the &SEL variable to store the QRYSLT statement? The statement in the actual program is really much larger. I just stripped it down some for the forum.
Here is the actual command WITHOUT the line I added. This one works fine. QSYS/OPNQRYF FILE((DOR400/GLTRAN)) + QRYSLT('GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3120 + *AND GTSOUR *EQ "BI" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3140 + *AND GTSOUR *EQ "BI" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3150 + *AND GTSOUR *EQ "BI" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3170 + *AND GTSOUR *EQ "BI" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3190 + *AND GTSOUR *EQ "BI" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3300 + *AND GTSOUR *EQ "BI" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3120 + *AND GTSOUR *EQ "AR" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3140 + *AND GTSOUR *EQ "AR" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3150 + *AND GTSOUR *EQ "AR" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3170 + *AND GTSOUR *EQ "AR" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' + *AND GTACCT *EQ 3190 + *AND GTSOUR *EQ "AR" + *OR GTBDTE *EQ ' *CAT &BOOK *CAT ' +*AND GTACCT *EQ 3300 + *AND GTSOUR *EQ "AR" ') +
KEYFLD((GTREF))
---------------------------------------------------------------------- From: "Bob O." <otis_the_cat@xxxxxxxxxxx> Reply-To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx> To: midrange-l@xxxxxxxxxxxx Subject: PROBLEM WITH OPNQRYF Date: Fri, 18 Aug 2006 13:52:00 -0500 > 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. >
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.