Re: Record Number / RPG cycle

[boothm@xxxxxxxxxxxxxxxxx]

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