IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to browse the contents of a tape file


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 8:48 am
Reply with quote

How to browse the contents of a tape file? or Is there a command on this or a job?
Can we copy from TAPE unit to DASD? Its just that it is issuing an
SD37 space allocation issue..


I really need your help.

Thanks.
Back to top
View user's profile Send private message
0d311

Guest





PostPosted: Tue Jul 10, 2007 9:07 am
Reply with quote

Hi Lui,

Yes, you can copy the contents of tape to DASD. If you are encountering an space abend, you can specify a larger allocation in the SPACE parameter and also allow your job to use more volumes.
Back to top
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 9:17 am
Reply with quote

Can you give me an idea on that or example? Specify a large space allocation and using more volumes..

Its just that how can i do that?

Thanks.
Back to top
View user's profile Send private message
Rambhupal.chaudari

New User


Joined: 30 Mar 2007
Posts: 25
Location: Hyderabad

PostPosted: Tue Jul 10, 2007 10:09 am
Reply with quote

Code:
                           
//STEP1  EXEC PGM=SORT                                 
//SYSOUT   DD  SYSOUT=*                               
//SORTIN   DD DSN=XXXXXXX,DISP=SHR 
//SORTOUT  DD DSN=YYYYYYYYY,
//            DISP=(,CATLG,DELETE),                 
//            UNIT=WORK,SPACE=(CYL,(100,500),RLSE)     
//SYSIN    DD  *                                       
  OPTION COPY
