//USZCZT0T JOB (AD00),'#04B42 ZELDEN', // NOTIFY=&SYSUID, // CLASS=M,MSGCLASS=H,MSGLEVEL=(1,1) //* //TEST PROC //S1 EXEC PGM=IRXJCL,PARM='REXXSTOR' //SYSTSIN DD DUMMY //SYSTSPRT DD SYSOUT=* //SYSEXEC DD DSN=MPSYS3.USZCZT0.CNTL,DISP=SHR // PEND //J1 EXEC TEST /* DEFAULT REGION SIZE ABOVE & BELOW - */ //* /* JES2 DEFAULT REGION SIZE FROM JOBCLASS(N) */ //* /* IS USED FOR REGION SIZE IF NOT OVERRIDEN */ //* /* BY INSTALLATION EXIT */ //J2 EXEC TEST,REGION.S1=4M /* REQ BELOW / ABOVE TEST #1 */ //J3 EXEC TEST,REGION.S1=8M /* REQ BELOW / ABOVE TEST #2 */ //J4 EXEC TEST,REGION.S1=20M /* MAX BELOW / ABOVE TEST #1 */ //J5 EXEC TEST,REGION.S1=40M /* MAX BELOW / ABOVE TEST #2 */ //J6 EXEC TEST,REGION.S1=80M /* MAX BELOW / ABOVE TEST #3 */ //J7 EXEC TEST,REGION.S1=100M /* MAX BELOW / ABOVE TEST #4 */ //J8 EXEC TEST,REGION.S1=200M /* MAX BELOW / ABOVE TEST #5 */ //J9 EXEC TEST,REGION.S1=500M /* MAX BELOW / ABOVE TEST #6 */ //J10 EXEC TEST,REGION.S1=900M /* MAX BELOW / ABOVE TEST #7 */ //J11 EXEC TEST,REGION.S1=1024M /* MAX BELOW / ABOVE TEST #8 */ //J12 EXEC TEST,REGION.S1=1200M /* MAX BELOW / ABOVE TEST #9 */ //J13 EXEC TEST,REGION.S1=1400M /* MAX BELOW / ABOVE TEST #10 */ //J14 EXEC TEST,REGION.S1=0M /* REGION = 0M TEST */ //J15 EXEC TEST,MEMLIMIT.S1=0M /* MEMLIMIT TEST #1 */ //J16 EXEC TEST,MEMLIMIT.S1=2047M /* MEMLIMIT TEST #2 */ //J17 EXEC TEST,MEMLIMIT.S1=2049M /* MEMLIMIT TEST #3 */ //J18 EXEC TEST,MEMLIMIT.S1=2048M /* MEMLIMIT TEST #4 */ //J19 EXEC TEST,MEMLIMIT.S1=2G /* MEMLIMIT TEST #5 */ //J20 EXEC TEST,MEMLIMIT.S1=4096G /* MEMLIMIT TEST #6 */ //J21 EXEC TEST,MEMLIMIT.S1=4T /* MEMLIMIT TEST #7 */ //J22 EXEC TEST,MEMLIMIT.S1=100T /* MEMLIMIT TEST #8 */ //J23 EXEC TEST,MEMLIMIT.S1=100P /* MEMLIMIT TEST #9 */ //J24 EXEC TEST,MEMLIMIT.S1=16383P /* MEMLIMIT TEST #10 */ //J25 EXEC TEST,MEMLIMIT.S1=16384P /* MEMLIMIT TEST #11 */ //J26 EXEC TEST,MEMLIMIT.S1=NOLIMIT /* MEMLIMIT TEST #12 */ //J27 EXEC TEST,REGION.S1=2000M /* IMPOSSIBLE RGN ABOVE TEST */ //J28 EXEC TEST,REGION.S1=15M /* IMPOSSIBLE RGN BELOW TEST */ //* /* THIS SHOULD GET AN 822 */ //* /* ABEND IF IEFUSI DOESN'T */ //* /* CHANGE THE VALUE. */