It won't work for nested parentheses.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [[email protected]] on behalf of Jack Zukt [[email protected]] Sent: Tuesday, May 2, 2023 3:02 AM To: [email protected] Subject: Re: REXX parse parens Hi This should work Parse arg opt Parse value opt with "(" opt") " If pos(" (", opt) >0 then Parse value opt with opt" ("member")" Do End Regards Jack On Tue, May 2, 2023, 00:31 Frank Swarbrick <[email protected]> wrote: > The following is a simplified version of some code from IBM's CEEBLDTX, > placed in to an EXEC I've named PARENS: > > Parse Arg option > Parse Var option varOpt '(' valueOpt ')' > Say varOpt > Say valueOpt > > This handles a simple dataset name, e.g.: > > Test1: PARENS COBOL(TEST): > Results1: > COBOL > TEST > > But it doesn't work for a PDS member to following, also surrounded by > parentheses: > > Test2: PARENS COBOL(TEST(MEMBER)) > Results2: > COBOL > TEST(MEMBER > > Any simple REXX parse option to handle this, or do I need to resort to > more complex REXX? Or do I just add a trailing paren if there is a leading > one in valueOpt? Perhaps that's the simples answer. > > Frank > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
