Re: RPG/SDA Question

Peter,

       Are you saying that you want to read all of the records in
your subfile, even if they havent been changed, using READC?

Normally, the way an application that uses READC functions is:

          1) Any desired data is loaded into the subfile from
                 a file.
          2) The subfile is presented to the user to make changes
                 in.
          3) The program uses READC to read (and validity check)
                 any record that a person has changed.

          4) Any records loaded in step 3 are updated with the
                 SFLNXTCHG indicator turned on.  This way they'll
                 get read again the next time through to see if the
                 errors were corrected.  In some applications all
                 changed records are re-marked changed, so the program
                 always knows which records have been changed in
                 this session -- other times you only mark the ones
                 with errors to ensure they'll be read again.

          5) Steps 2-4 are repeated until there are no errors, or
                 for whatever reason the program needs to continue.

          6) Now we can save them to disk.  Depending on whether
                 SFLNXTCHG was kept on for all changed records or
                 not, we could use READC again to determine which
                 need to be updated on disk.   Otherwise, we'll
                 just use the RRNs to read everything, and update
                 it that way.

If you truly want to read ALL records, not just the ones that a person
has changed, the best way to do this (or at least the way I do it) is
to use the CHAIN op-code with each RRN.   READC means "Read Changed".

Does that help?


Peter Trahan <peter.trahan@AURAFIN.com> wrote:
>
> In order for me to update the sfl rec, wouldn't have to read it.  An
>  if the
> readc isn't doing the read, then I would have to chain by RRN and if
>  do
> that I don't need the READC.  ???
>
> -----Original Message-----
> From: Chris Bipes [mailto:ChrisB@cross-check.com]
> Sent: Tuesday, August 03, 1999 11:29 AM
> To: 'RPG400-L@midrange.com'
> Subject: RE: RPG/SDA Question
>
>
> To re-set a record in a subfile as changed using the SFLNXTCHG keywo
>  you
> must update the subfile record.  Think of a subfile as a PF.  Think
>  the
> SFLNXTCHG as a flag that needs to be set.  I only use this after I
>  have read
> and processed the subfile record.  If it has an error, I set on the
> SFLNXTCHG indicator before I update the subfile record.  If there is
>  no
> error I set off the indicator.
>
> Of course if the user types any data on an input capable field with-
>  the
> subfile record, the sflnxtchg flag is set on by the system.  How is
>  control
> being returned to your program, via function key or enter key?  If
>  this does
> not give you enough, post your DDS and RPG relative to the subfile
> processing and I will look it over.
>
> Christopher K. Bipes  mailto:ChrisB@Cross-Check.com
> Sr. Programmer/Analyst  mailto:Chris_Bipes@Yahoo.com
> CrossCheck, Inc.      http://www.cross-check.com
> 6119 State Farm Drive  Phone: 707 586-0551 x 1102
> Rohnert Park  CA  94928  Fax: 707 586-1884
>
>
>
>
> > -----Original Message-----
> > From: Peter Trahan
> > Sent: Tuesday, August 03, 1999 8:48 AM
> > To: 'RPG400-L@midrange.com'
> > Subject: RPG/SDA Question
> >
> >
> > I have specified the SFLNXTCHG keyword at the record level of a
>  subfile,
> but when I do a READC to the subfile the records are not returned to
>  my RPG
> program.  I have tried specifying an indicator and turning it on and
>  without
> an indicator.  I put it in debug and the EOF indicator on the READC
> operation comes on with the first READC.  The help text in SDA says
>  that if
> I specify this keyword (SFLNXTCHG) (Subfile Next Change) that the
>  record
> will be returned to my program regardless of the operator actually
>  changing
> the record.  What am I missing?
+---
| 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