Re: Varying length parms.

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

I'm not sure that I understand what you're asking...  Do you want to allow 
the length of an e-mail address to vary from 1-200 characters (for 
example?)

Or do you want to be able to accept a variable number of addresses?

In either case, you can achieve the results by creating a *CMD interface 
for your program instead of using the CALL command to run it. (What you 
can do with the CALL command is limited because it doesn't know anything 
about the program it's calling.)

---
Scott Klement  http://www.scottklement.com

On Tue, 2 May 2006, Jake M wrote:

> Pro's,
> This might be a very simple question but I am newbie so here is my question.
> I have a small piece of RPGLE code which works great but I want to have
> varying length parms. Is it possible? The code that I have right now is as
> follows..
> *******************************************
>     H dftactgrp(*no) actgrp(*new)
>      * Define prototype for Java procedure call
>     Daccptargs4$main  PR                  STATIC
>     D                                     EXTPROC(
>     D                                       *JAVA:
>     D                                       'accptargs4':
>     D                                       'main')
>     D                                 O   CLASS(*JAVA:'java.lang.String')
>     D                                     DIM(3)
>     D                                     CONST
>     DString$new       PR              O   EXTPROC(
>     D                                       *JAVA:
>     D                                       'java.lang.String':
>     D                                       *CONSTRUCTOR)
>     D                                     CLASS(
>     D                                       *JAVA:
>     D                                       'java.lang.String')
>     D bytes                       1950A    CONST VARYING
>     Dargs             S               O   CLASS(
>     D                                       *JAVA:
>     D                                       'java.lang.String')
>     D                                     DIM(3)
>
>     c     *entry        plist
>     C                   PARM                    reclst           27
>     C                   PARM                    subj              4
>     C                   PARM                    msg               4
>      /free
>        args(1) = String$new(reclst);
>        args(2) = String$new(subj);
>        args(3) = String$new(msg);
>        accptargs4$main(args);
>        *INLR = *ON ;
>      /end-free
> **********************************************
>
> This works great if I do a 'CALL PGM(TESTING/SWR991TEST) PARM(
> jakemorkel@xxxxxxxxxxxxxxxx TEST TEST)' which has the first parm length =
> 27, second parm = 4, third parm = 4. I want to have the first second and the
> third parms of varying length so that when I call the program I could give
> the first parm as jacobmorkl@xxxxxxxxxxxxxxxx,
> matthewsparks@xxxxxxxxxxxxxxxx,...etc. Is this possible? Any guidance in
> this matter would be much appreciated.
>
> Thanks in advance,
>
> Jake.
> --
> 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.