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 <[email protected]> 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 [[email protected]] on behalf > of Paul Gilmartin [[email protected]] > Sent: Wednesday, April 22, 2020 10:54 PM > To: [email protected] > 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 [email protected] with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > -- Wayne V. Bickerdike ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
