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