Reader Feedback and Insights: Thanks for Qshell Tips

November 20, 2002 Timothy Prickett Morgan

Hey, Ted:

I just wanted to drop you a note of thanks for the QShell tips you’ve shared in the Guild Companies publications, Midrange Guru and Midrange Programmer. One of my clients had a PC text file of information but just wanted from it a printed list of the part numbers. Since the majority of ISBNs begin with 0 or 1, I came up with the following solution (based on the great tips from you) using QShell:

touch -C 819 isbnlist.txt
grep ^[01] cat_prb.txt >isbnlist.txt

That produced a nice ASCII list of files in the Integrated File System (IFS),

V5R1 Storage Model Mismatch

November 20, 2002 Timothy Prickett Morgan

Hey, Ted:

I made a small change to a CL module, compiled it, and tried to use the Update Program (UPDPGM) command to replace the changed module in the program. However, the update of the program failed because of the storage model of the recompiled module.

Apparently, the default values for the storage model (and teraspace) have been changed since we migrated from V4R5 to V5R1. The error message (CPD5CD1) says that the module that I am trying to replace was created with storage model *SNGLVL, while the replacement module was created with storage model *INHERIT. I cannot set this

Get Rid of Old IFS Files

November 20, 2002 Timothy Prickett Morgan

Hey, Ted:

The Integrated File System (IFS) on my system is filling up and I need to clean house. Is there anything in your bag of Qshell tricks that will tell me which files in an IFS directory have not been used recently?

— Neal

Yes, Neal, Qshell can handle the job. However, it may not be the best solution. I will show you how to tackle this project with Qshell and then offer an alternative.

Qshell’s ls utility lists the contents of a directory. To see all the files in a directory in chronological order–from earliest to latest date