AS/400 HELP
"OPENFILES"
Print a list of all open files
OPENFILES prints two
lists of all open files. Information
is gathered by APIs QUSLJOB, QUSRJOBI and QDMLOPNF and put into file: OPENFILES. The two lists are printed from OPENFILES with
QUERY.
List 1 is in
order of filename / library. List
2 is in order of user name
OPENFILES was
developed at V5.1 and will not work at any lower release
PC INSTRUCTIONS:
Download "OPENFILES” 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 “ openfiles.savf”
QUOTE
SITE NAMEFMT 1
BIN
PUT
OPENFILES.SAVF
QUOTE RCMD
RSTLIB SAVLIB(OPENFILES) DEV(*SAVF) SAVF(QGPL/OPENFILES)
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 OPENFILES
CALL OF