AS/400 HELP
“LASTUSED”
Display a list of *pgm objects with their
date of last use.
LASTUSED is
simple little CL program that runs DSPOBJD to a work file in QTEMP and then
runs RUNQRY to show a list of programs in a requested library. The list is
sorted by ‘last used date’. (your
AS/400 must have QUERY installed) You
can use this list to gauge daily program usage and also to drop ‘deadbeat’
never used programs.
LASTUSED was
tested at V5.1 and V4.5 It was saved at
V3.2
PC INSTRUCTIONS:
Download "LASTUSED” to your PC.
Go to a DOS session and enter the following;
FTP SYSTEM (system = your AS/400’s name or IP address)
Enter a valid user id and password
CD QGPL
LCD C:\DIRECTORY (directory= the directory on your pc where you
downloaded “ lastused.savf”
QUOTE
SITE NAMEFMT 1
BIN
PUT
LASTUSED.SAVF
QUOTE RCMD
RSTLIB SAVLIB(LASTUSED) DEV(*SAVF) SAVF(QGPL/LASTUSED)
Note: If there is a security problem restoring all
objects with the command above, sign on
to your as/400 as Qsecofr and run RSTLIB
from the command line.
AS/400
INSTRUCTIONS:
ADDLIBLE LASTUSED
LASTUSED