ADRDSSU ...restoring tape data to a flat file

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

I have copied some data to a tape dataset.
Now i need is to restore that to a flat file.But while doing that i am getting RC 4 with the following error...

0ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME

My code is as follows

//STEP EXEC PGM=ADRDSSU
//TAPE1 DD DSN=TAPE.T1,
// DISP=SHR
//BKP DD DSN=BACKUP.T1,
// DISP=(NEW,CATLG,CATLG),
// DATACLAS=DSORGPSE,
// DCB=(BLKSIZE=0,LRECL=133,RECFM=FB),
// SPACE=(TRK,(1000,1000),RLSE),
// UNIT=SYSDA
//SYSIN DD *
RESTORE DATASET(INCLUDE (BACKUP.T1))-
INDDNAME (TAPE1) -
OUTDDNAME (BKP)
/*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*

Please someone tell me why i am getting RC4 and the tape data is not copying?

Terry Heinze · Posted: Fri Mar 05, 2010 9:55 am

What program/utility was used to create TAPE.T1?

dick scherrer · Posted: Fri Mar 05, 2010 9:57 am

Hello,

How do you know the tape has the expected file?

Suggest you post the informational output generated when the tape was created.

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

What program/utility was used to create TAPE.T1?

I used the same ADRDSSU utility for creating the tape also.

dick scherrer · Posted: Fri Mar 05, 2010 10:16 am

Hello,

To repeat:

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

Suggest you post the informational output generated when the tape was created.

PAGE 0001 5695-DF175 DFSMSDSS V1R09.0 DATA SET SERVICES 2010.063 23:36
DUMP DATASET(INCLUDE (GRT.INPUT.DAT))- 00020
OUTDDNAME (TAPEOUT) 00046
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP '
ADR109I (R/I)-RI01 (01), 2010.063 23:36:31 INITIAL SCAN OF USER CONTROL STATEMENT COMPLETED
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I (001)-STEND(01), 2010.063 23:36:31 EXECUTION BEGINS
ADR903I (001)-PSEDM(01), DUMP OF EXTENDED SEQUENTIAL DATA SET GRT.INPUT.DAT WAS SUCCESSFUL. SIZE OF DATA SET DUMPED WAS
0000000000000A64.
ADR801I (001)-DTDSC(01), DATA SET FILTERING IS COMPLETE. 1 OF 1 DATA SETS WERE SELECTED: 0 FAILED SERIALIZATION AND 0 FAILED FOR OTHER REASONS.
ADR454I (001)-DTDSC(01), THE FOLLOWING DATA SETS WERE SUCCESSFULLY PROCESSED
GRT.INPUT.DAT
ADR006I (001)-STEND(02), 2010.063 23:36:35 EXECUTION ENDS
ADR013I (001)-CLTSK(01), 2010.063 23:36:35 TASK COMPLETED WITH RETURN CODE 0000
ADR012I (SCH)-DSSU (01), 2010.063 23:36:35 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0000

gcicchet · Posted: Fri Mar 05, 2010 10:20 am

Hi,

the dataset that was dumped is not the dataset you are restoring.

Gerry

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

yes it is ....i have used the same name...but in my qns its just to make it clear i have given like tape/backup etc

To make it clear,please find my belowJCL

000003 //STEP EXEC PGM=ADRDSSU
000004 //TAPE1 DD DSN=GRT.TAPE.T1,
000005 // DISP=SHR
000006 //BKP DD DSN=GRT.BACKUP.G813,
000007 // DISP=(NEW,CATLG,CATLG),
000008 // DATACLAS=DSORGPSE,
000009 // DCB=(BLKSIZE=0,LRECL=133,RECFM=FB),
000010 // SPACE=(TRK,(1000,1000),RLSE),
000011 // UNIT=SYSDA
000012 //SYSIN DD *
000013 RESTORE DATASET(INCLUDE (GRT.BACKUP.G813.**))-
000014 INDDNAME (TAPE1) -
000015 OUTDDNAME (BKP)

enrico-sorichetti · Posted: Fri Mar 05, 2010 10:44 am

Terry Heinze · Posted: Fri Mar 05, 2010 10:49 am

Where does your JCL state that GRT.TAPE.T1 was the data set that was created when you ran your backup job? You've shown us your restore JCL twice now, but not your backup JCL.

dick scherrer · Posted: Fri Mar 05, 2010 10:50 am

Hello,

From the 2 posted jobs. . .

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

For the job i posted ...for restoring i can show you the dump.....its showing the same ...Rc 4

Act I used the same output generated from the job(which uses ADRDSSU for copying data to tapefile).AS posted the dump of that job shows like it has copied all data to tape file.

ADR903I (001)-PSEDM(01), DUMP OF EXTENDED SEQUENTIAL DATA SET GRT.INPUT.DAT WAS SUCCESSFUL. SIZE OF DATA SET DUMPED WAS
0000000000000A64

Now when i am trying to restore the tape file(same o/p file generted) i am getting RC 4.

ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME

Sorry for the confusion...

enrico-sorichetti · Posted: Fri Mar 05, 2010 10:55 am

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

Please find my JCLs

Copying from a file to tape file

000003 //STEP020 EXEC PGM=ADRDSSU
000004 //SYSPRINT DD SYSOUT=*
000005 //SYSUDUMP DD SYSOUT=*
000006 //TAPEOUT DD DSN=GRT.TAPE.T1,
000007 // DISP=(NEW,CATLG,DELETE),
000008 // DCB=(BLKSIZE=0,LRECL=133,RECFM=FB),
000009 // UNIT=VTS
000010 //SYSIN DD *
000011 DUMP DATASET(INCLUDE (GRT.INPUT.DAT))-
000012 OUTDDNAME (TAPEOUT)

Restoring the tape file

000003 //STEP EXEC PGM=ADRDSSU
000004 //TAPE1 DD DSN=GRT.TAPE.T1,
000005 // DISP=SHR
000006 //BKP DD DSN=GRT.BACKUP.G813,
000007 // DISP=(NEW,CATLG,CATLG),
000008 // DATACLAS=DSORGPSE,
000009 // DCB=(BLKSIZE=0,LRECL=133,RECFM=FB),
000010 // SPACE=(TRK,(1000,1000),RLSE),
000011 // UNIT=SYSDA
000012 //SYSIN DD *
000013 RESTORE DATASET(INCLUDE (GRT.BACKUP.G813.**))-
000014 INDDNAME (TAPE1) -
000015 OUTDDNAME (BKP)

Now i think this really makes everything clear....

dick scherrer · Posted: Fri Mar 05, 2010 10:59 am

Hello,

You really need to pay more careful attention to what you are being provided in these replies. What you are submitting to restore does not match what you successfully backed up.

Until you correct the restore job, there is nothing anyone can do. . .

enrico-sorichetti · Posted: Fri Mar 05, 2010 11:03 am

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

I have successfully backed out datset GRT.TAPE.T1

you mean to tell my restore job should be like

000012 //SYSIN DD *
000013 RESTORE DATASET(INCLUDE (GRT.TAPE.T1))-
000014 INDDNAME (TAPE1) -
000015 OUTDDNAME (BKP)

TAPE1-GRT.TAPE.T1
BKP-GRT.BACKUP.G813

Please correct me where i m wrong?

enrico-sorichetti · Posted: Fri Mar 05, 2010 11:13 am

Yes, that' s what we have been trying to tell from the beginning!

see for example :

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

i did the same and got the below warning with RC 4

ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME
ADR487W (001)-TDLOG(01), DATA SET GRT.TAPE.T1 NOT ON LOGICALLY FORMATTED DUMP TAPE

JCL

000004 //TAPE1 DD DSN=GRT.TAPE.T1,
000005 // DISP=SHR
000006 //BKP DD DSN=GRT.BACKUP.G000,
000007 // DISP=(NEW,CATLG,CATLG),
000008 // DATACLAS=DSORGPSE,
000009 // DCB=(BLKSIZE=0,LRECL=133,RECFM=FB),
000010 // SPACE=(TRK,(1000,1000),RLSE),
000011 // UNIT=SYSDA
000012 //SYSIN DD *
000013 RESTORE DATASET(INCLUDE (GRT.TAPE.T1))- 000014 INDDNAME (TAPE1) -
000015 OUTDDNAME (BKP)
000016 /*

enrico-sorichetti · Posted: Fri Mar 05, 2010 12:21 pm

You keep on doing the same error over and over...
the include statement should use the name of the dataset which has been backed up, not the name of the dataset containing the backup

did You ever care to look at the dfdss manuals and the samples contained there?
looks like not!

also You keep confusing things
You say

expat · Posted: Fri Mar 05, 2010 12:23 pm

What on earth do you think that you are doing here. Or at least trying to do.

Why do you have the DUMP dataset name as the restore name. You need to use the names of the datasets that were dumped to the tape and not the tape dataset name.

Do you know where they keep the manuals at your shop. If not, please find out quickly and spend the weekend curled up on the sofa with the DFdss manuals.

Aaparna Vipin · New User Joined: 12 Feb 2010 Posts: 10 Location: India

Yes....let me....I did this before itself that time i got RC 8

ADR380E (001)-FRLBO(23), DATA SET GRT.INPUT.DAT NOT PROCESSED, 18
ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME
ADR480W (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE NOT PROCESSED FROM THE LOGICALLY FORMATTED DUMP TAPE DUE TO ERRORS:
GRT.INPUT.DAT

JCL

000003 //STEP020 EXEC PGM=ADRDSSU
000004 //TAPE1 DD DSN=GRT.TAPE.T1,
000005 // DISP=SHR
000006 //BKP DD DSN=GRT.BACKUP.G007,
000007 // DISP=(NEW,CATLG,CATLG),
000008 // DATACLAS=DSORGPSE,
000009 // DCB=(BLKSIZE=0,LRECL=133,RECFM=FB),
000010 // SPACE=(TRK,(1000,1000),RLSE),
000011 // UNIT=SYSDA
000012 //SYSIN DD *
000013 RESTORE DATASET(INCLUDE (GRT.INPUT.DAT))-
000014 INDDNAME (TAPE1) -
000015 OUTDDNAME (BKP)
000016 /*

Thanks for all your quick and king reply...
Sorry for eating both ur time and brain...

enrico-sorichetti · Posted: Fri Mar 05, 2010 12:56 pm

to save everybody' s time why don' t You start looking at the manuals Yourself
and ask Your peers for working samples ???

the whole manual
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S261/CCONTENTS?SHELF=DGT2BK71&DN=SC26-7402-09&DT=20080128160125
for dfddss :
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S261/2.0?SHELF=DGT2BK71&DT=20080128160125

and the messages and codes

for the first message of the chain ( ADR380E )
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2M181/SPTM000238

and here the manual itself for the ADR messages
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2M181/CCONTENTS

expat · Posted: Fri Mar 05, 2010 1:01 pm

If I were you I would try and see exactly what you do have on the tape by running the code below.
Note the PARM parameter - this job WILL NOT perform an actual restore.