Re: For/endfor loop

[dkahn@xxxxxxxxxxxxxxxxx]

"Booth Martin" <booth@xxxxxxxxxxxx> wrote:

> If I understand correctly the for/endfor loop would do the
> following:
>
> If we define SFLRECS as SFLSIZE(&SFLRECS) and wCount as like(SFLRECS)
> then the for loop looks like this:
>
>  C                   for       wCount = 1 to SFLRECS
>  C  wCount   chain   SFL
>  C                   exsr    PrintLine
>  C                  endfor
>
> This is all that is needed.  No priming chain or read, no need to
> set wCount to 1, no need to increment wCount, and no need to worry
> about %eof.
>
> This is much leaner, clearer, and intuitive to my mind.
>
> That is, if I have understood what he said correctly???

Booth, yes I think you've got it. However, you can also do the same thing
with DO/ENDDO using the traditional syntax:

C                   do        SFLRECS       wCount
C  wCount   chain   SFL
C                   exsr    PrintLine
C                   enddo

If you want to implement this loop using free format calc specs you cannot
use DO/ENDDO but you can still use FOR/ENDFOR.

--
Dave...
               _________  ,___o
             __________   _\ <;_        http://www.audax.uk.net
           ___________   (_)/ (_)       http://www.twickenhamcc.co.uk
=======================================================
The opinions expressed in this communication are my own and do not
necessarily reflect those of my employer.


______________________________________________________________________
This message may contain confidential information which may also be legally 
privileged and is intended only for the use of the parties to whom it is 
addressed. If you are not an intended recipient you are hereby notified that 
any disclosure, copying, distribution or use of any information in this e-mail 
is strictly prohibited. If you receive this message in error please notify the 
sender by return e-mail and then destroy it. Further, we make every endeavour 
to keep our network free from viruses. However, you do need to verify that this 
e-mail and any attachments are free of viruses as we can take no responsibility 
for any computer viruses which might be transferred by way of this e-mail. All 
information and attachments remain the property of Stolt Offshore Group and 
should be held as confidential.