|
I am sorry, Scott. I was not very clear in my request. Right now I have the length of the parm set as 27 which is hard coded to accomodate jakemorkel@xxxxxxxxxxxxxxxx but I want to use something like jakemorkel@xxxxxxxxxxxxxxxx, michaelsparks@xxxxxxxxxxxxxxxx,...so I want to give multiple email addresses. Ofcourse, my program failed when I tried to do a CALL to the program and give the first parm as ' jakemorkel@xxxxxxxxxxxxxxxx, michaelsparks@xxxxxxxxxxxxxxxx'. So, the best way to go would be *CMD interface? I appreciate your help. Thanks, Jake. On 5/2/06, Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx> wrote:
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. > -- 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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
