John,

If you run DISKMAP from CBT does it indicate if there is a single extent large 
enough to contain the dataset you tried to consolidate?

My wild arsed guess is it attempted to move the listed data sets in order to 
create a single extent that would hold the consolidated data set.

Ron



-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of John Dawes
Sent: Friday, September 2, 2016 10:31 AM
To: [email protected]
Subject: Re: [IBM-MAIN] QUESTION ABOUT REDUCING EXTENTS : USING DFDSS

I checked it is there.  Not sure about DEV & SHR.  I was told that I would need 
to add an EXCLUDE(**))
--------------------------------------------
On Wed, 31/8/16, retired mainframer <[email protected]> wrote:

 Subject: Re: QUESTION ABOUT REDUCING EXTENTS : USING DFDSS
 To: [email protected]
 Received: Wednesday, 31 August, 2016, 2:14 PM
 
 There is no indication
 that the specified dataset was processed.  Is it actually  on volume DISS06?
 
 >
 -----Original Message-----
 > From: IBM
 Mainframe Discussion List [mailto:[email protected]]  On  > Behalf Of 
John Dawes  > Sent: Wednesday, August 31, 2016 8:48  AM  > To: 
[email protected]  > Subject: QUESTION ABOUT REDUCING EXTENTS :
 USING DFDSS
 >
 >
 G'Day,
 >
 > I ran
 a job to reduce the extents of a PDS however for some reason  it tried to 
process other  > dataset on  that volume.  I am not sure why.  Perhaps I missed 
 something in the doc?
 >
 > Below are the jcl and the job output.  Thanks in advance.
 > /*
 > //CONSOLD EXEC
 >
 PGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
 > //DASD1    DD
 UNIT=3390,VOL=SER=DISS06,DISP=SHR
 >
 //SYSPRINT DD  SYSOUT=*
 >
 //SYSMAP   DD SYSOUT=*
 >
 //SYSIN    DD  *
 >   CONS
 DATASET(INCLUDE(SYS3.CNTL.DEV)) -
 >
       PIDD(DASD1)
 > /*
 > Output:
 > CONS
 DATASET(INCLUDE(SYS3.CNTL.DEV))
 >
   PIDD(DASD1)
 > ADR101I (R/I)-RI01 (01),
 TASKID 001 HAS BEEN ASSIGNED TO COMMAND  >  'CONS '
 > ADR109I (R/I)-RI01
 (01), 2016.243 07:50:39 INITIAL SCAN OF USER CONTROL  > STATEMEN  > ADR016I  
(001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS  TASK  > ADR006I 
(001)-STEND(01), 2016.243
 07:50:39 EXECUTION BEGINS
 > ADR806I
 (001)-DFRGD(01), RELOCATED EXTENTS WILL BE COPIED USING A  > FAST REPLICATION 
FUNCTION  > ADR211I (001)-DFRGD(01), DATA SET  SYS3.CNTL.SHR IN USE AND WAS NOT 
 >  MOVED  > ADR455W (001)-DFRGD(01), THE  FOLLOWING DATA SETS WERE NOT  >  
SUCCESSFULLY PROCESSED  >
                SYS3.CNTL.SHR
 >
    RADN.RTRIV1.TABLES.DATA
 >
                          DB2.DDIR.D
 >
    HEST.DDIR.D
 >
                  HEST.DDIR.I
 >
    DB2.DDIR.I
 >
                  PREM.DDIR.D
 >
    PREM.DDIR.I
 >
                  SYS3.VSAM.VRRDS.DATA
 > ADR006I (001)-STEND(02), 2016.243 07:50:44  EXECUTION ENDS  > ADR013I 
 > (001)-CLTSK(01),
 2016.243 07:50:44 TASK COMPLETED WITH RETURN  > CODE 0004  > ADR012I  
(SCH)-DSSU (01), 2016.243 07:50:44 DFSMSDSS PROCESSING  > COMPLETE. HIGHEST 
RETURN CODE IS 0004
 FROM:
 >
     TASK    001
 >
 >
 ----------------------------------------------------------------------
 > For IBM-MAIN subscribe / signoff / archive  access instructions,  > send 
 > email to [email protected]  with the message: INFO IBM-MAIN
 
 ----------------------------------------------------------------------
 For IBM-MAIN subscribe / signoff / archive  access instructions,  send email 
to [email protected]  with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to