zOs/JCL/CSMREXX
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*MAIN CLASS=LOG 00040003
//* rexx in anderen RZ ausfuehren
//* oder beliebige tso commands
//* mit eigener exec library
// JCLLIB ORDER=(SM.RZ4.P0.CSM.COMMON.PROC)
//IKJEFT01 EXEC RM@IKJ01,RSYS=RZZ
//SYSPROC DD DISP=SHR,DSN=A540769.WK.REXX
//*PRINTOUT DD DISP=(NEW,CATLG),DSN=A540769.TMP.TEXTPRT
//* achtung printOut geht nicht auf Member|
//TSIN DD *
%exargs wie geht es im rzz?
listc
%exargs wie geht es im rzz -
usw. -
zum schluss
//
//* man kann input/output files kopieren
//* die DD Name müssen richtig alloziert
//* sein (lokal bzw. remote)
//DDCPARM DD *
I: DDIN TO: RMTIN
O: RMTOUT TO: DDOUT