RE: FW: IBM's RPG Strategy (was: Long Procedure Names)

["Wilt, Charles" <CWilt@xxxxxxxxxxxx>]

Steve,

Here's the example out of the manual:
class MyClass
{
  static
  {
    System.loadLibrary ("MYSRVPGM");
  }
  native boolean checkCust (byte custName[]);
  void anotherMethod ()
  {
    boolean found;
    // call the native method
    found = checkCust (str.getBytes());
  }
}

     
     H nomain
     
     Frec       IF   E           K DISK
     
     D checkCust       PR              N   EXTPROC(*JAVA:'MyClass':'checkCust')
     D  custName                    100A   VARYING CONST
     
     P checkCust       B                   EXPORT
     D checkCust       PI              N
     D  custName                    100A   VARYING CONST
      /free 
        chain custName rec;
        return %found;
      /end-free
     P checkCust       E    


Charles Wilt
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Steve Richter
> Sent: Thursday, March 24, 2005 2:01 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: FW: IBM's RPG Strategy (was: Long Procedure Names)
> 
> 
> On Thu, 24 Mar 2005 12:52:06 -0600, Joe Pluta
> <joepluta@xxxxxxxxxxxxxxxxx> wrote:
> > > From: Steve Richter
> > > >
> > > > You do realize that RPGIV can instantiate a Java class and call
> > member
> > > functions of that class already.
> > > >
> > >
> > > Hi Charles,
> > >
> > > No I am not. ( I only have v5r1 ).
> > 
> > This works fine on V5R1.  It's enhanced greatly in V5R2 and 
> V5R3, but so
> > are many other things.  If all you have is V5R1, you're 
> really not in a
> > very good position to discuss strengths or weaknesses of 
> the compiler.
> > 
> 
> post the code, I want to learn!  
> 
> How does java call an ile procedure?  I would like to see how that
> works.  Can java call the recio functions in ILE to write a green
> screen display file record?
> 
> -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.
> 
>