RE: calling C from OPM RPG

["Bob Cozzi" <cozzi@xxxxxxxxx>]

Prototyping printf() was a challenge due to the polymorphic aspects of the
parameters. (Did I just use the "p" word in a sentence? Sorry.)
     D  printf         PR            10I 0 ExtProc('printf')
     D  szRecvBuff                     *   Value Options(*STRING)
     D  szFormat                       *   Value Options(*STRING)
     D                               10I 0 Value OPTIONS(*NOPASS)
     D                               10I 0 Value OPTIONS(*NOPASS)

You can add as many parms as you need to. For a string value, use the
following:

     D  printf         PR            10I 0 ExtProc('printf')
     D  szRecvBuff                     *   Value Options(*STRING)
     D  szFormat                       *   Value Options(*STRING)
     D                                 *   Value OPTIONS(*STRING:*NOPASS)
     D                                 *   Value OPTIONS(*STRING:*NOPASS)
     D                                 *   Value OPTIONS(*STRING:*NOPASS)
     D                                 *   Value OPTIONS(*STRING:*NOPASS)


I usually use this prototype only an then just convert the numeric value to
character and pass them in like this:

   Printf(szBuffer : 'Name: %s  Age: %s':%trimR(USRNAME):%char(age))

Make it a bit easier than having umpteen prototypes for printf.

-Bob Cozzi


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Joep Beckeringh
Sent: Wednesday, September 15, 2004 9:35 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: calling C from OPM RPG

I like 'all you have to do is prototype the call', especially in combination

with printf() :-)

Joep Beckeringh


CWilt@xxxxxxxxxxxx wrote:

> Jared,
> 
> Just an FYI, but in regards to ILE RPG --> ILE C.  An ILE RPG program can
> call and directly make use of any (most?)  functions in the ILE C/C++
> runtime library....
> 
> atoi(), bsearch(), fopen(), printf(), ....
> 
> 
> all you have to do is prototype the call and specify the use of the QC2LE
> binding directory.
> 
> 
> HTH,
> Charles

--
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.