From 0f7e9875841633677430754f79f4d55c652d95de Mon Sep 17 00:00:00 2001 From: moshix Date: Sun, 29 Oct 2017 10:04:51 +0200 Subject: [PATCH] added in-line documentation --- defragvolume.jcl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/defragvolume.jcl b/defragvolume.jcl index 2f3d5f6..d09a655 100644 --- a/defragvolume.jcl +++ b/defragvolume.jcl @@ -1,6 +1,11 @@ -//P53A JOB (ACCOUNT),'DEFRAG VOLUME',CLASS=A,MSGCLASS=H, +//XYZ2A JOB (ACCOUNT),'DEFRAG VOLUME',CLASS=A,MSGCLASS=H, // REGION=300M,NOTIFY=&SYSUID,MSGLEVEL=(1,1) -//* +//********************************************************** +//** THIS WILL ONLY WORK ON MVS/ESA AND HIGHER VERSIONS +//** THERE IS NO ADRDSSU IN MVS 3.8 UNFORTUNATELY +//** DEFRAGGING IS SOMETIMES NECESSARY FOR HIGH TRAFFIC VOLUMES +//*********************************************************** + //STEP1 EXEC PGM=ADRDSSU,REGION=2048K //SYSPRINT DD SYSOUT=* //INVOL1 DD VOL=SER=Z9DIS6,UNIT=3390,DISP=OLD