|
I don't think you can use the RTVMBRD to get the subsetted number of records. you need to do CPYFRMQRYF to a temporary file and then do a RTVMBRD on that. Vini ______________________________ Reply Separator _________________________________ Subject: RE: number of records in a file Author: Joe Giusto <JGiusto@patuxent.com> at ARO-INTERNET Date: 8/4/99 5:10 PM Does the RTVMBRD command work against an open query file? Joe Giusto II Patuxent Publishing Company <mailto:jgiusto@patuxent.com> mailto:JGiusto@patuxent.com http://www.lifegoeson.com <http://lifegoeson.com> -----Original Message----- From: Reger, Bill [SMTP:breger@levitz.com] Sent: Wednesday, August 04, 1999 6:58 AM To: 'RPG400-L@midrange.com' Subject: RE: number of records in a file Try RTVMBRD. William K. Reger Senior Project Manager Levitz Furniture Corporation Phone: (561) 994-5114 E-mail: breger@levitz.com > -----Original Message----- > From: Kmh0421@aol.com [mailto:Kmh0421@aol.com] > Sent: Wednesday, August 04, 1999 12:06 AM > To: RPG400-L@midrange.com > Subject: Re: number of records in a file > > > In a message dated 8/1/99 2:01:23 PM Central Daylight Time, > cmcd@radiks.net > writes: > > << Subj: > Date: 8/1/99 2:01:23 PM Central Daylight Time > From: cmcd@radiks.net (Mary Lynn Riggins) > Sender: owner-rpg400-l@midrange.com > Reply-to: <A > HREF="mailto:RPG400-L@midrange.com">RPG400-L@midrange.com</A> > To: RPG400-L@midrange.com (RPG LIST) > > I have a CL program which uses an OPNQRYF to select certain > data requested by > user. > > I then want to check the record count to see if any records > have been > selected, > if no records are selected I do not want to process the > subsequent RPG > program. > > I tried looking at using the RTVOBJA and RTVOBJD cmds, but I > don't see > anything > that would give me a record count. Perhaps I'm missing it. > If anyone has > any > ideas on a proper process for this I would appreciate your insights. > > Thank you, > > Mary Lynn Riggins > > Mary; check out RTVMBRD QTEMP/OBJLIST NBRCURRCD(&NBRCURRCD) > > hope this helps; > Kathie > +--- > | This is the RPG/400 Mailing List! > | To submit a new message, send your mail to RPG400-L@midrange.com. > | To subscribe to this list send email to RPG400-L-SUB@midrange.com. > | To unsubscribe from this list send email to > RPG400-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: > david@midrange.com > +---END > +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---END +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---END +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---END
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.