Re[2]: number of records in a file

     

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