|
|
| Author |
Message |
Lord.of.Wind
New User
Joined: 17 Nov 2005 Posts: 34
|
|
|
|
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 |
|
 |
References
|
Posted: Mon May 05, 2008 2:22 pm Post subject: Re: How to add the sorted out GDG into a tape? |
 |
|
|
 |
guptae
Moderator
Joined: 14 Oct 2005 Posts: 990 Location: Bangalore,India
|
|
|
|
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 |
|
 |
Lord.of.Wind
New User
Joined: 17 Nov 2005 Posts: 34
|
|
|
|
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 |
|
 |
guptae
Moderator
Joined: 14 Oct 2005 Posts: 990 Location: Bangalore,India
|
|
|
|
Hi ,
Run it & let's know the results. |
|
| Back to top |
|
 |
Anuj D.
Senior Member
Joined: 22 Apr 2006 Posts: 1260 Location: Mumbai, India
|
|
|
|
Well,
I don't understand why this is being asked
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 |
|
 |
Lord.of.Wind
New User
Joined: 17 Nov 2005 Posts: 34
|
|
|
|
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 |
|
 |
|
|