|
View previous topic :: View next topic
|
| Author |
Message |
Bharath RajaramSridharan
New User
Joined: 10 Dec 2012
Posts: 20
Location: Australia
|
|
|
|
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 |
|
 |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
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 |
|
|
Bharath RajaramSridharan
New User
Joined: 10 Dec 2012
Posts: 20
Location: Australia
|
|
|
|
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 |
|
|
|
|
