John McKown wrote:
OK, likely nobody else is anywhere near as weird as I. But I really don't care for the output from the SMP/E UNLOAD DDDEF command. It is difficult to easily find things because a single logical DDDEF is spread across multiple lines. So I wrote the little Perl program below. The only "minus" is the fact that you must put the output from the DDDEF into a UNIX file, not a sequential file. Basically, it puts every logical statement on a single physical line and squeezes all multiples spaces not in ticks into a single space. I don't claim this is the best possible. And, in fact, I actually do most of this type of work on my Linux desktop instead of z/OS itself. That way, I save CPU cycles, which saves money, which puts a smile on managements' face. (we are also in the cost-cutting mode - we just released about 1/4 of our IT staff as well as people in other departments.)
Hmmm. So I don't suppose they are in the mood for any training. :) [OTOH, training some of the remaining 3/4 to be more productive might pay back; just blue-sky-ing.] Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques ==> Check out the Trainer's Friend Store to purchase z/OS <== ==> application developer toolkits. Sample code in four <== ==> programming languages, JCL to Assemble or compile, <== ==> bind and test. <== ==> http://www.trainersfriend.com/TTFStore/index.html <== ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
