At 06:40 AM 12/3/1997 +0000, you wrote:
>Vernon Hamberg wrote:
>> I suspect every call to a CLP requires reinitialization—along the lines of
>> turning on *INLR in RPG.
>That's sort of what I've accepted (heard it before), but it made me
curious of
>the purpose of the RETURN code.
>If it doesn't return without ending, the best I've been able to figure out is
>that it is preferred to a GOTO to a labeled ENDPGM.
>But then again, this "common knowledge" may be unfounded.  I'm sure that
>on this list will set us straight. :)

RETURN (RETRN) is required for an RPG to end when *INLR is not turned on.
Tuening *INLR *ON is sufficient to end a program—RETRN is not needed here.

Personally, I prefer to use IF, FOR, DO, WHILE blocks rather than tags and
GOTOs, etc. Although it is often done, I don't think there's a _need_ to
use multiple return points, which, IMHO, are thinly veiled "GOTO's to a
labeled ENDPGM".

Do I hear the mob advancing on this thread?


Vernon Hamberg
Systems Software Programmer
Old Republic National Title Insurance Company
400 Second Avenue South
Minneapolis, MN  55401-2499
(612) 371-1111 x480

| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "".
| To unsubscribe from this list send email to
| Questions should be directed to the list owner/operator:

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 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].