RE: OPNQRYF record count

[Roger Boucher <RBoucher@xxxxxxxxxxx>]

My memory may be fuzzy, but I could swear that even the POSDBF didn't
work in this situation a few years back?  I seem to remember years ago
being unable to find any way to reset the file to the beginning in a CL
program, and I know I tried POSDBF.  I know it works now, because I just
tested it!!!

Fuzzy memory?  Or has something changed?

Roger Boucher
Standard Pacific Corp.
rboucher@stanpac.com
714-668-4326


-----Original Message-----
From: Neil Brookes [mailto:NRB@ravensdown.co.nz]
Sent: Wednesday, March 10, 1999 5:12 PM
To: 'MIDRANGE-L@midrange.com'
Subject: RE: OPNQRYF record count


Just an observation. . . 
After performing a CPYFRMQRYF the pointer used to be left at the end of
the
file (not sure if this is still the case)
The next step after the copy is to perform a     POSDBF  OPNID(AAA)
POSITION(*START) 

Cheers
Neil

> -----Original Message-----
> From: Ravi [SMTP:ravi@spacestar.com]
> Sent: Thursday, 11 March 1999 07:15
> To:   MIDRANGE-L@midrange.com
> Subject:      Re: OPNQRYF record count
> 
> Joe,
> 
> You can RCVF in the CL and monitor for CPF0864 
> or
> CPYFRMQRYF into a temp file and RTVMBRD to check number of records in
> the member. 
> 
> Ravi
> Joe Giusto wrote:
> > 
> > Is there any way to see how many or if any records were selected
with an
> > OPNQRYF statement.  I would need to know this before calling the
next
> > program in the CL.
> > 
> > Thank you,
> > 
> > Joe Giusto II
> > Patuxent Publishing Company
> >  <mailto:jgiusto@patuxent.com> mailto:JGiusto@patuxent.com
> > http://www.lifegoeson.com <http://lifegoeson.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:
> david@midrange.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:
> david@midrange.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:
david@midrange.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: david@midrange.com
+---