Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Create date & last accessed date of a seq dataset & PDS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
shanudarling
Warnings : 1

New User


Joined: 20 Dec 2006
Posts: 55
Location: noida

PostPosted: Wed Sep 09, 2015 2:52 pm    Post subject: Create date & last accessed date of a seq dataset & PDS
Reply with quote

Hi,

My requirement is that I have to create a program which will have 2 inputs -
1. a high level qualifier for a dataset lets says 'XXXXXX'
2. date

Using these 2 inputs I have to create a report which will contain a list of all the datasets with that qualifier where the last accessed date of the dataset is less than the date passed as an input to the program.

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

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7312

PostPosted: Wed Sep 09, 2015 3:21 pm    Post subject: Reply to: Create date & last accessed date of a seq dataset & PDS
Reply with quote

Talk to your storage people. They probably have something already. If not, they'll know how to do it without doing something careless.
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10690
Location: italy

PostPosted: Wed Sep 09, 2015 3:39 pm    Post subject: Reply to: Create date & last accessed date of a seq dataset & PDS
Reply with quote

/good mood on

to list the datasets that were not referenced for one year ...

Code:
 000005 //DSS     EXEC PGM=ADRDSSU,REGION=0M,
 000006 //             PARM='TYPRUN=NORUN'
 000007 //SYSPRINT  DD SYSOUT=*
 000008 //SYSIN     DD *
 000009   DUMP -
 000010        DATASET( -
 000011                 INCLUDE( -
 000012                          XXXXXX.** -
 000013                        ) -
 000014                 BY( REFDT LT (*,-365) ) - 
 000015               ) -
 000016        OUTDDNAME(OUT)
 000017 //OUT       DD DUMMY


/good mode off
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 822
Location: The Universe

PostPosted: Wed Sep 09, 2015 5:17 pm    Post subject:
Reply with quote

LISTDSI can retrieve the create date and last used date, but the last modified date is not a data set attribute, but LISTDSI needs a data set name, which is harder to get in Rexx. Mr. Woodger is correct: talk to your storage people.
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to filter out certain records bas... manugeorge2004 JCL & VSAM 5 Wed Jun 17, 2020 10:05 pm
No new posts Fetch the Dataset names from inside m... kalyan94 TSO/ISPF 18 Wed Jun 17, 2020 2:06 pm
No new posts reffering the filename with date and ... skbk JCL & VSAM 9 Sat Jun 06, 2020 4:57 pm
No new posts Add the name in the PS file and creat... dharmaraok DFSORT/ICETOOL 9 Wed Apr 01, 2020 10:43 am
No new posts what is the DSORG(Datset orgnisation)... sandeep prajapati JCL & VSAM 8 Mon Mar 30, 2020 9:09 pm

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