4/28/08 How to determine what is eating up your disk space

Step 1. Run the following command :

DSPOBJD OBJ(*ALL) OBJTYPE(*ALL) OUTPUT(*OUTFILE) OUTFILE(QGPL/OBJLIST)

CAUTION: Depending on the number of objects on your system this could take a while so you may want to submit it to batch:

SBMJOB CMD(DSPOBJD OBJ(*ALL) OBJTYPE(*ALL) OUTPUT(*OUTFILE)
OUTFILE(QGPL/OBJLIST)) JOB(BLDOBJLIST)

Step 2. Go to the interactive SQL processor (STRSQL) and run the following SQL statement:

SELECT * FROM QGPL/OBJLIST ORDER BY ODOBSZ DESC

The biggest offenders will be at the top of the list!

Step 3. Delete the OBJLIST file (created in Step 1): DLTF QGPL/OBJLIST

Disclaimer: Vision Solutions makes every effort to provide accurate system management information and programming code; however the company cannot be held liable for the accuracy of information nor its compatibility in your own environment. Please review and test thoroughly before implementing. © Copyright 2008, Vision Solutions, Inc. All rights reserved. IBM, System i, iSeries, and AS/400 are trademarks of International Business Machines Corporation. All other brands are property of their respective registered owners.

4/22/08 How to quickly see the contents of a data queue

Use the command:

DMPOBJ OBJ(library/object) OBJTYPE(*DTAQ)

The contents will be found in the spool file called QPSRVDMP


Disclaimer: Vision Solutions makes every effort to provide accurate system management information and programming code; however the company cannot be held liable for the accuracy of information nor its compatibility in your own environment. Please review and test thoroughly before implementing. © Copyright 2008, Vision Solutions, Inc. All rights reserved. IBM, System i, iSeries, and AS/400 are trademarks of International Business Machines Corporation.

4/17/08 How to automate copy, cut, and paste functions using 5250 Client Access

To enable the CTL-X, CTL-C, and CTL-V keyboard shortcuts so that you can delete, copy, and/or paste, click on the “Remap Keyboard Functions” icon (it looks like a little keyboard):

• Select the “Edit Cut” item in the Function pull down list.
• Set the Ctrl-X key for this function.
• Click the “File” menu item and save the keyboard map file.
• Click the “File” menu item on the 5250 window and save the change to the emulator.

Repeat these same steps to set the Ctrl-C key to run the “Edit Copy” function and the Ctrl-V key to run the “Edit Paste” function.

Disclaimer: Vision Solutions makes every effort to provide accurate system management information and programming code; however the company cannot be held liable for the accuracy of information nor its compatibility in your own environment. Please review and test thoroughly before implementing. © Copyright 2008, Vision Solutions, Inc. All rights reserved. IBM, System i, iSeries, and AS/400 are trademarks of International Business Machines Corporation.

4/13/07 How to ensure a job creates a job log when it ends

Ever have a job that ends abnormally but does not create a job log?

The command CHGJOB *SECLVL can be used to change an active job so that it creates a job log, which will allow you to see what has caused it to end.

From the WRKACTJOB screen, find the job and type a 2 (Change) next to the job, then press F10 (Additional parameters)

The following will appear under Message Logging:
Level . . . . . . . . . . . . > 4
Severity . . . . . . . . . . . > 00
Text . . . . . . . . . . . . . > *NOLIST

In the Text field, change *NOLIST to *SECLVL

You can also change parameters on this screen to log additional information about the CL being run.

In the Log CL Program Commands field change *NO to *Yes

So, the CHGJOB would look like this:

Message logging:
Level . . . . . . . . . . . . 4
Severity . . . . . . . . . . . 00
Text . . . . . . . . . . . . . *SECLVL
Log CL program commands . . . . *YES

This would then produce a joblog such as QEZJOBLOG

If you are running this from a command line - then do a CHGJOB LOG(4 00 *SECLVL) LOGCLPGM(*YES) before running your job. This should produce a job log when it ends abnormally (abend) or is shutdown abnormally.

If you cannot change the job once you logon - then look at what job description is being used and change that to the following:

CHGJOBD LOG(4 00 *SECLVL) LOGCLPGM(*YES)

You may need to change the signoff command to LOG(*LIST) to keep it from ditching the job log. SIGNOFF LOG(*LIST) if this is an interactive job you are wishing to log.

Disclaimer: Vision Solutions makes every effort to provide accurate system management information and programming code; however the company cannot be held liable for the accuracy of information nor its compatibility in your own environment. Please review and test thoroughly before implementing. © Copyright 2008, Vision Solutions, Inc. All rights reserved. IBM, System i, iSeries, and AS/400 are trademarks of International Business Machines Corporation.

4/7/08 View duration of the last Reclaim Storage operation.

Thinking it is time to run the Reclaim Storage command? Not sure how long it might take? Before you run it, you can see how long the operation took the last time it was excecuted.

On a command line type: DSPDTAARA QUSRSYS/QRCLSTG.
The screen will display the start and end times the last time a full Reclaim Storage command was excuted.

Disclaimer: Vision Solutions makes every effort to provide accurate system management information and programming code; however the company cannot be held liable for the accuracy of information nor its compatibility in your own environment. Please review and test thoroughly before implementing. © Copyright 2008, Vision Solutions, Inc. All rights reserved. IBM, System i, iSeries, and AS/400 are trademarks of International Business Machines Corporation.

4/3/08 How to locate partition ID, OS release level, serial number, model number, and processor feature

Your software vendors may ask you to confirm your system information in order to create license codes or PTF (Program Temporary Fix) information. Much information can be gained from system values and data areas.

Partition ID: Outside of the Hardware Management Console (HMC), you can find the partition ID in the Display Service Registration Information option on the Electronic Service Agent menu. To get to this display, open the Electronic Service Agent menu by typing GO SERVICE on a command line. Select option 6. The screen will display service registration information and the machine type, serial number, and the partition ID.

You can also use the following commands to access these individually.
- i5/OS (OS/400) Release: (DSPDTAARA QSS1MRI) Can also be seen with the DSPPTF command.
- Serial Number: (DSPSYSVAL QSRLNBR)
- Model Number: (DSPSYSVAL QMODEL)
- Processor Feature Code: (DSPSYSVAL QPRCFEAT)

Disclaimer: Vision Solutions makes every effort to provide accurate system management information and programming code; however the company cannot be held liable for the accuracy of information nor its compatibility in your own environment. Please review and test thoroughly before implementing. © Copyright 2008, Vision Solutions, Inc. All rights reserved. IBM, System i, iSeries, and AS/400 are trademarks of International Business Machines Corporation.