Re: Ending a program from within a procedure

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

> don't think about it much. It would be nicer to not have to utilize the LR
> indicator if you have all full procedural files. Or perhaps it should be an
> H-Spec... LRObsolote(*Yes). Or UseLR(*No)...

Okay, but then you'd lose the ability to end the program and leave the 
files open, etc. Granted, with the advent of service programs, that 
functionality isn't that useful -- but there are still a lot of people who 
use it.

If you do want an H-spec that forces the program to end when you run the 
RETURN op-code, but you don't want to have to set on *INLR for some 
reason, then you can code this:

     H DFTACTGRP(*NO) ACTGRP(*NEW)

Not a good idea if your program is called in a loop -- but then *INLR is 
only slightly better.