/*
Back to top
View user's profile Send private message
0d311

Guest





PostPosted: Tue Jul 10, 2007 10:24 am
Reply with quote

Code:

//STEP01   EXEC PGM=SORT
//SORTIN   DD DISP=SHR,DSN=YOUR.TAPE.DATASET.HERE
//SORTOUT  DD DSN=YOUR.DASD.DATASET.HERE,                               
//            DISP=(,CATLG,DELETE),                                 
//            UNIT=SYSDA,                                                 
//            SPACE=(CYL,(200,50),RLSE)
//SYSOUT   DD SYSOUT=*                                                 
//SYSIN    DD *                                                         
  OPTION COPY
/*
Back to top
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 11:22 am
Reply with quote

Thanks , i'll try this one.
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 11:29 am
Reply with quote

I just wanna ask if what is the highest/largest number can we issue on
space parameters just in case it is insufficient.?

SPACE=(CYL,(200,50),RLSE..?

Thanks.
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 11:30 am
Reply with quote

I issue the above command...
and it abended ABENDED SD37

How can I resolve this one with the parameters that you gave to me?
thanks.
Back to top
View user's profile Send private message
haikiran

New User


Joined: 08 May 2007
Posts: 4
Location: hyderabad

PostPosted: Tue Jul 10, 2007 11:37 am
Reply with quote

You can also use IEBGENER utility to copy the tape file to a disk. However, make sure that you are using the right CLASS parameter in the job card.
Back to top
View user's profile Send private message
haikiran

New User


Joined: 08 May 2007
Posts: 4
Location: hyderabad

PostPosted: Tue Jul 10, 2007 11:39 am
Reply with quote

Tape files are usually Huge. So, try increasing the cylinders to 500,200.
Also try including a Volume Serial if you have any.
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 11:45 am
Reply with quote

I tried to use 500,500 still SD37 was issued..I know that it has 60million of records so how can we possibly or can it be possible to compute estimate the space allocation for this?

Volser=? where could I refer this one?

Thanks
Back to top
View user's profile Send private message
0d311

Guest





PostPosted: Tue Jul 10, 2007 12:51 pm
Reply with quote

0d311 wrote:
Code:

//STEP01   EXEC PGM=SORT
//SORTIN   DD DISP=SHR,DSN=YOUR.TAPE.DATASET.HERE
//SORTOUT  DD DSN=YOUR.DASD.DATASET.HERE,                               
//            DISP=(,CATLG,DELETE),                                 
//            UNIT=SYSDA,                                                 
//            SPACE=(CYL,(200,50),RLSE)
//SYSOUT   DD SYSOUT=*                                                 
//SYSIN    DD *                                                         
  OPTION COPY
/*


that's weird... i didn't type this.... here it is... multivolume datasets..

Code:

//STEP01   EXEC PGM=SORT,PARM='LIST'                                   
//SORTIN   DD DISP=SHR,DSN=YOUR.TAPE.DATASET.HERE                             
//SORTOUT  DD DSN=YOUR.DASD.DATASET.HERE,                               
//            DISP=(NEW,CATLG,DELETE),                                 
//            UNIT=SYSDA,     
//            VOL=(,,,20),                                             
//            SPACE=(CYL,(200,50),RLSE),                                 
//            DCB=(RECFM=FB,LRECL=??,                     
//            DSORG=PS)                                                 
//SYSOUT   DD SYSOUT=*                                                 
//SYSIN    DD *                                                         
  SORT FIELDS=COPY
Back to top
wicked1925

New User


Joined: 12 Mar 2007
Posts: 15
Location: Philippines

PostPosted: Tue Jul 10, 2007 1:21 pm
Reply with quote

SD37 abend usually happens if an output dataset used up all the primary space allocation and there is no secondary space requested.

try asking datacenter for volumes with high free extents for you to use in your jcl.

BTW, im form MDC too icon_biggrin.gif
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 1:24 pm
Reply with quote

Is this the maximum value of the space parameters and sortwk01?
What is the max allocation for this?

Thanks
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Jul 10, 2007 1:34 pm
Reply with quote

madlui56
I would like to redirect here http://ibmmainframes.com/viewtopic.php?t=22617
Back to top
View user's profile Send private message
wicked1925

New User


Joined: 12 Mar 2007
Posts: 15
Location: Philippines

PostPosted: Tue Jul 10, 2007 1:35 pm
Reply with quote

maximum space allocation usually depends on how much free space is available in a certain volume. you can specifiy any value that you want but if the volume requested can not accomodate that value, your job will just die. and it is not appropriate to use too much space especially if job runs side by side with a job that uses the volume.
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 1:52 pm
Reply with quote

VOL=(,,,20) ? I would like to know if what is the function of this and if this is for volumes how can I increase the request specified to this parameters? I

Thanks
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1436
Location: Bangalore,India

PostPosted: Tue Jul 10, 2007 2:01 pm
Reply with quote

Louielee,

Quote:
VOL=(,,,20) ?

This is for specifying multi volume dataset (equivalent of UNIT=(SYSDA,20)).
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 2:08 pm
Reply with quote

How can I increase the requested volume?
And for what purpose would you do this for, its just that Ive learned this just through this current forum and topic.


Thanks.
Back to top
View user's profile Send private message
0d311

Guest





PostPosted: Tue Jul 10, 2007 2:10 pm
Reply with quote

Meaning just in case there is not enough space on a volume, it can still get space from other available volumes to suffice the space you indicated in the SPACE parameter.
Back to top
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1436
Location: Bangalore,India

PostPosted: Tue Jul 10, 2007 2:15 pm
Reply with quote

Louielee ,

Taken from QW -

Quote:
vol count

Specifies the maximum number of volumes that an OUTPUT data
set requires. This is a decimal number in the range 1
through 255, inclusive - the total number of output volumes
for a DD statement may not exceed 4,096 volumes, however.

You should code this parameter when an output data set will
require more than 6 volumes. If the volume count is omitted
or 1 through 5 is specified, the maximum allowed is 5
volumes. If 6 through 20 is specified, the maximum allowed
is 20 volumes. If the specified is greater than 20, the
maximum allowed is a multiple of 15 plus 5, up to 255.


Please refer quick refernce for this kind of stuff.
Back to top
View user's profile Send private message
madlui56

New User


Joined: 08 Aug 2006
Posts: 61
Location: Philippines

PostPosted: Tue Jul 10, 2007 2:15 pm
Reply with quote

Here is my Job wherein it issue SD37

//STEP0012 EXEC PGM=SORT
//SORTIN DD DSN=WXX220.ECL2.R1.DEMOIA.FOUND.PAF,
// DISP=SHR
//SORTOUT DD DSN=PU1659A.ECL2.R1.DEMOIA.FOUND.PAF.DASD,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,VOL=(,,,20),
// SPACE=(CYL,(4000,4000),RLSE),
// DCB=(RECFM=FB,LRECL=409,DSORG=PS)
//SORTWK01 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK02 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK03 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK04 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK05 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK06 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK07 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK08 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK09 DD SPACE=(CYL,(4000,4000),RLSE)
//SORTWK10 DD SPACE=(CYL,(4000,4000),RLSE)

What are the ways to increase or to solve the space error?
thanks.
Back to top
View user's profile Send private message
0d311

Guest





PostPosted: Tue Jul 10, 2007 2:33 pm
Reply with quote

Hi Lui,

CYL,(4000,4000) is a huge amount icon_eek.gif

Does your site have SMS? maybe you can remove the space parameter and just allow the system to set the space automatically.

I'm not sure but I think it's not necessary to have all the SORTWKNN there... I think 1 sortwk will be just fine... (BTW, in our site, we can run SYNCSORT and not define SORTWKNN)
Back to top
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1436
Location: Bangalore,India

PostPosted: Tue Jul 10, 2007 2:34 pm
Reply with quote

Louielee ,

Please remember you will get error if the system fails to allocates the space you had defined. From your JCL, I could see you had used 4000 for primary and secondary for 12 dd statements. Are sure you have that much space available in DASD. Reduce the 4000 to number 1000 and below. Do some permutation and combination excercise (with the numbers) to get the job successful.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8796
Location: Welsh Wales

PostPosted: Tue Jul 10, 2007 2:57 pm
Reply with quote

I would guess that you space abend occurs on the SORTOUT DD name, so as previously said, I am not sure that you need any SORTWK DD statements in your JCL when you use COPY.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM Goto page 1, 2  Next

 


Similar Topics
Topic Forum Replies
No new posts Unable to interpret a hex value to De... COBOL Programming 4
No new posts how to eliminate null indicator value... DB2 7
No new posts Format Binary file to EBCDIC JCL & VSAM 4
No new posts Binary File format getting change whi... All Other Mainframe Topics 7
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 3
Search our Forums:

Back to Top