I would be tempted to call this abuse of the spec stage ... I'd suggest | a: if locate 6.3 /MVS/ | spec ... | a: | b: if locate 6.3 /MON/ | spec ... | b: | a:
Actually, I'm pretty sure I would code a 'lookup' that matches the 3-char key in the table and picks up the snippet to append to the record... Rob On 25 April 2014 15:12, Hobart Spitz <orexx...@gmail.com> wrote: > Mike said: > > I think this is one of those cases where specs requires that a string > be > > delimited specifically with double quotes. > > I'm tempted to say that there is no such thing, but I've learned that such > statements are risky. If there is, I'd like to know for sure; if not, we > owe it to the list to get the correct answer. > > That said, I would go back to the original, and run it with TRACE I, and > repost the results with a mono-spaced font. Perhaps there is are two > single quotes that look like a double quote, or vice versa, e.g.. > > > > > On Thu, Apr 24, 2014 at 9:24 PM, Frank M. Ramaekers > <framaek...@ailife.com>wrote: > > > Yes, double-quotes did the trick. Never would have guessed. > > > > Frank M. Ramaekers Jr. > > > > > -----Original Message----- > > > From: CMSTSO Pipelines Discussion List [mailto:CMS- > > > pipeli...@vm.marist.edu] On Behalf Of Michael Harding > > > Sent: Thursday, April 24, 2014 4:29 PM > > > To: CMS-PIPELINES@VM.MARIST.EDU > > > Subject: Re: [CMS-PIPELINES] SPEC with multiple IFs. > > > > > > I think this is one of those cases where specs requires that a string > > be > > > delimited specifically with double quotes. > > > > > > -- > > > Mike Harding > > > z/VM System Support > > > > > > mhard...@us.ibm.com > > > mikehard...@mindless.com > > > (925) 926-3179 (w) > > > (925) 323-2070 (c) > > > /sp > > > > > > > > > CMSTSO Pipelines Discussion List <CMS-PIPELINES@vm.marist.edu> wrote > > on > > > 04/24/2014 01:40:29 PM: > > > > > > > From: "Frank M. Ramaekers" <framaek...@ailife.com> > > > > To: CMS-PIPELINES@vm.marist.edu > > > > Date: 04/24/2014 01:41 PM > > > > Subject: Re: SPEC with multiple IFs. > > > > Sent by: CMSTSO Pipelines Discussion List > > > > <CMS-PIPELINES@vm.marist.edu> > > > > > > > > After correcting the missing comma and using ELSEIF, it ends with a > > > cryptic: > > > > > > > > > > > > > > > > "| SPEC /UAGLOBE/ 1.8 1-* NW RECNO FROM" X2D(F800) "D2X NW.4 > > > > RIGHT a: 6.3 .", > > > > > > > > "IF a==/MOD/ THEN", > > > > > > > > > > > "/C/ NW", > > > > > > > > > > > "ELSEIF a==/MVS/ THEN", > > > > > > > > > > > "/C/ NW", > > > > > > > > > > > "ELSE", > > > > > > > > > > > "/R/ NW", > > > > > > > > > > > "ENDIF", > > > > > > > > > > > PIPYAC1434E Parse error in state 137, unexpected O_MULT at offset 3: > > > > "/MOD/ THEN /C/ NW ELSEIF a==/MVS/ THEN /C/ NW ELSE /R/ NW ENDI > > > > > > > > F". > > > > > > > > > > > PIPMSG003I ... Issued from stage 2 of pipeline 11. > > > > > > > > > > > PIPMSG001I ... Running "SPEC /UAGLOBE/ 1.8 1-* NW RECNO FROM 63488 > > > D2X > > > > NW.". > > > > > > > > PIPYAC1435I Expecting T_IDLETTER T_NUMBER T_QSTRING T_IDENT > > > T_ID_CHAR > > > > T_CTR T_DOT T_DOTDOT T_CTRARRAY S_LP O_PLUS O_NOT F_FIRST F_EO > > > > > > > > F F_BREAK F_C2D F_C2F F_X2D F_X2F F_STRING F_AVERAGE F_VARIANCE > > > > F_NUMBER F_EXACT F_SQRT F_STDDEV F_STDERRMEA > > > > > > > > PIPSPE192I ... Scan at position 69; previous data "OM 63488 D2X NW.4 > > > > RIGHT a: 6.3 . IF a==/". > > > > > > > > > > > > > > > > Frank M. Ramaekers Jr. > > > > > > > > > > > > > > > > > > > > > > > > > -----Original Message----- > > > > > > > > > From: CMSTSO Pipelines Discussion List [mailto:CMS- > > > > > > > > > pipeli...@vm.marist.edu] On Behalf Of Kris Buelens > > > > > > > > > Sent: Thursday, April 24, 2014 3:24 PM > > > > > > > > > To: CMS-PIPELINES@VM.MARIST.EDU > > > > > > > > > Subject: Re: [CMS-PIPELINES] SPEC with multiple IFs. > > > > > > > > > > > > > > > > > > I don't know if that will help: PIPE alos has ean ELSEIF > > > > > > > > > > > > > > > > > > "ELSEIF a==/MVS/ THEN", > > > > > > > > > "/C/ NW", > > > > > > > > > > > > > > > > > > > > > > > > > > > Kris Buelens, > > > > > > > > > --- freelance z/VM consultant, Belgium --- > > > > > > > > > > > -------------------------------------------------------------------- > > > > > --- > > > > > > > > > > > > > > > > > > > > > > > > > > > 2014-04-24 22:19 GMT+02:00 Joe Parker <jgp4...@hotmail.com < > > > > mailto:jgp4...@hotmail.com> >: > > > > > > > > > > > > > > > > > > > Well, it's been quite a few years since I wrote any pipe code, > > > but.... > > > > > > > > > > could it be there's a comma missing in the first line? > > > > > > > > > > > > > > > > > > > > > Date: Thu, 24 Apr 2014 15:13:22 -0500 > > > > > > > > > > > From: framaek...@ailife.com <mailto:framaek...@ailife.com> > > > > > > > > > > > Subject: SPEC with multiple IFs. > > > > > > > > > > > To: CMS-PIPELINES@VM.MARIST.EDU > > > <mailto:CMS-PIPELINES@VM.MARIST.EDU> > > > > > > > > > > > > > > > > > > > > > > I can't seem to find information on what could be wrong with > > this: > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > "| SPEC /xxxx/ 1.8 1-* NW RECNO FROM" X2D(F800) "D2X NW.4 > > > RIGHT a: > > > > > > > > > > > 6.3 ." > > > > > > > > > > > > > > > > > > > > > > "IF a==/MOD/ THEN", > > > > > > > > > > > > > > > > > > > > > > "/C/ NW", > > > > > > > > > > > > > > > > > > > > > > "ELSE", > > > > > > > > > > > > > > > > > > > > > > "IF a==/MVS/ THEN", > > > > > > > > > > > > > > > > > > > > > > "/C/ NW", > > > > > > > > > > > > > > > > > > > > > > "ELSE", > > > > > > > > > > > > > > > > > > > > > > "/R/ NW", > > > > > > > > > > > > > > > > > > > > > > "ENDIF", > > > > > > > > > > > > > > > > > > > > > > "ENDIF", > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > I'm not getting the output I expect (I don't see PIPE flagging > > > > > > > > > > > anything). I've only had single IF's in the past. > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > Frank M. Ramaekers Jr. | Systems Programmer | Information > > > Technology > > > > > > > > > > > | American Income Life Insurance Company | 254-761-6649 > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > OREXXMan >
