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: 10626
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: 753
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 DFSMShsm Dataset Recovery with B and ... Joerg.Findeisen JCL & VSAM 0 Sat Oct 05, 2019 10:01 pm
No new posts Create Dynamic Sort card with Omit co... balaji81_k DFSORT/ICETOOL 9 Thu Sep 26, 2019 10:06 pm
No new posts Mainframe datasets without any last r... rajatbagga All Other Mainframe Topics 1 Tue Sep 24, 2019 8:47 am
No new posts Organization of a migrated dataset saravanakmr.tpr All Other Mainframe Topics 2 Fri Sep 20, 2019 6:10 pm
No new posts TSO TEST writing to dataset Harold Barnes IBM Tools 3 Sat Aug 03, 2019 3:02 am

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