Re: Record Number / RPG cycle

["Nelson C. Smith" <ncsmith@xxxxxxxx>]

BugBusters used to sell a great layout tool.  It worked exactly like SDA
except you could see and work with all the formats at once.  The learning
curve was zero.  A really nice tool.  And, no I don't work for them.

----- Original Message -----
From: <boothm@earth.Goddard.edu>
To: <RPG400-L@midrange.com>
Sent: Thursday, February 17, 2000 12:06 PM
Subject: Re: Record Number / RPG cycle


> My gosh, I hadn't thought of that.  With OPNQRYF the cycle suddenly makes
> RPG programming really simple again.  Add in L1 and we have the simple RPG
> of years ago.   Now, if there was a reasonable report printing layout
> tool.....
>
> _______________________
> Booth Martin
> boothm@earth.goddard.edu
> http://www.spy.net/~booth
> _______________________
>
>
>
>
> "Tadashi K." <tadashii@tk.airnet.ne.jp>
> Sent by: owner-rpg400-l@midrange.com
> 02/17/2000 03:04 AM
> Please respond to RPG400-L
>
>
>         To:     RPG400-L@midrange.com
>         cc:
>         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
> +---
>

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