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
