Seems to work if you skip the "blank" together with () -----Ursprungligt meddelande----- Från: IBM Mainframe Discussion List <[email protected]> För Seymour J Metz Skickat: den 2 maj 2023 15:36 Till: [email protected] Ämne: Re: REXX parse parens
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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
