zOs/JCL/SORTS

do i=1 to 40  $@{
   $= h £ d2x(i, 2)
   $;
   $<<[eof
//SORTWK$h DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK$h DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
eof
   $}
   end
$***out            20080825 12:06:23
//SORTWK01 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK01 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK02 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK02 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK03 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK03 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK04 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK04 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK05 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK05 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK06 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK06 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK07 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK07 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK08 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK08 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK09 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK09 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK0A DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK0A DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK0B DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK0B DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK0C DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK0C DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK0D DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK0D DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK0E DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK0E DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK0F DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK0F DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK10 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK10 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK11 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK11 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK12 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK12 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK13 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK13 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK14 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK14 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK15 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK15 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK16 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK16 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK17 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK17 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK18 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK18 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK19 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK19 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK1A DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK1A DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK1B DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK1B DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK1C DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK1C DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK1D DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK1D DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK1E DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK1E DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK1F DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK1F DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK20 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK20 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK21 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK21 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK22 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK22 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK23 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK23 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK24 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK24 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK25 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK25 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK26 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK26 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK27 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK27 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//SORTWK28 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
//DATAWK28 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE),
//             MGMTCLAS=EYY0X
$***out            20081031 12:04:40