Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums 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: 7314

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: 10535
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: 672
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 Get line number where cursor is from ... satish.ms10 CLIST & REXX 3 Wed Oct 24, 2018 12:23 am
No new posts Zipping a mainframe dataset using OSH... raviyuvi All Other Mainframe Topics 12 Thu Sep 06, 2018 7:13 pm
No new posts What is the purpose of z/OS dataset e... vasanthz All Other Mainframe Topics 3 Fri Aug 31, 2018 12:56 am
No new posts How can we create a flat file in JAVA... jasorn Java & MQSeries 2 Wed Aug 08, 2018 3:08 pm
No new posts Create view statement from SYSIBM.SYS... andrea DB2 5 Thu Aug 02, 2018 9:30 pm

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