View previous topic :: View next topic
|
Author |
Message |
saujanya_2831
New User
Joined: 09 May 2007 Posts: 27 Location: pune
|
|
|
|
Hi ,
when iam trying to view ,browse or copy a gdg version iam getting
GDG base or tape entry
and when iam trying to recall iam getting
recall failed
ARC1102I DATA SET IS NOT MIGRATED/BACKED UP
its happening with all the input gdg versions of step where as iam able to browse output gdg version .
can anyone suggest.
thanks |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Assuming from your title that the dataset is on tape, then you can not browse it.
Need to copy it to DASD first.
Post your code and your output and we can see more details to be able to help. |
|
Back to top |
|
|
saujanya_2831
New User
Joined: 09 May 2007 Posts: 27 Location: pune
|
|
|
|
expat wrote: |
Assuming from your title that the dataset is on tape, then you can not browse it.
Need to copy it to DASD first.
Post your code and your output and we can see more details to be able to help. |
//AN21b160 EXEC PGM=COMPAREX,COND=(05,LT)
//SYSUT1 DD DSN=AN27.Ar157T3(+1),DISP=OLD,DCB=BUFNO=15
//SYSUT2 DD DSN=AN27.Ar156T3(0),DISP=OLD,DCB=BUFNO=15
//SYSUT3 DD DSN=AN28.Ar160T3(+1),DISP=OLD
//SYSPRINT DD SYSOUT=t
//SYSIN DD DSN=testlib.aaa(UN21X159),DISP=SHR
iam able to browse output but not input files. |
|
Back to top |
|
|
ksk
Active User
Joined: 08 Jun 2006 Posts: 355 Location: New York
|
|
|
|
Use the following step in JCL to view the Tape dataset.
[//COPYREC EXEC PGM=SORT
//SYSUDUMP DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//SYSDBOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
/*
//SORTIN DD DSN=ABCDFGR.JS6XXXT.PS0XXXX,DISP=SHR
//SORTOUT DD DSN=ABCDEFG.SAMPCB1.SORTOUT3,
// DISP=(NEW,CATLG,DELETE),
// DCB=(LRECL=80,RECFM=FB),
// SPACE=(CYL,(10,15),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
/*
This will copy the INPUT tape dataset into the DASD and you can view the output dataset as usual.
Regards,
ksk |
|
Back to top |
|
|
Aaru
Senior Member
Joined: 03 Jul 2007 Posts: 1287 Location: Chennai, India
|
|
|
|
As he said bring the TAPE dataset to DASD and then Browse/View the dataset.
You can use IEBGENER to copy the dataset from TAPE to DASD
Code: |
//STEP01 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=A
//SYSUT1 DD DSN=J.TAPE.UST.A,
// DISP=SHR
//SYSUT2 DD DSN=PQHL.DASD.UST.A,
// DISP=(NEW,CATLG,DELETE),
// UNIT=TEST80,SPACE=(CYL,(1000,1000),RLSE),DCB=*.SYSUT1
//SYSIN DD DUMMY
//*
|
|
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
If the tape file contains many, many records, i'd suggest copying the specific records that you want to look at to dasd.
Depending on the volume of data, you may not be able to copy it to "test" dasd and even if you do, it may be too large to work with online until you create a subset of the full volume. |
|
Back to top |
|
|
ujraju
New User
Joined: 17 Sep 2005 Posts: 1 Location: chennai
|
|
|
|
HI,
You can see the inforation of the tape data set by giving
Ti dataset name (and enter). |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello ujraju and welcome to the forums,
Thank you for joining and sharing.
Do keep in mind that your suggestion is site specific and may not work for every system. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Aaru,
I would suggest not to use above parameter, this'll eat a lot of amount of DASD.
ujraju wrote: |
Ti dataset name (and enter). |
Yup, it should be site specific, not working for me. |
|
Back to top |
|
|
dkalyan_c
New User
Joined: 06 Apr 2006 Posts: 17
|
|
|
|
hi,
u can convert tape file using fileaid.
//DD01 DD DISP=SHR,DSN=TAPE DATASET
//DD01O DD DSN=DASD DATASET,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(20,20),RLSE),
// DCB=(LRECL=4096,RECFM=FB,BLKSIZE=20480),
// UNIT=SYSDA
//*
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN DD *
$$DD01 COPY IF=(127,EQ,C'15'),
IF=(129,EQ,C'04',129,EQ,C'05')
/*
ABOVE COND IN COPY STATEMENT IS JUST AN EXAMPLE. U CAN GIVE ANY COND LIKE THIS AND CONVERT TO DASD |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
Hi !
For direct browsing a TapeFile you could use the DITTO Utility.
With that, you also could inspect the tape-headers. There you could get the informations Lrecl, Blksize and also the numers of records/blocks.
Ditto could be executed online via TSO or as a Batchjob.
Ask your system-people for more informations.
Regards, UmeySan |
|
Back to top |
|
|
logeswarank Warnings : 1 New User
Joined: 15 Oct 2006 Posts: 22 Location: Chennai
|
|
|
|
Hi,
Try this code.
Code: |
//STEP01 EXEC PGM=SORT
//SORTIN DD DSN=AXCC.FILE!.TAPE,DISP=SHR
//SORTOUT DD DSN=AXCC.FILE2.DISK,DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(25,25)),UNIT=SYSDA,
// DCB=*.SORTIN
//
/*
|
If its wrong correct me. |
|
Back to top |
|
|
|