|
Brian, There's a Last Used Date on the object header. DSPOBJD to an outfile will give you what you're asking for -- but not necessarily what you want! First caution for people looking to delete things based on last access: remember some things are called rarely -- really rarely. Think of month-end and year-end processing. Also, consider that in these cases there may be cases where a given program is only used in certain years depending on business rules. Second caution: when looking at files don't forget that SQL's use of an index or the statistics "owned" by an index don't update the last used date. Third caution: Make sure that "usage collection" is enabled on the object before looking at last used date. Fourth caution: Stats can be reset -- make sure you collect for a long enough time period. -Walden ------------ Walden H Leverich III Tech Software (516) 627-3800 x11 WaldenL@xxxxxxxxxxxxxxx http://www.TechSoftInc.com Quiquid latine dictum sit altum viditur. (Whatever is said in Latin seems profound.) -----Original Message----- From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Brian Piotrowski Sent: Wednesday, October 12, 2005 4:17 PM To: Midrange Systems Technical Discussion Subject: Determining Program "Last Access Date" Hi All, We have (I'm sure of it!) many internally-written programs that have been rewritten and are currently in use. However, the programmers failed to remove the old program code and objects out of our AS/400, resulting in many duplicated programs that may or may not be in use. I have been tasked to figure out what objects are currently in use and what objects can be removed. Is there an easy way to determine when a program was last run and whether or not is it currently in use? I'd really like to be able to say "show me all programs that have not been accessed in 2005" or something to that effect. Any ideas would be appreciated. Thanks! Brian. -=-=-=-=-=-=-=-=-=-=-=-=-=- Brian Piotrowski Specialist - I.T. Simcoe Parts Service, Inc. Ph: 705-435-7814 x343 Fx: 705-435-6746 bpiotrowski@xxxxxxxxxxxxxxx -=-=-=-=-=-=-=-=-=-=-=-=-=-
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.