• Subject: RE: what is unclear about 01 02 03 -Reply
  • From: Eric <Eric@xxxxxxxxxx>
  • Date: Mon, 4 May 1998 11:19:32 -0700

Come on Terry, this routine obviously calls for a GOTO statement! :>

Eric Kempter
Director of MIS
Commair Mechanical Services

-----Original Message-----
From:   Terry Herrin [SMTP:therrin@isaac.net]
Sent:   Sunday, May 03, 1998 7:32 PM
To:     MIDRANGE-L@midrange.com
Subject:        Re: what is unclear about 01 02 03 -Reply

JFlanary <JFlanary@aol.com> wrote:
>Don't forget that indicator on the ENDDO opcode 
>                        DO         100             X
>                        IF           FRED   = "RED HAIR"
>                        MOVE     '1'             *IN50 
>                        END
> 50                   END

Yeesh!!  I support a lot of older code, but I've never come across
this one.  I guess when indicator 50 is on the loop will end?
Hmmm...looks to me like you should have used LEAVE instead.  <snicker>

Terry Herrin
Sr. Programmer/Analyst
New Hanover Regional Medical Center

| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com

This thread ...

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

This mailing list archive is Copyright 1997-2019 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].