The nested parentheses are more of a problem than the apostrophes. I would either do it with a CLIST or track down the PROC package; I doubt that there's a clean way to do it in straight classic REXX, and evev the regular expression package of ooRexx laxks some standard refex features that would help..
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [[email protected]] on behalf of David Crayford [[email protected]] Sent: Friday, February 28, 2020 6:48 AM To: [email protected] Subject: Re: Rexx parse using period as placeholder How to do this maintaining the quotes? That's needed for allocating the data set. Yet again, simple to do with a regex. On 2020-02-28 1:41 AM, Dale R. Smith wrote: > On Thu, 27 Feb 2020 17:30:03 +0000, Seymour J Metz <[email protected]> wrote: > >> The quotes were OK, the space between translate and the left paren was not. >> Fixing that >> >> parm="INDSN('HLQ.DSNAME(MEMBER)')" >> Parse Value Translate(parm,"","'")' ' With fill1 '(' val ') ' fill2;say >> 'fill1='fill1 'val='val 'fill2='fill2 >> >> gives me >> >> fill1=INDSN val= HLQ.DSNAME(MEMBER fill2=) >> >> Not only did it lose the RP, it also stripped off the apostrophes indicating >> that it was a FQDSN. >> >> >> -- >> Shmuel (Seymour J.) Metz >> http://mason.gmu.edu/~smetz3 > Try this: > Parse Value Space(Translate(parm,"","'"),0)' ' With . '(' val ') ' . > > (Forgot that Translate does not support translating to nulls.) > ---------------------------------------------------------------------- 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
