Rex,
I tried your suggestion. I tried copying the tape to another tape using
DCB=BLKSIZE=27998. However I got the same result :ADR331E (001)-CPYD (01),
OUTPUT BLKSIZE 27998 FOR DATA SET ON DDNAME COPY1 IS SMALER THAN INPUT BLKSIZE
262144.
From: "Pommier, Rex" <[email protected]>
To: [email protected]
Sent: Thursday, 13 July 2017, 12:15
Subject: Re: COPYING DFDSS TAPE TO DASD USING COPYDUMP - ADR331E
John,
Based on error ADR331E, it appears that the only way you could do this would be
if you had created the original tape backup using a block size of 32K - or
27998. That message explicitly states that you cannot copy a dump dataset to
something with a smaller block size.
Rex
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of John Dawes
Sent: Thursday, July 13, 2017 10:24 AM
To: [email protected]
Subject: COPYING DFDSS TAPE TO DASD USING COPYDUMP - ADR331E
I am trying to copy a volume backup (which was created by DFDSS) to disk,
using DFDSS. However I am encountering problems doing so.I tried using
DCB=BLKSIZE=32760 to no avail. I tried running the job without the DCB and it
returned the same result (ADR324E). According to the doc(SC23-6868-01) this is
feasible:
"With the COPYDUMP command, you can make from 1 to 255 copies
ofDFSMSdss-produced dump data. The data to be copied, a sequential data set,
canbe on a tape or a DASD volume, and copies can be written to a tape or a
DASDvolume."
Here is my job :
//STEP1 EXEC PGM=ADRDSSU,REGION=0M,TIME=1440,PARM='UTILMSG=YES' //SYSPRINT DD
SYSOUT=* //BACKUP DD DISP=OLD,
//
DSN=HDFQ.DFDSS.TSB063.COPY1.WEEK(0) //COPY1 DD
DISP=(,CATLG,DELETE), //
DSN=SYS1.DFDSS.COPYTAPE, //
UNIT=3390,VOL=SER=SPARE1,, //
SPACE=(CYL,(3200,20),RLSE),DCB=BLKSIZE=32760 //SYSIN DD *
COPYDUMP -
INDD(BACKUP) -
OUTDD(COPY1) /*
here is the output messages:
COPYDUMP-
INDD(BACKUP) -
OUTDD(COPY1)
ADR101I(R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'COPYDUMP '
ADR109I(R/I)-RI01 (01), 2017.194 10:55:25 INITIAL SCAN OF USER CONTROL STATEMEN
ADR016I(001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I(001)-STEND(01), 2017.194 10:55:25 EXECUTION BEGINS
ADR331E(001)-CPYD (01), OUTPUT BLKSIZE 32760 FOR DATA SET ON DDNAME COPY1 IS
SMALLERTHAN INPUT BLKSIZE 262144
ADR324E(001)-CPYD (01), THE VOLUME/DATA SET SPECIFIED BY DDNAME COPY1 HAS
BECOME UNUSABLE
ADR006I(001)-STEND(02), 2017.194 10:55:59 EXECUTION ENDS
ADR013I(001)-CLTSK(01), 2017.194 10:55:59 TASK COMPLETED WITH RETURN CODE 0016
ADR012I(SCH)-DSSU (01), 2017.194 10:55:59 DFSMSDSS PROCESSING COMPLETE. HIGHEST
TASK 001
Can someone advise me how to fix the problem?
Thanks.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
The information contained in this message is confidential, protected from
disclosure and may be legally privileged. If the reader of this message is not
the intended recipient or an employee or agent responsible for delivering this
message to the intended recipient, you are hereby notified that any disclosure,
distribution, copying, or any action taken or action omitted in reliance on it,
is strictly prohibited and may be unlawful. If you have received this
communication in error, please notify us immediately by replying to this
message and destroy the material in its entirety, whether in electronic or hard
copy format. Thank you.
----------------------------------------------------------------------
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
