Push the TSO RECEIVE commands (ie. END, DA(), etc.) into the tso stack and then call RECEIVE.
ITschak ITschak Mugzach Z/OS, ISV Products and Application Security & Risk Assessments Professional On Thu, Nov 19, 2015 at 1:47 PM, Leopold Strauss < leopold.stra...@isis-papyrus.com> wrote: > Hi, all > > I simply wanted to automize the receiving of a lot of XMIT-files in > zOS-unix-shell ( not TSO) > > Last but not least my problem could be broken down to following > terminal-input-problem with the RECEIVE-command: > > rexx-script: > > parse arg indsn outdsn > > address tso "PROFILE PROMPT" > queue "DATASET('"outdsn"')" > queue "END" > address tso "RECEIVE INDATASET('"indsn"')" > > Result: > > MV21:/u/leoplds$ receive.sh 'LEOPLDS.TEST.XMIT' 'LEOPLDS.TEST.TEST' > INMR901I Dataset SYSC.DOCEXEC.V717.LOADLIB from CHR9255 on ESJES2 > INMR154I The incoming data set is a 'PROGRAM LIBRARY'. > INMR906A Enter restore parameters or 'DELETE' or 'END' + > INMR908A The input file attributes are: DSORG=PARTITIONED, RECFM=U, > BLKSIZE=32760, LRECL=32756, File size=X'0005C3EE'K bytes + > INMR909A You may enter DSNAME, SPACE, UNIT, VOL, OLD/NEW, or > RESTORE/COPY/DELETE/END > INMR800I The RECEIVE command failed. The PUTGET service routine issued > return code 16. > > I googled a lot, read manuals, but I did not find any working sample, > which I could use. > > appreciating all hints and br > > -- > Mit freundlichen Gruessen / Kind Regards, > Leopold Strauss, Team DEV-zOS, T: +43-2236-27551-331 > > ---------------------------------------------------------------------- > 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