WTF? How is answering Gil's questions about CLIST dissecting your code? Would you have answered RYFM?
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Wayne Bickerdike [wayn...@gmail.com] Sent: Thursday, April 23, 2020 3:24 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Here we go again; Wow, code an example and it gets totally dissected. I'll write the next "you beaut line of code" and you guys can QA it. Is that how Oracle got so big? On Thu, Apr 23, 2020 at 1:27 PM Seymour J Metz <sme...@gmu.edu> wrote: > EXIT leaves the CLIST. > > IF &NRSTR(&DS) THEN EXIT > > DO WHILE 1 = 1 > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > ________________________________________ > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > of Paul Gilmartin [0000000433f07816-dmarc-requ...@listserv.ua.edu] > Sent: Wednesday, April 22, 2020 10:54 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Here we go again; > > On Thu, 23 Apr 2020 12:07:13 +1000, Wayne Bickerdike wrote: > > >Something like this: > > > >DO I = 1 TO 5000 > >WRITER ENTER DATASET NAME ==> > >READ &DS > >IF &DS = ' ' THEN EXIT > >ELSE DELETE &DS > >END > > > >&STR( breaks the CLIST with a IKJ56545I message produced. > > > Ah! The invention of code injection. > > I prefer Rexx's convention of not re-interpreting expressions. > Doesn't CLIST have a setting to limit that? > > What does EXIT do? Presumably not exit to READY prompt? > > Why compare to one blank rather than empty string? > > Is there no DO FOREVER? > > -- gil > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Wayne V. Bickerdike ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
