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

How to add the sorted out GDG into a tape?


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Lord.of.Wind

New User


Joined: 17 Nov 2005
Posts: 60

PostPosted: Mon May 05, 2008 2:22 pm
Reply with quote

I coded as the following, will it work?
If wrong, how to do it?

Many thanks!

Code:

//JS100    EXEC PGM=SORT                               
//SYSOUT    DD SYSOUT=*                               
//SORTIN    DD DSN=gdgfile(0),
//             DISP=(SHR,KEEP,KEEP)                   
//SORTOUT   DD DSN=tapefile(+1)
//             DISP=(NEW,CATLG,CATLG),
//             UNIT=TAPEC,           
//             LABEL=EXPDT=99000,     
//             DCB=(SYS3.DSCB),       
//             MGMTCLAS=MCMT0001     
//SYSIN      DD *                                               
     SORT FIELDS=COPY                                           
     INCLUDE COND=(53,7,CH,LE,DATE2(-)-12)
//*
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1208
Location: Bangalore,India

PostPosted: Mon May 05, 2008 2:48 pm
Reply with quote

Hello,

Would you please tell us that why u use include condition ?U have not mentioned it in ur requirement.
If its in the requirement than run it & check the resukts.
Back to top
View user's profile Send private message
Lord.of.Wind

New User


Joined: 17 Nov 2005
Posts: 60

PostPosted: Mon May 05, 2008 2:50 pm
Reply with quote

Thank you for your reply.

I use the condition to filter out records that created 12 months ago. It can be neglected.
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1208
Location: Bangalore,India

PostPosted: Mon May 05, 2008 2:51 pm
Reply with quote

Hi ,

Run it & let's know the results.
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Mon May 05, 2008 11:15 pm
Reply with quote

Well,

I don't understand why this is being asked
Quote:
will it work?
if You've already tried it, did you get some error, or you dont have any mainframes "connection" these days.

Anways, it would work, but you can modify it a bit

- There is no need of KEEP in DIPS of SORIN, just SHR in enough.
- if your shop is SMS managed, then no need code the following in the DCB of SORTOUT
Code:

//             DCB=(SYS3.DSCB),       
//             MGMTCLAS=MCMT0001     


BTW, I would also say
Quote:
un it & let's know the results.
Back to top
View user's profile Send private message
Lord.of.Wind

New User


Joined: 17 Nov 2005
Posts: 60

PostPosted: Tue May 06, 2008 7:49 am
Reply with quote

I asked if it would work because I have no R&D tape to test the codes. I cannot test it in production environment.
I will let you know when I make it.
Thanks!
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Deleting a Tape file JCL & VSAM 14
No new posts JCL and TAPE drives: how to maximize ... JCL & VSAM 9
No new posts ADR324E-VOL/DATASET SPECIFIED BY DDNA... JCL & VSAM 6
No new posts Get two files from one file with diff... DFSORT/ICETOOL 10
No new posts Record count of RECFM=U tape file DFSORT/ICETOOL 17
Search our Forums:

Back to Top