If you need to include all 22 arguments, just make the last one bigger and
parse it a second time to get the results.
For example:
000001 /* REXX */
000002 rs = ALERTSN(SEV,TYPENAME,ELEMENT,DESC,STATUS,STSDESC, ,
000003 SUBSRC,SOURCE,LOCATION,SYSTYPE,PLTFTYPE,IMPACT,HOST, ,
000004 MONENV,RESOURCE,EXTRINFO,ACTIVE,CLOSING,FTPERR, ,
000005 APPLTYPE APPLNAME UNIQUE)
000006 EXIT 0
000007 ALERTSN:
000008 SAY ARG()
000009 SAY ARG(1)
000010 SAY ARG(5)
000011 SAY ARG(9)
000012 SAY ARG(10)
000013 SAY ARG(15)
000014 SAY ARG(20)
Notice that the last argument is separated by spaces to combine them all as a
single argument.
Adam
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Jantje.
Sent: Monday, April 09, 2018 9:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Many arguments to a Rexx function call
On Mon, 9 Apr 2018 09:37:20 -0400, Phil Smith III <li...@akphs.com> wrote:
>Then you're apparently calling it wrong. I see double commas in the
>error
>output: that suggests you have doubled commas in the wrong place,
>because if they're seen as continuation, ALERTSN won't see them at all.
Well... ALERTSN is not seeing any of it.
The error message is emitted while ALERTSNB is in control. ALERTSN is never
invoked.
Cheers,
Jantje.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
