25 pts.
 OPNQRY
Hi ALL, I am trying to pass to variable to the query select. ----------------------------------------------------------------------------------------------- OVRDBF FILE(filename) SHARE(*YES) OPNQRYF FILE((library/filename) QRYSLT('DATE + *EQ "&SATDYYMD"') /*the variable contains the date*/ CPYFRMQRYF FROMOPNID(filename) TOFILE(library/outputfile) + MBROPT(*REPLACE) CRTFILE(*NO) RUNQRY QRY(library/queryname) + QRYFILE((Library/filename) (library/outputfile) CLOF OPNID(filename) DLTOVR FILE(filename) ----------------------------------------------------------------------------------------- error message:Cause . . . . . : Control language (CL) program RCDSLCT11 in library TEST1 detected an error at statement number 2300. Message text for QRY2276 is: RUNQRY has too many files specified for query XXXXX in TEST1. Can anyone help me out.

Software/Hardware used:
ASKED: November 26, 2008  9:03 AM
UPDATED: November 26, 2008  1:54 PM

Answer Wiki:
Hi, You have 2 files specified for your RUNQRY statement. I suspect that your existing *QRYDFN is only designed to use 1 file. Regards, Martin Gilbert.
Last Wiki Answer Submitted:  November 26, 2008  9:39 am  by  Gilly400   23,625 pts.
All Answer Wiki Contributors:  Gilly400   23,625 pts.
To see all answers submitted to the Answer Wiki: View Answer History.


Discuss This Question:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _


 

Hi,
Thank for the reply..below is the code what I have wriiten for clear understanding..Please help me out
———————————————————————————
OVRDBF FILE(ABC13DEF) SHARE(*YES)
OPNQRYF FILE((TEST1/ABC13DEF)) QRYSLT(‘DATE +
*EQ “&SATDYYMD”‘)
CPYFRMQRYF FROMOPNID(ABC13DEF) TOFILE(TEST1/ABCD13) +
MBROPT(*REPLACE) CRTFILE(*NO)
RUNQRY QRY(TEST1/CRADPAYDAT) +
QRYFILE(TEST1/ABC13DEF) (TEST1/ABCDC13)
CLOF OPNID(ABC13DEF)
DLTOVR FILE(ABC13DEF)
———————————————————————————

 25 pts.

 

Hi,

I think you only need to use (TEST1/ABCDC13) for your RUNQRY – this file should only contain the data you select using OPNQRYF :-

OVRDBF FILE(ABC13DEF) SHARE(*YES)
OPNQRYF FILE((TEST1/ABC13DEF)) QRYSLT(’DATE *EQ “&SATDYYMD”‘)

CPYFRMQRYF FROMOPNID(ABC13DEF) TOFILE(TEST1/ABCD13) +
MBROPT(*REPLACE) CRTFILE(*NO)

CLOF OPNID(ABC13DEF)
DLTOVR FILE(ABC13DEF)

RUNQRY QRY(TEST1/CRADPAYDAT) QRYFILE(TEST1/ABCDC13)

Regards,

Martin Gilbert.

 23,625 pts.