| View previous topic :: View next topic |
| Author |
Message |
nagapa
Beginner
Joined: 16 Sep 2004
Posts: 11
Topics: 4
|
 Posted: Thu Sep 16, 2004 7:13 am Post subject: Housekeeping datasets to increase availabe DASD/Tape |
 |
|
Hi,
I have about 4000 datasets relating to my application in development. I have to check for all datasets one by one and decide if I want to retain or delete them, and its a tedious process.
may I have a clue on how to get the list of all datasets that werent referred for x number of days.
Also, is there any option to release the unused tracks/cyls. Some datasets have a huge space allocated, but uses only a small size.
Thanks
Nagappan |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
|
| Back to top |
|
|
nagapa
Beginner
Joined: 16 Sep 2004
Posts: 11
Topics: 4
|
| Posted: Thu Sep 16, 2004 8:06 am Post subject: |
|
|
Hi Kolusu,
Thanks for your quick reply.
I tried this JCL
| Code: |
//STEP0001 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//LIST DD *
//SYSIN DD *
DUMP /* COMMAND DUMP */ -
DS(INCL(NALAIBS.**) /* QUALIFIER */ -
BY((REFDT,LE,*,-30)) /* SELECT IF REFDT LE 30 */ -
OUTDD(LIST) /* OUT DD NAME */ -
DELETE /* DELETE ALL THE DATASETS */
/*
|
But the job failed with rc 8
this is the message
TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP '
2004.260 08:55:15 INITIAL SCAN OF USER CONTROL STATEMENTS COMPLETED.
KEYWORD 'OUTDD ' IS IMPROPER
ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
2004.260 08:55:15 TASK NOT SCHEDULED DUE TO ERROR. TASK RETURN CODE 0008
2004.260 08:55:15 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0008 FROM
SYNTAX
TASK 001
Is this a syntax problem.
Thanks
Nagappan |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Thu Sep 16, 2004 8:17 am Post subject: |
|
|
Nagappan,
If you look at the JCL posted in the link the OUTDD is referring to a DUMMY dataset. But in your JCL you are assinging as if it is a Instream dataset.
Change
to
and re-run the job.
Hope this helps...
cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
nagapa
Beginner
Joined: 16 Sep 2004
Posts: 11
Topics: 4
|
| Posted: Thu Sep 16, 2004 8:46 am Post subject: |
|
|
Thanks Kolusu.....
It works.
Cheers
Nagappan |
|
| Back to top |
|
|
nagapa
Beginner
Joined: 16 Sep 2004
Posts: 11
Topics: 4
|
| Posted: Wed Oct 27, 2004 3:42 am Post subject: Housekeeping Migrated datasets |
|
|
Hi,
I am a new problem. I can use this JCL for all the datasets that are in DASD. For the datasets that are migrated to tape, this JCL restors them. When this dataset is restored, the last referenced date of that dataset is updated to today and fails to get filtered out..... Any Idea how to handle migrated datasets.......? |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Wed Oct 27, 2004 5:45 am Post subject: |
|
|
Nagapa,
Try to use the MGMTCLAS as filtering criteria for deleting the migrated datasets. Each shop has their own naming standards.
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Jeba
Beginner
Joined: 02 Dec 2002
Posts: 48
Topics: 9
Location: Columbus, GA
|
| Posted: Fri Oct 29, 2004 9:25 am Post subject: |
|
|
Hi,
I too wanted to know the datasets that were not used for some days.
So, I removed the delete step from the above specified command like the one below.
| Code: |
//STEP0100 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//LIST DD SYSOUT=*
//SYSIN DD *
DUMP /* COMMAND DUMP */ -
DS(INCL(JZS3222.**) /* INCLUDE ALL DSN WITH HLQ */ -
BY((REFDT,LE,*,-30)) /* SELECT IF REFDT LE 30 */ -
OUTDD(LIST) /* OUT DD NAME */
/*
|
I am getting a return code 8 for the job and the error message is below
| Code: |
TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP '
2004.303 10:15:10 INITIAL SCAN OF USER CONTROL STATEMENTS COMPLETED.
KEYWORD 'OUTDD ' IS IMPROPER
ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
2004.303 10:15:10 TASK NOT SCHEDULED DUE TO ERROR. TASK RETURN CODE 0008
2004.303 10:15:10 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0008 FROM
SYNTAX
TASK 001
|
Please let me know if I am missing something.
_________________
Thanks,
Jeba
(Known is a drop Unknown is an ocean) |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Fri Oct 29, 2004 9:51 am Post subject: |
|
|
Jeba,
You have an extra parenthesis after the BY keyword. Remove that and re-run your job.
Try this job.
| Code: |
//STEP0100 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//LIST DD SYSOUT=*
//SYSIN DD *
DUMP /* COMMAND DUMP */ -
DS(INCL(JZS3222.**) /* INCLUDE ALL DSN WITH HLQ */ -
BY(REFDT,LE,*,-30)) /* SELECT IF REFDT LE 30 */ -
OUTDD(LIST) /* OUT DD NAME */
/*
|
Hope this helps...
Cheers
kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Jeba
Beginner
Joined: 02 Dec 2002
Posts: 48
Topics: 9
Location: Columbus, GA
|
| Posted: Tue Nov 02, 2004 9:09 am Post subject: |
|
|
Kolusu and Ravi,
Sorry for the late response.
Thanks for your suggestions. After the change, I am able to get the correct results.
_________________
Thanks,
Jeba
(Known is a drop Unknown is an ocean) |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
