Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

ADRDSSU ...restoring tape data to a flat file
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 9:52 am    Post subject: ADRDSSU ...restoring tape data to a flat file
Reply with quote

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?
Back to top
View user's profile Send private message

Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Fri Mar 05, 2010 9:55 am    Post subject:
Reply with quote

What program/utility was used to create TAPE.T1?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Mar 05, 2010 9:57 am    Post subject:
Reply with quote

Hello,

How do you know the tape has the expected file?

Suggest you post the informational output generated when the tape was created.
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 10:13 am    Post subject:
Reply with quote

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

I used the same ADRDSSU utility for creating the tape also.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Mar 05, 2010 10:16 am    Post subject:
Reply with quote

Hello,

To repeat:
Quote:
How do you know the tape has the expected file?

Suggest you post the informational output generated when the tape was created.
If the informational output from the original backup is not available, post the jcl and control statements used to create the backup.
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 10:17 am    Post subject:
Reply with quote

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
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Fri Mar 05, 2010 10:20 am    Post subject:
Reply with quote

Hi,

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


Gerry
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 10:32 am    Post subject:
Reply with quote

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)
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Fri Mar 05, 2010 10:44 am    Post subject: Reply to: ADRDSSU ...restoring tape data to a flat file
Reply with quote

Quote:
but in my qns its just to make it clear i have given like tape/backup etc

You are just waiting our time!
post the real job used for the dump and the real job used for restore!
anything different will be useless

from the starting post
ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME
it means that no dataset corresponding to the include pattern was found on the tape full stop
in these cases the system is to be trusted more than Your judgment

also the logic of the first jcl posted is wrong,
the include should use the dataset name to be restored, not the name od the dataset containing the <backup>
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Fri Mar 05, 2010 10:49 am    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Mar 05, 2010 10:50 am    Post subject:
Reply with quote

Hello,

From the 2 posted jobs. . .
Code:
DUMP DATASET(INCLUDE (GRT.INPUT.DAT))-
000013 RESTORE DATASET(INCLUDE (GRT.BACKUP.G813.**))-


Quote:
....i have used the same name...
Ah, Umm, well. . . It surely does not look like they are the same. . .

Possibly, i'm missing something icon_confused.gif
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 10:51 am    Post subject:
Reply with quote

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...
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Fri Mar 05, 2010 10:55 am    Post subject: Reply to: ADRDSSU ...restoring tape data to a flat file
Reply with quote

Quote:
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...


just more confusion,
again, You are dumping something and restoring something else...
as Dick has already pointed out!

if You were restoring the same dataset You would not receive the ADR... message
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 10:58 am    Post subject:
Reply with quote

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....
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Mar 05, 2010 10:59 am    Post subject:
Reply with quote

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. . .
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Fri Mar 05, 2010 11:03 am    Post subject: Reply to: ADRDSSU ...restoring tape data to a flat file
Reply with quote

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


it just makes clear for the umpteen time that You
are dumping... DUMP DATASET(INCLUDE (GRT.INPUT.DAT))-
and trying to restore ... RESTORE DATASET(INCLUDE (GRT.BACKUP.G813.**))-

what is that You do not understand!

Quote:
Hope this helps,

given the topic trend, I do not think so! icon_biggrin.gif
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 11:12 am    Post subject:
Reply with quote

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?
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Fri Mar 05, 2010 11:13 am    Post subject: Reply to: ADRDSSU ...restoring tape data to a flat file
Reply with quote

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

see for example :
Quote:
also the logic of the first jcl posted is wrong,
the include should use the dataset name to be restored, not the name od the dataset containing the <backup>
Back to top
View user's profile Send private message
Aaparna Vipin

New User


Joined: 12 Feb 2010
Posts: 10
Location: India

PostPosted: Fri Mar 05, 2010 11:26 am    Post subject:
Reply with quote

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 /*
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Fri Mar 05, 2010 12:21 pm    Post subject: Reply to: ADRDSSU ...restoring tape data to a flat file
Reply with quote

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
Quote:
have successfully backed out datset GRT.TAPE.T1

the sentence means that You have somewhere a dataset called GRT.TAPE.T1
and You took a backup of it

but you jcl really implies that You took a backup of <some dataset> and You stored it in the <container> GRT.TAPE.T1

You confuse the <content> with the <container>

Code:

//tape dd dsn=<container>
...
dump ... include(<content>

//tape dd dsn=<container>
...
restore include(<content>)


You keep insisting on ....
Code:
//tape dd dsn=<container>
...
restore include(<container>)


and that is just plain wrong
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to move a long alphanumeric data ... lind sh COBOL Programming 0 Mon Dec 05, 2016 7:51 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us