|
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-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.