I'll repeat the suggestion to run it thought PIPEDMEO EXEC, and add another suggestion: when in XEDIT on the EXEC, enter: QDI You can get QDI (it uses color to point our missing commas, parens, etc.) from the same web site: http://www2.marist.edu/~pipeline/
Another useful EXEC syntax checker is Guy De Ceulaer and Kris Buelens' CKRX package. A bit of time invested now in installing and getting even moderately familiar with PIPEDEMO, PDEM, QDI, and CKRX will save uncounted hours later. CKRX package details: ---<snip>--- CKRX is part of REXXG (Rexx Goodies): http://www.vm.ibm.com/download/packages/dscript.cgi?REXXG * CKRX - Perform a basic REXX syntax check (uses TRACE S) * EXECCALL - Execute/activate edited EXEC, XEDIT macro, FILELIST, ... * REXDATES - Show all formats REXX date() function * REXFINDS - Show syntax of REXX's searching functions * REXTIMES - Show all formats REXX time() function * XTOX - show result of all REXX data conversion functions (as C2X ) CKRX PACKAGE * CKRX EXEC * CKRX XEDIT * EXECCALL XEDIT * EXECCALL HELPXEDI * DOREXX XEDIT * REXTIMES EXEC * REXDATES EXEC * REXFINDS EXEC * XTOX EXEC * * Others, not mine, so can't pass them on * REXXTRY EXEC * * QDI XEDIT * * QDI REXX * ---<snip>--- Mike Walter Aon Corporation The opinions expressed herein are mine alone, not my employer's. -----Original Message----- From: CMSTSO Pipelines Discussion List [mailto:CMS-PIPELINES@VM.MARIST.EDU] On Behalf Of Frank M. Ramaekers Sent: Thursday, April 24, 2014 15:40 To: CMS-PIPELINES@VM.MARIST.EDU Subject: Re: SPEC with multiple IFs. 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 > > > > > > > > > >
