Re: Record Number / RPG cycle

Hi, Dan

Comments are in line: 

On Thu, 17 Feb 2000 16:51:15 -0500
"Bale, Dan" <DBale@TFSA.Textron.com> wrote in "RE: Record Number / RPG cycle":

  > Well... your English seemed O.K., except when you mentioned "RPG cycle" and
  > "godsend" and "genius" in the same breath!  Maybe a translation mix-up?  ;-)

Oh, you're right. Excuse me. Maybe the genius person is a godsend <g>. 

  > Seriously, though, the RPG cycle is useful for level break processing.
  > Makes quick work out of writing a report application.
  > I never fully grasped the benefits of using matching records on the AS/400
  > (maybe the S/36?)

Yes, recently I used the matching records function of RPG. I took much time
to finish it. It got 2 records at one cycle, and it was hard to use.

Best regards.

Tadashi


  > 
  > - Dan Bale
  > 
  > -----Original Message-----
  > From: Tadashi K. [mailto:tadashii@tk.airnet.ne.jp]
  > Sent: Thursday, February 17, 2000 3:04 AM
  > To: RPG400-L@midrange.com
  > Subject: Re: Record Number / RPG cycle
  > 
  > 
  > Hi, Carl,
  > 
  > I'm a Japanese programmer and I'm an old geezer, too <g>. For me, an RPG
  > cycle is a light and rapid method. And OPNQRYF or SQL can be a solution for
  > problem of the RPG cycle.
  > 
  > I think the RPG cycle is a kind of godsend software. A genius made such
  > routine, I believe. It is a sort of an art...
  > 
  > Sorry for my poor English. I like the word 'old geezer' in your message. I
  > can study English in this list, too. :-)
  > 
  > Best regards.
  > 
  > Tadashi
  >   
  > On Wed, 16 Feb 2000 19:23:05 -0330
  > "Carl Pitcher" <cpitcher@roadrunner.nf.net> wrote in "RE: Record Number /
  > RPG
  > cycle":
  > 
  >   > Maybe I can be officially included in the "old geezer" section for this
  >   > reply ... if you define your file as input, primary and don't specify
  > key,
  >   > just set up a counter as the cycle processes the file sequentially and
  >   > you've got yourself the record number in ascending sequence.  Without
  > using
  >   > the cycle,  an alternative method is to use the file information data
  >   > structure (binary 397 - 400) for the relative record number.  This
  > method
  >   > would probably force most of us to get out the manuals for the INFDS
  > layout.
  >   > It's a matter of choice but let's not get rid of the cycle without
  > coming up
  >   > with a new name for RPG.  Suggestions for a new name anyone?
  >   > 
  >   > -----Original Message-----
  >   > From: owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]On
  >   > Behalf Of Jim Langston
  >   > Sent: Wednesday, February 16, 2000 1:16 PM
  >   > To: RPG400-L@midrange.com
  >   > Subject: Record Number
  >   > 
  >   > 
  >   > I am searching through a file for some strings, and I need to find out
  >   > what the record numbers are.  I am opening the file Input, Full
  > Procedural,
  >   > externally described, and as I understand it, this uses sequential
  >   > processing,
  >   > that is, record numbers.
  >   > 
  >   > Once I find my string, how do I find out what record number I am
  > actually
  >   > on?  Until I find out I am going to just increment a counter and hope
  > it's
  >   > right, but as we all know, deleted records mess this up.
  >   > 
  >   > Thanks.
  >   > 
  >   > Regards,
  >   > 
  >   > Jim Langston
  >   > 
  > /* ---------------------------------------------------------*/
  >                        Tadashi Kakefuda
  >  The Internet Mail Address ; tadashii@tk.airnet.ne.jp
  >    * Official site ; http://www2c.airnet.ne.jp/as400/
  >  /*----------------------------------------------------------*/
  > +---
  > | 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
  > +---
  > 

/* ---------------------------------------------------------*/
                       Tadashi Kakefuda
 The Internet Mail Address ; tadashii@tk.airnet.ne.jp
   * Official site ; http://www2c.airnet.ne.jp/as400/
 /*----------------------------------------------------------*/
+---
| 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
+---