Poking around in the dump a bit, I figured out I was probably exceeding a
counter's (#5) string capacity.  Coded around that and program now works
but is more complicated.

--
"Every palace and every work of art is only dust as yet unrealized, and
time is the patient wind that will wither it away." -- Dean Koontz, "The
Face"

Mike Harding
z/VM System Support
/sp


CMSTSO Pipelines Discussion List <[email protected]> wrote on
07/16/2015 10:18:05 AM:

> From: Michael Harding/Oakland/IBM@IBMUS
> To: [email protected]
> Date: 07/16/2015 10:18 AM
> Subject: Assertion failure?
> Sent by: CMSTSO Pipelines Discussion List <[email protected]>
>
> Any ideas?
> With latest plastic pipes,
>
> PIPINX409E Assert failure 000001C4 at 01EF7632.
> PIPINX411I ... In FPLSPSRL; offset 000008DA in FPLSPS 11/08/14 13.17.
> PIPINX412I ... GPR0: 0000000A 01F5738C 000007C0 00000000.
> PIPINX412I ... GPR4: 01F5A7C0 0000000C 00000000 01F5738C.
> PIPINX412I ... GPR8: 01F5A000 01F456F8 01F5A000 01F56C60.
> PIPINX412I ... GPRC: 81EF7604 01F57858 81EF7614 C6998585.
> PIPINX413I ... Store 01EF7628: BFFF4000 4720C030 000001C4 5BF0C8BC
> 47D0C04A.
> PIPINX1198I Stage is active.
> PIPMSG004I ... Issued from stage 5 of pipeline 1 name "siGh".
> PIPMSG001I ... Running "Spec printonly a select second a: 1.3 . b: w2 .
> c:".
> DMSABE141T Operation exception occurred at 81EF7632 in routine PIPE
>
> The stage in question:
>
> '|Spec printonly a select second',
>    'a: 1.3 . b: w2 . c: w3 .',
>    'set (#0:=a*5;#1:=#0+4;#3+=1;#4+=b;#5:=#5||||" "||||c)',
>    'break a',
>    'print #0 pic 9999v n /-/ n print #1 pic 9999v n',
>    'print #3 pic zzzz9v 19.5 right',
>    'print #4/#3 pic zzz9.v99 25',
>    'print #5 35',
>    'set (#3:=0;#4:=0;#5:="")',
>
> It has taken the break once and produced the expected output.  I have a
> dump, haven't yet analyzed it.
> Thanks for any pointers
> --
> "Every palace and every work of art is only dust as yet unrealized, and
> time is the patient wind that will wither it away." -- Dean Koontz, "The
> Face"
>
> Mike Harding
> z/VM System Support
>
> /sp
>

Reply via email to