RE: File positioning

You might be able to use *START in factor 1 for the SETLL opcode.

Jon A. Erickson
Viking Industries, Inc.
http://www.vikingindustries.com <http://www.vikingindustries.com>  


                -----Original Message-----
                From:   boothm@ibm.net [mailto:boothm@ibm.net]
                Sent:   Wednesday, March 24, 1999 7:23 PM
                To:     RPG400-L@midrange.com
                Subject:        Re: File positioning

                to get to the beginning, why  not use a RRN number of 1 and
chain to it or setll?


                In <8825673C.006D52B8.00@gump.paramount.com>, on 03/22/99 
                   at 11:55 AM, "Rajeev Asthana"
<Rajeev_Asthana@paramount.com> said:

                >Hi,

                >I have a PF that I'm using in a RPG program.
                >After reading it till EOF, is there any way except
OPEN/CLOSE to position
                >it back to Begin of File?
                >If I'm using SETLL, it may not work 'cause I can only use
RRN and RRN
                >keep on changing on record addition/deletion.

                >Thanks,
                >Rajeev.


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


                -- 
                -----------------------------------------------------------
                boothm@ibm.net
                Booth Martin
                -----------------------------------------------------------

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