zOs/JCL/LOGG1
//A540769W JOB (CP00,KE50),TIME=99 00010001
//*MAIN CLASS=CMNA
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
//* PARM='%runISPF wsh s'
// PARM='%WSH s'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
//* TSO.RZ1.P0.INST.MSGS
// DD DSN=ISP.SISPMENU,DISP=SHR
//* TSO.RZ1.P0.PROD.MSGS
//* ORG.RZ1.B0106.KPCO4.MSGS
//* TSO.RZ1.P0.USER.MSGS
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//*
//* DSORG=PO
//ISPLOG DD SYSOUT=*,RECFM=VA,LRECL=125
//ISPLIST DD SYSOUT=*,RECFM=FBA,LRECL=121
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WAID DD DISP=OLD,DSN=DSN.MAREC.DBZF.D090702.T175332.JOB265
//WSH DD *
$$ wie gehts $-{3*4}
call sleep 14