Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Scan datasets created by a Racf id

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 11:56 am    Post subject: Scan datasets created by a Racf id
Reply with quote

Hi,

I am looking out for a tool/pgm etc to scan for the datasets created by a particular racf id in past one month say. We need to incorporate this tool in our project so that all the unwanted datasets/pds etc could be deleted thus saving the CPU consumed in saving these datasets on DASD. This is all done as a part of demand management initiative. Please let me know if there is such mechanism available. Also all the members are open to give me any suggestions towards saving of mainframe CPU.
Back to top
View user's profile Send private message

Anuj Dhawan

Senior Member


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

PostPosted: Mon Dec 07, 2009 2:47 pm    Post subject:
Reply with quote

Quote:
all the unwanted datasets/pds etc could be deleted thus saving the CPU consumed in saving these datasets on DASD
Grumble...How the removel of unwanted DSNs from DASD would save CPU? It might save you some DASD cost! icon_confused.gif
Quote:
I am looking out for a tool/pgm etc to scan for the datasets created by a particular racf id in past one month say
How will you find the last month thing, I can't help much though there are many examples in the forum is you search them.

To list the DSNs starting with some HLQ you can use IDCMAS LISTCAT but that gives nasty output from this exercise per se. I'd suggest to use:
Code:
//STEP10  EXEC PGM=IKJEFT1A                           
//SYSPROC   DD DSN=SYS1.SAMPLIB,DISP=SHR               
//SYSTSPRT  DD DSN=...HLQ.LIST.ALL,                   
//             DISP=(NEW,CATLG,CATLG),                 
//             UNIT=DISK,SPACE=(CYL,(50,50),RLSE),     
//             DCB=(RECFM=FB,LRECL=133,BLKSIZE=0)     
//SYSTSIN   DD *                                       
%IGGCSIRX                                             
HLQ.**                                             
/*                 
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 2:53 pm    Post subject: Reply to: Scan datasets created by a Racf id
Reply with quote

First of alll sorry for the typo error... I actually meant to say DASD charges and not the CPU...

Thanks for the info.. will surely try what you suggested....

Secondly ... could you suggest of any more ways for saving CPU or DASD charges....
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Mon Dec 07, 2009 3:15 pm    Post subject:
Reply with quote

Quote:
could you suggest of any more ways for saving CPU or DASD charges....
That's an over broad question, to start with. Suggest you search the forum, you'll get many valuable suggestion around here -- start from them.
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 3:24 pm    Post subject:
Reply with quote

I just ran the jcl but the job ended with RC=12 and the output dataset contained "READY
%IGGCSIRX
IKJ56500I COMMAND IGGCSIRX NOT FOUND"
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Mon Dec 07, 2009 3:26 pm    Post subject:
Reply with quote

icon_smile.gif, please show the JCL you've used.
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 3:28 pm    Post subject:
Reply with quote

Here is the jcl:

Code:
//TSTDM000 JOB (@),'HM1112',MSGCLASS=R,         
//             CLASS=A,                         
//         NOTIFY=&SYSUID                       
//*
//TSTDEL  EXEC PGM=IKJEFT1A,                           
//            DYNAMNBR=20,                             
//            REGION=4M                               
//*                                                   
//SYSTSPRT  DD DSN=PT3289A.DSN.ALL,                   
//             DISP=(NEW,CATLG,CATLG),                 
//             UNIT=DISK,SPACE=(CYL,(50,50),RLSE),     
//             DCB=(RECFM=FB,LRECL=133,BLKSIZE=0)     
//*                                                   
//SYSPRINT DD  SYSOUT=*                               
//SYSUDUMP DD  SYSOUT=*                               
//SYSTSIN  DD  *                                       
%IGGCSIRX                                             
NB4204A.**                       
/*
//*

Edited: Please use BBcode when You post some code/error, that's rather readable, Thanks... Anuj
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: Mon Dec 07, 2009 4:53 pm    Post subject:
Reply with quote

Now look at the JCL given by Anuj and have a little game of "Spot the difference"
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 4:57 pm    Post subject:
Reply with quote

I do not see any difference... please let me know if any[/code]
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Mon Dec 07, 2009 4:57 pm    Post subject:
Reply with quote

Hey, and as usual (in india) they are not 6 this time! icon_biggrin.gif
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 4:59 pm    Post subject:
Reply with quote

I did not get you sir.... sorry for the trouble...
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Mon Dec 07, 2009 5:04 pm    Post subject:
Reply with quote

medhachaudhari wrote:
I do not see any difference... please let me know if any[/code]



easier to show you the lines that are the same:
Code:

//SYSTSPRT  DD DSN=...HLQ.LIST.ALL,                   
//             DISP=(NEW,CATLG,CATLG),                 
//             UNIT=DISK,SPACE=(CYL,(50,50),RLSE),     
//             DCB=(RECFM=FB,LRECL=133,BLKSIZE=0)     
//SYSTSIN   DD *                                       
%IGGCSIRX                                             
HLQ.**                                             
/*         


that's the only thing that you coded the same as Anuj.
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: Mon Dec 07, 2009 5:12 pm    Post subject:
Reply with quote

medhachaudhari wrote:
I do not see any difference... please let me know if any[/code]

I can recommend a great optician icon_rolleyes.gif
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Mon Dec 07, 2009 5:22 pm    Post subject:
Reply with quote

Actually .. I had deliberately commented the library step....as I did not find the above pgm in SYS1.SAMPLIB ... but I was wrong...including the library actually helped... thanks so much for your help.. I definitely dont need an optician....

One more help... could I come to know the creation date here..
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: Mon Dec 07, 2009 5:44 pm    Post subject:
Reply with quote

You will need to change the REXX code to include the creation date

Documentation for CSI is HERE !
Back to top
View user's profile Send private message
medhachaudhari

New User


Joined: 07 Dec 2009
Posts: 18
Location: mumbai

PostPosted: Tue Dec 08, 2009 9:12 am    Post subject:
Reply with quote

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

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Tue Dec 08, 2009 9:54 am    Post subject:
Reply with quote

ISPF data set list has both SORT CREATED and SAVE commands. You can't find out who actually created a data set without SMF records (or some program that saved that info created from SMF records)
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts DUMP DATASETS VS TRACE DATASETS! lind sh CICS 4 Tue Dec 06, 2016 11:31 pm
No new posts Single COPY CICS TS datasets and when... Kyle Carroll CICS 2 Tue Oct 11, 2016 9:47 pm
No new posts RACF profile access vasanthz All Other Mainframe Topics 11 Fri Sep 23, 2016 5:51 am
No new posts CICS TS 5.3 migr after DFHCSDUP UPGRA... Kyle Carroll CICS 6 Wed Aug 31, 2016 10:58 pm
No new posts Finding unreferenced datasets without... Alan Playford JCL & VSAM 5 Tue Jul 12, 2016 9:07 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us