RE: number of records in a file

["Reger, Bill" <breger@xxxxxxxxxx>]

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