RE: what is a bound program access built in number

That's the old MI instruction code, I believe.
In the RPG ToolKit (www.rpgiv.com/toolkit) I use the instruction you're
referring to, to convert data in raw fields into zoned.
Here's my call:

     C                   callp(e)  LBcpynv( pTarget : 
     C                                      %addr(DPA_Target) :
     C                                      pSource   :
     C                                      %addr(DPA_Source))

And here is the prototype for the late bound LBCPYNV instrction:

     D LBcpynv         PR                  ExtProc('_LBCPYNV')
     D   Recv_Value                    *   Value
     D   Recv_Attr                     *   Value 
     D   Src_Value                     *   Value
     D   Src_Attr                      *   Value



Bob Cozzi
Cozzi Consulting
www.rpgiv.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Steve Richter
Sent: Friday, December 12, 2003 12:07 PM
To: Chat. Rpg400-L
Subject: what is a bound program access built in number

I am looking at the _LBCPYNV api.  it is used to copy one numeric variable
to another in a generic, variable descriptor kind of way.  The call looks
something like this:
   _lbcpynv( %addr(receiver): %addr(ReceiverScalarDescriptor):
             %addr(source): %addr(SourceScalarDescriptor)) ;

I notice on v5r1 that if the prototype does not have the correct signature
the compile of the module bombs the rpg compiler.

which gets me thinking that procs like _LBCPYNV are probably not called like
standard procs are called, that is instead of an full ile invocation stack
call, I would guess the "call" is actually just implemented as inline code.
Similar to how CEEDOD and other such procs are implemented.

I am curious to know if I am correct on that.

also, what is meant by a bound program access built in number?  The built in
number of LBCPYNV is 129. How is that number used?

thanks,

-Steve

_______________________________________________
This is the RPG programming on the AS400 / 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.