Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
LIKE operand with Tapes

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
ozgurseyrek

New User


Joined: 22 Feb 2008
Posts: 70
Location: Turkey

PostPosted: Wed Dec 30, 2009 12:43 pm    Post subject: LIKE operand with Tapes
Reply with quote

Hello,
I am using like operand at the SORT programs if the input is Dataset,
Bu t ican't use like for tapes, and I have to type LRECL and RECFM info at the output.

Are the any way that to use like operant with the tape datasets.
thanks...

Code:

/*                                                           
//SORTST1  EXEC  PGM=ICEMAN                                   
//TOOLMSG  DD    SYSOUT=*                                     
//DFSMSG   DD    SYSOUT=*                                     
//SYSOUT   DD    SYSOUT=*                                     
//SORTIN   DD    DSN=XXX.YYY.ZZZ,DISP=SHR,VOL=SER=AAAA               
//SORTOUT  DD    DSN=XXX.YYY.ZZZ2,DISP=(,CATLG,DELETE), 
//             LIKE=XXX.YYY.ZZZ                         
//SYSIN    DD    *                                           
  OPTION COPY                                                 
  OUTFIL STARTREC=100,SAMPLE=100                             
/*
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed Dec 30, 2009 1:18 pm    Post subject:
Reply with quote

Quote:
Bu t ican't use like for tapes, and I have to type LRECL and RECFM info at the output.

So much information, I don't know where to start.

Please explain why you can not use the LIKE parameter with tapes, including any error messages and codes issued by the failing job.

Have you read the "JCL reference" manual oh so easily accessible from the "IBM Manuals" button at the top of the page. What does it say in there about it.

Have you considered using a referback via the DCB= parameter instead ?
Back to top
View user's profile Send private message
ozgurseyrek

New User


Joined: 22 Feb 2008
Posts: 70
Location: Turkey

PostPosted: Wed Dec 30, 2009 2:31 pm    Post subject:
Reply with quote

Hi Expat,
error is like that;

Code:
IEF344I REPROOS SORTST1 SORTOUT - ALLOCATION FAILED DUE TO DATA FACILITY SYSTEM ERROR
IGD17410I DATA SET REFERENCED BY LIKE= TAPEX.YYY.ZZZZ NOT ON A DASD VOLUME
IGD17409I FAILURE OCCURRED IN DATA SET PROPERTIES MERGE WHILE ATTEMPTING TO   
Back to top
View user's profile Send private message
ozgurseyrek

New User


Joined: 22 Feb 2008
Posts: 70
Location: Turkey

PostPosted: Wed Dec 30, 2009 3:13 pm    Post subject:
Reply with quote

Hello,
I have found REFDD operand at the Manuals and it is worked like I want,
thanks.

The solution;
Code:
/*                                                           
//SORTST1  EXEC  PGM=ICEMAN                                   
//TOOLMSG  DD    SYSOUT=*                                     
//DFSMSG   DD    SYSOUT=*                                     
//SYSOUT   DD    SYSOUT=*                                     
//SORTIN   DD    DSN=TAPEX.YYY.ZZZ,DISP=SHR,VOL=SER=AAAA               
//SORTOUT  DD    DSN=XXX.YYY.ZZZ2,DISP=(,CATLG,DELETE), 
//             REFDD=*.SORTIN                         
//SYSIN    DD    *                                           
  OPTION COPY                                                 
  OUTFIL STARTREC=100,SAMPLE=100                             
/*
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed Dec 30, 2009 3:38 pm    Post subject:
Reply with quote

And thank you for posting the solution which may benefit others icon_biggrin.gif
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Wed Dec 30, 2009 3:46 pm    Post subject: Reply to: LIKE operand with Tapes
Reply with quote

What benefit does doing this provide?
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Wed Dec 30, 2009 4:59 pm    Post subject:
Reply with quote

From the error description:
Code:
LIKE= TAPEX.YYY.ZZZZ


nowhere in the original jcl for the sort step is TAPEX.YYY.ZZZZ,

yet the solution is REFDD=*.SORTIN which is TAPEX.YYY.ZZZ.

yet again, problem exists because poster can not type accurately.
attention to detail.......................................
Back to top
View user's profile Send private message
ozgurseyrek

New User


Joined: 22 Feb 2008
Posts: 70
Location: Turkey

PostPosted: Wed Dec 30, 2009 5:15 pm    Post subject:
Reply with quote

You are very meticulous dbzTHEdinosauer thanks,
but the solition code is consistent in itself, which is the improtant point is this I think.
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
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Report of uncataloged Tapes pmvino JCL & VSAM 9 Thu Jul 19, 2012 4:07 pm
No new posts DFSMShsm RECYCLE, DUPLEX tapes and SMS Ivan P JCL & VSAM 14 Thu Jun 21, 2012 1:53 pm
No new posts DISPLAY operand and edit masks madmartinsonxx DFSORT/ICETOOL 1 Tue Oct 11, 2011 1:45 am
No new posts DISPLAY and BREAK operand madmartinsonxx DFSORT/ICETOOL 4 Fri Sep 30, 2011 2:00 am
No new posts Need to Know about files writing on T... sureshmurali JCL & VSAM 5 Tue Dec 28, 2010 11:32 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us