Hi Lou, For the roll-your-own solution you can use something like: DSPOBJD OBJ(*ALL/*ALL) OBJTYPE(*QRYDFN) OUTPUT(*OUTFILE) OUTFILE(QTEMP/XYZ) then read QTEMP/XYZ and for each query listed: RTVQMQRY QMQRY(QRYLIB/QRYNAME) SRCFILE(QTEMP/SOURCE) ALWQRYDFN(*YES) the source file will contain something like: H QM4 05 Q 01 E V W E R 01 03 00/11/14 22:37 V 1001 050 Customers with invalid code V 5001 004 *HEX SELECT ALL T_CUSNO, T_CUSNAM, T_CUSAD1, W_BLLCOD FROM LIBNAME/CUSTEXT T01 WHERE W_BLLCOD NOT IN ('1', '2', '3') Find the FROM clause and parse it and save the results. HTH, Peter Dow Dow Software Services, Inc. 909 425-0194 voice 909 425-0196 fax ----- Original Message ----- From: "Lou Forlini" <firstname.lastname@example.org> To: <MIDRANGE-L@midrange.com> Sent: Tuesday, November 14, 2000 7:48 PM Subject: File cross-reference for Query/400 > I have a client that has close to 1000 Query/400 objects, and > needs to get a file cross-reference listing for them. As far as I can > tell, DSPPGMREF won't do it, is there anything out there that can? > Roll-your-own and commercial solution suggestions welcome. > > Regards, > > - Lou Forlini > Software Engineer > System Support Products, Inc. > +--- > | This is the Midrange System Mailing List! > | To submit a new message, send your mail to MIDRANGE-L@midrange.com. > | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. > | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: email@example.com > +--- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: firstname.lastname@example.org +---
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.