RE: update files

[Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>]

I have apologised to Alan privately.  I did not intend this to go to the
list.  I regret having done it and certainly never intended to expose any
member of the list to public ridicule.

I take full responsibility for the content and any injury and or
embarrassment I may have caused anyone.

> -----Original Message-----
> From: Joel Fritz [mailto:JFritz@sharperimage.com]
> Sent: Wednesday, January 05, 2000 2:29 PM
> To: 'RPG400-L@midrange.com'
> Subject: RE: update files
> 
> 
> This guy sounds like he learned from Ira and Carmelo.  You 
> get the full
> flavor if you read the message on the bottom first.  The guy 
> who posted the
> original question is a system admin who has just gotten his 
> first as/400.
> From other postings he seems like a reasonable human being 
> who actually
> knows something about computers in general.  He ended up 
> using a 5 or 10
> line RPG program someone else posted.
> 
> > -----Original Message-----
> > From: Alan Campin [mailto:Alan.Campin@CaseLogic.com]
> > Sent: Wednesday, January 05, 2000 10:20 AM
> > To: 'RPG400-L@midrange.com'
> > Subject: RE: update files
> > 
> > 
> > Could you use SQL? Perfect place for it. Set at a time 
> > processing. SQL is
> > available on every AS/400 even if you do not have the SQL Package. 
> > 
> > Using only RPG, I would recommend you build a CL driver, 
> > issue an OPNQRYF to
> > select records, override data base to point to a file named 
> > input and call
> > your RPG to read all the records as Update, Primary. Then 
> > your program only
> > needs to change 'A' to 'X' and issue an update.
> > 
> > All of this is a lot of work vs. just using an UPDATE 
> > statement in SQL.
> > 
> > -----Original Message-----
> > From: Art Baker [mailto:Art_Baker@baan.com]
> > Sent: Wednesday, January 05, 2000 10:38 AM
> > To: 'RPG400-L@midrange.com'
> > Subject: FW: update files
> > 
> > 
> > Hello,
> >     I looking to update a data file with RPG. Normally I've 
> > been using
> > UPDDTA and changing the records, when required, but in this 
> > case there is
> > over 900 records that needed to be updated. My question is 
> > which command to
> > use, SETLL, READE or CHAIN. There are two things to look for 
> > in this file,
> > DTYPE
> > and DDSTAT. The DTYPE to look for is JRNL and the DDSTAT to 
> > look for is 'A'.
> > Both JRNL and 'A' need to be true then, change the 'A' to an 'X'.
> > Thanks for any advice,
> > Art 
> > +---
> > | 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
> +---
> 
+---
| 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
+---