IBM Manuals (was Cycle or Non-cycle ?)

[Colin Williams <Williamsc@xxxxxxxxxxxxxxxxx>]

To pick up on your [point about the IBM manuals. Many techniques are
illustrated in the IBM manuals, but a lot of the developers that I have
worked with have never even looked at them. They assume they have to
either

1)      Hassle others with questions without ever looking anything up.

2)      Pay about £50 (= $81.50 at current rates) for an AS/400 book on
a particular subject.

Why. Most sites have the AS/400 manuals on CD these days, and most of us
are using PC's aren't we. 

-----Original Message-----
From: rbbaird@premsys.com [mailto:rbbaird@premsys.com]
Sent: Monday, April 05, 1999 5:25 PM
To: RPG400-L@midrange.com
Subject: Re: Cycle or Non-cycle ?




All RPG programs (unless specifically instructed by a compile option - I
believe
they allow for that in a recent os version) include the cycle in the
program.

The program you show below bypasses cycle logic.  The program in your
previous
e-mail IS using the cycle.

And yes, the difference between them is the use of "P"rimary vs. "F"ull
procedural file processing.

The cycle is well documented and explained in the RPG manuals (on line).
The
cycle, while much maligned, isn't that hard to understand or use.  And
it can
save you a ton of time when doing multiple control break reporting.

Rick


                                                              
                                                              
                                                              
  To:          rpg400-l@midrange.com                          
                                                              
  cc:          (bcc: Richard B Baird/Premium/US)              
                                                              
                                                              
                                                              
  Subject      Cycle or Non-cycle ?                           
  :                                                           
                                                              







 Columns . . . :    6  76           Browse
OL86/DDSSRC
 SEU==>
P0114
 FMT FX
FFilename++IPEASF.....L.....A.Device+.Keywords+++++++++++++++++++++++++
        *************** Beginning of data
*************************************
0001.00 FEMP_MASTL IF   E           k DISK
0002.00 FEMP_REPORTO    E             PRINTER
0004.00  *
0005.00 DCOUNT            S              3  0
0006.00 C                   READ      REC
40
0007.00 C                   IF        *IN40 = *OFF
0008.00 C                   EVAL      COUNT = COUNT + 1
0010.00 C                   WRITE     DETAIL
0012.00 C                   ENDIF
0013.00  *
0014.00 C                   IF        *IN40 = *ON
0016.00 C                   WRITE     TOTAL
0018.00 C                   EVAL      *INLR = *ON
0019.00 C                   ENDIF


Hi, about this program, is it Cycle or Non-cycle? How can I know it?

Thanks.
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *