[MI400] bound program access - built in number

["Steve Richter" <srichter@xxxxxxxxxxxxx>]

what is the "bound program access - built in number" mentioned in the mi
functional reference manual?

http://publib.boulder.ibm.com/iseries/v5r1/ic2924/tstudio/tech_ref/mi/CPYNV.
htm


I am curious how procedures like "_lbcpynv" and "ceedod" are implemented in
the rpg compiler as inline instead of procedure calls.

In RPGLE there are an entire series of built in functions which, I assume,
execute as inline functions.  Also, a lot of the "CEE" procedures like
CEEDOD ( get operational descriptor info ) CEEHDLR ( register a user written
condition handler ) are not invocation stack calls, but are implemented
inline.

Recently, while writing some rpg code to do data pointer like operations, I
noticed that the RPG compiler bombs when the procedure prototype of the
_LBCPYNV instruction is not correct.  It is the same compiler type of crash
that I would see when QPRCRTPG is called with an MI stmt with an incorrect
operand template value.

That indicates to me that the _LBCPYNV proc is also implemented as an inline
in the RPGLE compiler. And the RPGLE compiler is simply inserting the
contents of _LBCPYNV into the instruction stream without regard to the
actual code. More like a macro insertion of w-code or MI-code than anything
else.

So the question is, is it possible to compile and bind a user written
procedure, somehow tag it with a "built in number", then have the RPGLE
compiler implement that procedure as a "built in", that is INLINE call.

thanks,

-Steve Richter