Slight amendment: upon further playing, it appears one can concatenate to a counter as much as one wants, as long as one doesn't try to reset it to null, then start concatenating to it again.
-- Mike Harding z/VM System Support /sp CMSTSO Pipelines Discussion List <[email protected]> wrote on 07/16/2015 12:33:07 PM: > From: Michael Harding/Oakland/IBM@IBMUS > To: [email protected] > Date: 07/16/2015 12:33 PM > Subject: Re: Assertion failure? > Sent by: CMSTSO Pipelines Discussion List <[email protected]> > > 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 > > >
