IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

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: 19245
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> SYNCSORT

 


Similar Topics
Topic Forum Replies
No new posts Get two files from one file with diff... DFSORT/ICETOOL 10
This topic is locked: you cannot edit posts or make replies. I HAVE 2 INPUT FILES WITH SAME LAYOUT... COBOL Programming 6
No new posts PV041 UNEQUAL VOLUME CONTROL CA Products 4
No new posts VSAM file Storage Calculation JCL & VSAM 3
This topic is locked: you cannot edit posts or make replies. Copy list of files from PS to another... CLIST & REXX 11
Search our Forums:

Back to Top