RE: How to create my own built-in functions

[Buck Calabro <buck.calabro@xxxxxxxxxxxxxxxxx>]

rbrightman wrote:

>Could you explain why RC is 10 long?

The 10u 0 definition means "unsigned integer."  It's nothing special, really
- very common in the C world and it's also used in many APIs.  You could
just as easily use 1a if you want.

>It seems that it should be longer to fit the 
>two parms "test" and "Buck" into it. 

rc is "return code."  It's purpose is to return a "success" or "failure"
indication to the caller.  The actual parameters are specified in the
D-specifications following the PR/PI.  Here, the parameters are MsgText and
MsgQueue.  The 10u 0 is the returned value.
D ShowMsg         pi            10u 0                                 
D   MsgText                     50    const                           
D   MsgQueue                    10    const                           

So, this function takes two parameters and returns one, thus: 
C                   eval      rc = ShowMsg('Test': 'BUCK')

>Also, is the procedure a separate 
>source from the calling program?

It doesn't have to be, but if you DO want it separate you need to compile it
separately as a module.  That module can be bound directly into the program
that uses it, or compiled into a service program which then gets bound to
the program that needs the function.

Buck Calabro
Aptis; Albany, NY
"We are what we repeatedly do.
 Excellence, then, is not an act, but a habit." --Aristotle


Billing Concepts Corp., a NASDAQ Listed Company, Symbol: BILL
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---