my goal is to create a defrag sysin frome a storage group
i have a step1 where i update a proclib member (LISTVOL)
and in the following step 2, i use this member to read it.
But in the step2, there not the same thing in the member than in the step on. I suppose, the step 2 is running too fast (before the step one update the member...) :
//**************************************************
//* CREATION DE LA SYSIN VOLPREP *
//**************************************************
//REXX2 EXEC PGM=IRXJCL,PARM=('REX5')
//SYSEXEC DD DISP=SHR,DSN=DATA.PARAM
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD SYSOUT=*
//IN DD DSN=DATA.LISTVOL,DISP=SHR
//OUT DD DSN=DATA.PROCLIB(LISTVOL),DISP=SHR
//**************************************************
//* JCL DE DEFRAG DES DISKS
//**************************************************
//DEFRA EXEC PGM=ADRDSSU,PARM='UTILMSG=YES'
//SYSPRINT DD SYSOUT=*
// INCLUDE MEMBER=LISTVOL
//FILTERD1 DD DSN=DATA.PARAM(DFRA1),DISP=SHR
//SYSIN DD DSN=DATA.PARAM(DFRA2),DISP=SHR
**************************** Bottom of Data *******************
the member LISTVOL contain the DASD Volume list froml a storage group
The member LISTVOL contain that :
********************************* Top of Data ****
//A1 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD01
//A2 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD02
//A3 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD03
//A4 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD04
//A5 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD05
//A6 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD06
//A7 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD07
//A8 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD08
//A9 DD DISP=SHR,UNIT=DISK,VOL=SER=DASD09
...
The SYSIN contain //SYSIN DD DSN=DATA.PARAM(DFRA2),DISP=SHR that :
********************************* To
DEFRAG DDN(A1) -
EXCL(DDN(FILTERD1)) -
WAIT(1,1)
DEFRAG DDN(A2) -
EXCL(DDN(FILTERD1)) -
WAIT(1,1)
...
May be i have to ad a wait step ?
