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

Moving files across LPARS through Shared volume


 
IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: :: View next topic  
Author Message
Bharath RajaramSridharan

New User


Joined: 10 Dec 2012
Posts: 20
Location: Australia

PostPosted: Wed Jun 26, 2013 10:32 am
Reply with quote

Hi,

I have a requirement to transfer files from one LPAR (GSYS) to another LPAR (TSYS) . We have got a volume VOL001 which is shared between TSYS and GSYS. This volume is a non-SMS managed.

The requirement is the catalogued files (Always AB will be the HLQ - Sequential files,PDS, VSAM,etc,.) which will be created by executing in the jobs in GSYS LPAR, need to be copied to VOL001, catalog in VOL001 and then delete in GSYS LPAR.
To do this I used the below JCL, but I didn't get the required output. The datasets get moved to other volume but not the one that I specify.

Please help me in identifying the issue and correcting it. When I checked the job output, I don't see any warning and error messages.

Code:
//COPY     EXEC PGM=ADRDSSU,PARM=('UTILMSG=YES')               
//SYSPRINT  DD  SYSOUT=*                                       
//SYSIN     DD  *                                             
   COPY DATASET(INCLUDE(AB.**)) -                             
   OUTDYNAM(VOL001)    /* ALLOC VOL VOL001 DYNAMICALLY    */ -
   DELETE CATALOG FORCE -                                     
   TGTALLOC(SOURCE)                                           
/*       
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8793
Location: Welsh Wales

PostPosted: Wed Jun 26, 2013 11:44 am
Reply with quote

You need to use a special STORCLAS to create NON SMS managed datasets.

This is site specific, so go ask your storage bods.
Back to top
View user's profile Send private message
Bharath RajaramSridharan

New User


Joined: 10 Dec 2012
Posts: 20
Location: Australia

PostPosted: Wed Jun 26, 2013 2:20 pm
Reply with quote

Hi,

Used the below job to complete the requirement.

Code:
//COPY   EXEC PGM=ADRDSSU,PARM=('UTILMSG=YES')
//SYSPRINT DD  SYSOUT=*                                       
//SYSUDUMP DD  SYSOUT=*                                       
//SYSIN    DD  *                                             
  COPY DATASET(INCLUDE(AB.**)) -               
       OUTDY(VOL001) -                                       
       NULLMGMTCLAS  -                                       
       NULLSTORCLAS  -                                       
       BYPASSACS(**) -                                       
       CANCELERROR   -                                       
       CAT           -                                       
       DELETE        -                                       
       FORCECP(0)    -                                       
       PURGE         -                                       
       SPHERE        -                                       
       WAIT(10,10)                                           
//*     
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 -> JCL & VSAM
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts JOINKEYS to match two input files on ... DFSORT/ICETOOL 1
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