Re: INLR no longer required?

My guess is that the OP's LR or return is not the last line of the main
proc...

I usually put *INLR and Return in a subprocedure EndProgram.

I once forgot to call that and my program continued to cycle back to the
first line of the program.



On Thu, Nov 21, 2013 at 11:23 PM, Scott Klement
<rpg400-l@xxxxxxxxxxxxxxxx>wrote:

LR has not been required since the RETRN opcode was added to RPG/400,
quite a long time ago.

Several people have stated that all you need is a 'return' in your
program. That's not quite true, the return needs to be in the MAIN
procedure of the module, and you will not need LR. If you don't have a
return in the main procedure (but do have it in subprocedures) that
should still trigger a 'can't see how program would end' compiler error.
LR, however, can be anywhere in the module (LR is global, so it
doesn't matter if it's in a subprocedure.)

If you are writing a nomain or linear-main module, you likewise will not
need either LR or RETURN (except in subprocedures that return values.)

The fact that you say your program is looping indefinitely makes me
think that this is a cycle-main procedure (i.e. a traditional main
procedure) and that neither LR nor RETURN is occurring. This doesn't
mean, however, that they aren't in the code somewhere... they might be
in some code that's not being called, maybe because it's conditioned, or
something like that.

Either way, this should be easy to fix.


On 11/21/2013 3:17 PM, Englander, Douglas wrote:

We are on V7R1. I just compiled a program that did not reference LR

anywhere. It compiled. I ran it, and it does not stop.

Is this a new enhancement that we can compile RPG programs without LR?

This program does not use primary files either. I was expecting the "I
can't determine how the program ends" error message from the compiler, but
instead got a 00 highest severity message.

Doug

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.