Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
How to use IBM Utilities in REXX
- Thread starter sarande
- Start date
KiwiREXXDude
Programmer
You need to use the ALLOC command to define the datasets you use and write to. This is some code I use to copy to a temporary ISPF profile to pre-allocated ISPTLIB (obviously you'll need to allocate it and change the data-class and sysout class);
Code:
"Alloc Fi(SYSPRINT) Sysout(Z) Reu"
"Alloc Fi(SYSIN) New Lrecl(80) DataClas(LOG) DSOrg(PS) Reu"
"Alloc Fi(TEMPPROF) Da('SYS1.SISPTENU') Shr Reu"
OUT.1 = " COPY I=TEMPPROF,O=ISPTLIB"
"Execio * DiskW SYSIN (Stem OUT. Finis)"
"IEBCOPY"
"Free Fi(SYSPRINT SYSIN TEMPPROF)"- Status