|
midrange.com
<<1) is there such a process to do this already built into the IPL
He says the answer is yes...but only every so many IPL's Does it actually
"flip the switch" and run this process. >>
On the older AS/400s, It use to be said that for every 7 IPLs, it would
bring down the spools storage and deal with the % perm/temp addresses used
portion. But I dont know if thats the case now or not since the iSeries have
come out. I havent paid attention to it since I have a utility that does
several things upon IPLing the system.
1) delete all spool files larger than 10,000 pages (program available upon
request)
2) delete all spool files older than xx number of days (program available
upon request)
Theres no reason to IPL your system every night, once a week in enough. I
have another program (below) that will display the size of your QSPL. The
query follows.
PGM
DSPOBJD OBJ(QSPL/*ALL) OBJTYPE(*ALL) +
OUTPUT(*OUTFILE) OUTFILE(TECHLIB/SIZEB30)
RUNQRY QRY(TECHLIB/SIZEB30) +
QRYFILE((TECHLIB/SIZEB30)) +
OUTTYPE(*DISPLAY) OUTFORM(*DETAIL)
ENDPGM
File . . . . . . . . . SIZEB30 Name, F4 for list
Library . . . . . . TECHLIB Name, *LIBL, F4 for list
Member . . . . . . . . *FIRST Name, *FIRST, F4 for list
Format . . . . . . . . QLIDOBJD Name, *FIRST, F4 for list
Seq Field Text Len
Dec
10 ODLBNM Library 10
20 ODOBNM Object 10
30 ODOBTP Object type 8
40 ODOBSZ Object size 10
0
50 ODOBTX Text description 50
ODDCEN Display century 1
Sort
Prty A/D Field Text Len
Dec
10 D ODOBSZ Object size 10
0
ODLBNM Library 10
ODOBNM Object 10
ODOBTP Object type 8
ODOBTX Text description 50
---Options--- Field Text Len
Dec
ODLBNM Library 10
ODOBNM Object 10
ODOBTP Object type 8
1 2 3 4 5 ODOBSZ Object size 10
0
ODOBTX Text description 50
Type choices, press Enter.
Use rounding . . . . . . . . . . . Blank, Y=Yes, N=No
Ignore decimal
data errors . . . . . . . . . . Blank, Y=Yes, N=No
Ignore character
substitution warnings . . . . . Y Y=Yes, N=No
Use collating sequence for
all character comparisons . . . N Y=Yes, N=No
You can also try running the RCLSPLSTG command. Below is what it does:
The Reclaim Spool Storage (RCLSPLSTG) command reclaims unused
storage for spooled files that have not been used for more than the
number of days specified by the user. Spooled files are stored with
database file members on the system. When a spooled file is
deleted, the member is emptied but not deleted. Therefore, the
member can be reused for the next spool file created. Reusing empty
members improves the performance time when creating new spooled
files. The RCLSPLSTG command deletes unused and empty database
members. This command uses synchronous processing. More
information about synchronous processing is in the Backup and
Recovery book, SC41-5304.
Steven Segars
AS/400 Certified Specialist/Administrator
CSX Technology
Work: 904-633-5650
Fax: 904 633-1051
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.
