Thanks to Paul for the clarification. I've been told somebody got CC=16 from SORT. Sorry, I developed the script at a non-DFSort site. Please modify these two lines:
460,160,SQZ=(VL,MID=C' '),C';', 520,160,SQZ=(VL,MID=C' '),C';', with: 460,160,SQZ=(SHIFT=LEFT,MID=C' '),C';', 520,160,SQZ=(SHIFT=LEFT,MID=C' '),C';', Best regards. Max Il giorno gio 30 dic 2021 alle ore 19:57 Paul Gilmartin < [email protected]> ha scritto: > On Thu, 30 Dec 2021 10:34:37 +0100, Massimo Biancucci wrote: > > ... > >EXECIO "0 DISKR SMF" /* OPEN INPUT */ > > > >EXECIO "0 DISKW OUT" /* OPEN OUTPUT */ > > > Caution: From the z/OS TSO/E REXX Reference: > > lines > The number of lines to be processed. > ... > If you specify a value of zero, no I/O operations are performed unless you > also specify either OPEN, FINIS, or both OPEN and FINIS. > > So those two instructions harmlessly do nothing. If that checks that the > files are correctly allocated, perhaps a clarifying RCF to the Ref. is > needed. > > -- 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
