Some programmers use DOW and some like to use DOU.  Example is below:
==========================================================================
C     PROKEY        SETLL     FRP003
C                   DOU       NOT %EQUAL(FRP003)
C     PROKEY        READE     FRP003
C                   IF        %EOF(FRP003)
C                   LEAVE
C                   ENDIF
*
C                   IF        FCCOD = 'DT'
C                   EVAL      ARRIVEDT = FCDAT
C                   EVAL      ARRIVETM = FCTIM
C                   ENDIF
*
C                   ENDDO
=================================================================





"Booth Martin" <booth@xxxxxxxxxxxx>@midrange.com on 05/19/2005 04:14:30 PM

Please respond to Midrange Systems Technical Discussion
       <midrange-l@xxxxxxxxxxxx>

Sent by:    midrange-l-bounces@xxxxxxxxxxxx


To:    "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
cc:

Subject:    RE: Is Iter passe'?


I suspect the original programmer was trying to avoid using a priming read
before the do loop?   Today we'd setll, read, and dow not %eof I believe,
with the next read being just before the enddo..



---------------------------------

Booth Martin

http://www.martinvt.com

---------------------------------

-------Original Message-------



From: Midrange Systems Technical Discussion

Date: 05/19/05 16:06:12

To: 'Midrange Systems Technical Discussion'

Subject: RE: Is Iter passe'?



The "Iter" operation definitely isn't passé, what you ought to be trying

to remove is the use of the conditioning indicators instead



-----Original Message-----

From: midrange-l-bounces@xxxxxxxxxxxx

[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of jns

Sent: 19 May 2005 20:05

To: midrange-l@xxxxxxxxxxxx

Subject: Is Iter passe'?



Hello, I was looking at a programmers code. They have things like

   dou *in99

read filex                 99

           99  Iter



How do you remove the use of iter these days?





--








As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.