Re: reading a sfl twice -- RPG400-L

Chaining to subfile is preferred and good solution.  Setting RRN to 0 does 
not sound quite correct for reading from the top. However, SFLNXTCHG *on  
will guarantee the whole sfile is read the first time if each rcd was 
written with the corresponding ind '*ON'.




>From: VWilliamson@glazers.com
>Reply-To: RPG400-L@midrange.com
>To: RPG400-L@midrange.com
>Subject: Re: reading a sfl twice
>Date: Thu, 19 Apr 2001 15:05:41 -0500
>MIME-Version: 1.0
>Received: from [192.160.127.90] by hotmail.com (3.2) with ESMTP id 
>MHotMailBCA8946000A440043110C0A07F5A0D8E0; Thu Apr 19 13:24:06 2001
>Received: (from uucp@localhost)by uucphost.mcs.net (8.11.1/8.11.1) with 
>UUCP id f3JKN5G71428;Thu, 19 Apr 2001 15:23:05 -0500 (CDT)(envelope-from 
>rpg400-l-owner@midrange.com)
>Received: from localhost (mail@localhost)by linux.midrange.com 
>(8.9.3/linuxconf) with SMTP id PAA24212;Thu, 19 Apr 2001 15:15:55 -0500
>Received: by linux.midrange.com (bulk_mailer v1.13); Thu, 19 Apr 2001 
>15:15:53 -0500
>Received: (from majordom@localhost)by linux.midrange.com (8.9.3/linuxconf) 
>id PAA23958for rpg400-l-outgoing; Thu, 19 Apr 2001 15:15:39 -0500
>Received: (from uucp@localhost)by linux.midrange.com (8.9.3/linuxconf) with 
>UUCP id PAA23921for RPG400-L@midrange.com; Thu, 19 Apr 2001 15:15:35 -0500
>Received: from ns.glazers.com ([12.45.136.66])by uucphost.mcs.net 
>(8.11.1/8.11.1) with SMTP id f3JK8EY67832for <RPG400-L@midrange.com>; Thu, 
>19 Apr 2001 15:08:14 -0500 (CDT)(envelope-from VWilliamson@glazers.com)
>Received: from go_nt_server by ns.glazers.com          via smtpd (for 
>Uucp1.mcs.net [192.160.127.93]) with SMTP; 19 Apr 2001 20:04:46 UT
>From rpg400-l-owner@midrange.com Thu Apr 19 13:26:02 2001
>X-Mailer: Lotus Notes Release 5.0.5  September 22, 2000
>Message-ID: <OF35B6B36F.7FE7CBEC-ON86256A33.006DD77B@glazers.com>
>X-MIMETrack: Serialize by Router on GO_NT_SERVER/GLAZER(Release 5.0.7 
>|March 21, 2001) at 04/19/2001 03:05:38 PM
>Sender: owner-rpg400-l@midrange.com
>X-List-Name: RPG/400 Discussion Mailing List (RPG400-L@midrange.com)
>
>
>When I have done this in the past, even with the sflnxtchg on, the second
>time through I have to reposition the pointer or whatever it's called at
>the beginning of the subfile.  Since setll is illegal for subfiles, I chain
>with relative record one.  From then on readc works.  It's just like
>reading a disk file.  Once you have read it, you have to reposition at the
>beginning to read it again.
>
>Is there a better way to do this?  I'd be interested to know.
>
>Valene M. Williamson
>IBM Certified Specialist
>vwilliamson@glazers.com
>972-448-8018
>
>
>
>                     "Jim Franz"
>                     <jfranz@triad.rr.        To:     
><RPG400-L@midrange.com>
>                     com>                     cc:
>                     Sent by:                 Subject:     Re: reading a 
>sfl twice
>                     owner-rpg400-l@mi
>                     drange.com
>
>
>                     04/19/01 12:00 PM
>                     Please respond to
>                     RPG400-L
>
>
>
>
>
>
>set ind on for sflnxtchg & update sfl (not control). Then next readc of
>same
>sfl records will read all of them as changed
>records. Good for read for errors & then read for update.
>jim
>----- Original Message -----
>From: <saustad@deltadentalwi.com>
>To: <rpg400-l@midrange.com>
>Sent: Thursday, April 19, 2001 2:00 PM
>Subject: reading a sfl twice
>
>
> > Is there a method for reading thru a sfl twice using READC?  We have a
> > situation where after we EXFMT, we need to "READC" thru the sfl twice.
> > I was thinking of using the SFLNXTCHG without an indicator.  We checked
>the
> > midrange archives, and there was something about doing a WRITE to the
> > sfl control rcd fmt between the two READC loops to reposition the sfl to
> > the beginning.  I'm having difficulty getting this to work.
> > Thanks for any help.
> >
> > +---
> > | 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
> > +---
>
>+---
>| 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
>+---
>
>
>
>+---
>| 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
>+---

_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com

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