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

[email protected]
[email protected]
(925) 926-3179 (w)
(925) 323-2070 (c)
/sp


CMSTSO Pipelines Discussion List <[email protected]> wrote on
04/24/2014 01:40:29 PM:

> From: "Frank M. Ramaekers" <[email protected]>
> To: [email protected]
> Date: 04/24/2014 01:41 PM
> Subject: Re: SPEC with multiple IFs.
> Sent by: CMSTSO Pipelines Discussion List <[email protected]>
>
> 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-
>
> > [email protected]] On Behalf Of Kris Buelens
>
> > Sent: Thursday, April 24, 2014 3:24 PM
>
> > To: [email protected]
>
> > 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 <[email protected] <
> mailto:[email protected]> >:
>
> >
>
> > > 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: [email protected] <mailto:[email protected]>
>
> > > > Subject: SPEC with multiple IFs.
>
> > > > To: [email protected]
<mailto:[email protected]>
>
> > > >
>
> > > > 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
>
> > > >
>
> > > >
>
> > >
>
> > >
>

Reply via email to