Re: Read PF File in CL Program (RCVF)

["Jeffrey Young" <jefyoung@xxxxxxxxxxxxxxxx>]

In CL, the way you reset the file cursor after EOF is to use the POSDBF
command.  I think the option is *START or *FIRST.


Jeff Young
Dynax Resources, Inc
Certified AS/400 Technical Specialist
Certified AS/400 RPG Programmer
Certified AS/400 Professional System Administrator
----- Original Message -----
From: Sunil Kumar <skumar@RCCL.COM>
To: <RPG400-L@midrange.com>
Sent: Monday, July 26, 1999 1:00 PM
Subject: Read PF File in CL Program (RCVF)


>
>
> Can we  reposition and read  a physical file in CL Program ???? IF yes
Couldn't
> you give as some idea about this . Actually I tried to reposition and read
a
> same physical file in a cl Program  results end of file even though this
file
> contains enough record .
>
> Sunil
>
>
>
>
>
>
>
> John P Carr <jpcarr@tredegar.com> on 07/25/99 09:11:15 PM
>
> Please respond to RPG400-L@midrange.com
>
> To:   RPG400-L <RPG400-L@midrange.com>
> cc:    (bcc: Sunil Kumar/IT/MIA/RCL)
>
> Subject:  RE: Eval Exception Error Trapping
>
>
>
>
>
> >>The E operation extender should be supplanted with a keyword on the
header
> >>spec. That is something like:
> >>  H     ERROR(*IO | *ALLWAYS | *NONIO)
> >>Then we would not have to code that big-ass "E" for everything to check
> the
> >>%ERROR or %STATUS.
> >> Bob Cozzi
>
>
> Hans
>
> I'd vote for this suggestion.  That would cut down on the number of tags
you
> would have
> to remember Hans.    Then,   Give us the *NEXT on the factor 2 of the
*PSSR.
>
>
> John Carr
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> * This is the RPG/400 Discussion Mailing List!  To submit a new         *
> * message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
> * from this list send email to MAJORDOMO@midrange.com and specify       *
> * 'unsubscribe RPG400-L' in the body of your message.  Questions should *
> * be directed to the list owner / operator: david@midrange.com          *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>
>
>
>
>
>
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> * This is the RPG/400 Discussion Mailing List!  To submit a new         *
> * message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
> * from this list send email to MAJORDOMO@midrange.com and specify       *
> * 'unsubscribe RPG400-L' in the body of your message.  Questions should *
> * be directed to the list owner / operator: david@midrange.com          *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *