Coding the main method in a Java/RPG call

["Guliani, Vineet (IndSys, MFG Non GE)" <Vineet.Guliani@xxxxxxxxxxxxx>]

This is in response to Barbara's mail. I have marked her sentence to clarify
the context

//==========================================================================
==//
//
//
//The one thing you can't do using RPG is to pass zero arguments.  If you
//
//want to have your main support that, you'll have to allow a special
//
//first parm of something like "*NONE".
//
//
//
//==========================================================================
===

I was wondering if

        OPTIONS(*NOPASS) can be specified for the parameter on the call to
main.

Regards,
Vineet Guliani
Tata Consultancy Services


-----Original Message-----
From: Barbara Morris [mailto:bmorris@ca.ibm.com]
Sent: Friday, October 18, 2002 11:31 AM
To: rpg400-l@midrange.com
Subject: Re: Coding the main method in a Java/RPG call


Mike Silvers wrote:
>
> I was going to try to code the main method in an RPG/Java call, but I
> thought I would throw it out on the list to see if someone has an example.
> I am not sure how to code the String array for the arguments.  The main
> method should be rather straight forward as the example would be useful
for
> all implementations.  Any examples?
>

The single parameter is an array of String objects.  So you code the
parameter as a String object with the DIM keyword.

D SomeclassMain    pr         extproc(*JAVA : 'Someclass' : 'main')
D                             static
D   args                  O   class(*JAVA : : 'java.lang.String')
D                             dim(whatever) const

D newString        pr     O   extproc(*JAVA
D                                   : 'java.lang.String' : *constructor)
D   value              100a   varying const

D parms            s      O   like(newString)
D                             dim(2)
 ...
       parms(1) = newString('parm1');
       parms(2) = newString('this is parm  2');
       callp SomeclassMain (parms);

The one thing you can't do using RPG is to pass zero arguments.  If you
want to have your main support that, you'll have to allow a special
first parm of something like "*NONE".


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.