On 10/04/2018 5:31 AM, Gerhard Adam wrote:
Just seems like a lot of discussion trying to pass 22 arguments, when the limit 
is 20.

And 20 arguments is still wildly excessive. It's long been accepted that any more than 7 arguments are difficult to comprehend and an alternative design should be implemented. Even 7 is excessive, I don't like to go beyond three arguments before I redesign to use a context. This has been solved in other languages by using design patterns like builders but the problem with REXX is that it doesn't support object types so you can't pass contexts around. Stem variables don't cut it because you can't pass them to external functions.

After that it's merely a question of how you can convey the information using 
whatever means you have available.

Sent from my iPhone

On Apr 9, 2018, at 12:41 PM, Paul Gilmartin 
<0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

On Mon, 9 Apr 2018 09:29:22 -0700, Gerhard Adam  wrote:

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
...
Notice that the last argument is separated by spaces to combine them all as a 
single argument.
This depends on a couple things:
o That ALERTSN is written in Rexx, or at least that the OP has the source so he
  can modify it.
o That the "combined" arguments contain no internal blanks, which makes parsing
  more complicated.

-- gil

----------------------------------------------------------------------
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

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to