On Fri, 6 Apr 2018 15:55:48 +0000, Dyck, Lionel B. (TRA) wrote:

>This worked - the comma's needed to be literals:
>
>/*  REXX    */
>  parse value '1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22' with,
>    SEV TYPENAME ELEMENT DESC STATUS STSDESC SUBSRC SOURCE LOCATION SYSTYPE ,
>    PLTFTYPE IMPACT HOST MONENV RESOURCE EXTRINFO ACTIVE CLOSING FTPERR,
>    APPLTYPE APPLNAME UNIQUE
>
>  RS=ALERTSN(SEV','TYPENAME','ELEMENT','DESC','STATUS','STSDESC',' ,
>    SUBSRC','SOURCE','LOCATION','SYSTYPE','PLTFTYPE','IMPACT','HOST',' ,
>    MONENV','RESOURCE','EXTRINFO','ACTIVE','CLOSING','FTPERR',' ,
>    APPLTYPE','APPLNAME','UNIQUE)
>
I see only one argument there, not "many".  Is it possible that the real ALERTSN
(the one below appears to be a demo) accepts only one argument:

>say 'rs:' rs
>  exit
>alertsn:  procedure
>  arg opt 
>
This parses for only the first argument.

>  say opt
>
What did SAY display?

>  return opt

-- gil

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