IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

Need to move several VSAM files to new Volume


 
IBM Mainframe Forums -> SYNCSORT
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
jdlowndes

New User


Joined: 19 Jan 2013
Posts: 1
Location: USA

PostPosted: Tue Apr 22, 2014 11:56 pm
Reply with quote

Good afternoon ladies and gents,

I an issue that I greatly need some assistance with, here is the issue:
I need to move approximately 150 or so VSAM files from some old MOD3 volumes to new MOD27 volumes. Both the old and new volumes are SMS controlled. The volumes are also both in the same storage group but the MOD3s have been DISNEW'ed for a couple of months now.

Does anyone have any suggestions on how to go about completing this task. I greatly appreciate your assistance in advance!!!!

(This is a duplicate post from the JCL forum, because I was "Blind" and didn't see the VSAM forum first!!)
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19251
Location: Inside the Matrix

PostPosted: Wed Apr 23, 2014 7:02 am
Reply with quote

Hello and welcome to the forum,

Suggest you work with your storage management people.

They may already have a recommend/standard process for doing this.

Better to use the existing method rather than create a new one.
Back to top
View user's profile Send private message
jan.sehlbach

New User


Joined: 28 Mar 2014
Posts: 3
Location: Germany

PostPosted: Wed Apr 23, 2014 3:17 pm
Reply with quote

DFSMSdss (ADRDSSU) is your friend

i work with this parameter to empty a volume, but this will only works if datasets are not in-use.

Code:
//S1       EXEC PGM=ADRDSSU,PARM='UTILMSG=YES'
//SYSPRINT DD SYSOUT=*                                       
//SYSIN    DD *                                             
 COPY -                                                     
    DS(                   -                                 
       INC(               -                                 
                   **     -                                 
          )               -                                 
       EXC(SYS1.**)       -                                 
      )                   -                                 
   LIDY(                  -                                 
        (VPU004,3390)   , -                                 
        (VPU005,3390)   , -                                 
                        ) -                                 
    VOLCOUNT(*)           -                                 
    DEL                   -                                 
    ADMIN                 -                                 
    PURGE                 -                                 
    RECAT(*)              -                                 
    ALLD(*)               -                                 
    ALLX SELECTMULTI(ANY)                                   
/*                                                         


if you will only move your specific VSAM you must edit the inc parm, and maybe you don't need the parm ADMIN if you have the rights.
And "LIDY" you must change to your DISNEW Volser.
For the other parameter check the DFSMSdss Storage Administration Guide.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic All times are GMT + 6 Hours
Forum Index -> SYNCSORT
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts JOINKEYS to match two input files on ... DFSORT/ICETOOL 3
No new posts Group comparison/update between two f... DFSORT/ICETOOL 10
No new posts Need assistance formatting when joini... SYNCSORT 8
No new posts Combining more 4 files with sorted or... DFSORT/ICETOOL 3
No new posts SEPARATE UNIQUE and NON-UNIQUE in SEP... SYNCSORT 6

Back to Top