Thx, Bill.

But prompt is not a valid order im uxic-rexx.

On 19.11.2015 15:11, Bill Godfrey wrote:
On Thu, 19 Nov 2015 12:47:40 +0100, Leopold Strauss 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

Try adding this anywhere before the RECEIVE command:

x = prompt('on')

Bill

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN




--
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 [email protected] with the message: INFO IBM-MAIN

Reply via email to