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: 7315

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

Global Moderator


Joined: 14 Mar 2007
Posts: 10310
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: 564
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 Compare yesterday's date to the one o... migusd SYNCSORT 5 Fri Sep 22, 2017 11:35 pm
No new posts Validate the Date girishb2 DFSORT/ICETOOL 9 Tue Sep 19, 2017 1:12 am
No new posts Create procedure issues -628 when add... chandraBE DB2 1 Mon Sep 18, 2017 12:16 pm
No new posts How do I create a mainframe monitorin... anjali.bisht All Other Mainframe Topics 4 Fri Sep 01, 2017 2:20 pm
No new posts Julian Date to CICS ABSTTIME blayek CICS 3 Wed Aug 30, 2017 11:15 pm

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