Dear Folks,
I would like to show all of you how to display the contents of
almost any control block on your system, in a very convenient format,
and very easily. All you have to do is slightly modify an existing
assembler program with the name of the control blook, its mapping macro,
and the length that you want to dump (usually the length in the control
block as shown by its macro).
The dumping program only has to be authorized if the control block
is in fetch protected storage, and many of them aren't.
How to do it? Just look in CBT File 566 (on www.cbttape.org) and
use one of the DUMP**** programs as a model. All you have to change
(usually) is the name of the mapping macro, assembler instructions how
to get there (usually just a couple of lines), and the length to dump.
Of course you should also change the name of the program. But that's
just about all you have to do.
I am telling you about this because:
1. I want to help all of you.
2. I would like to increase our collection of control blocks displayed,
by having you send your new ones to me, to add to the collection. (Of
course you will get your name credited if you so choose.)
Thanks. All the best of everything to all of you.
Sincerely, Sam
So here is some sample output: DUMPPSCB (this one happens to be
authorized)
*** DUMP OF PSCB - LENGTH= 108/06C ***
00006F80 +0000 C3C2E3F0 F0F14006 F3F3F9F0 40404040 *CBTX01 .3390 *
00006F90 +0010 E5800000 E0344B58 24B45BC0 E7C1E7E7 *V...\.....${XAXX*
00006FA0 +0020 0600006A 00000000 00000000 00000000 *................*
00006FB0 +0030 00007EF8 00008FC8 00380000 000F4240 *..=8...H....... *
00006FC0 +0040 00000000 00000000 00000000 00000004 *................*
00006FD0 +0050 00000000 C3C2E3F0 F0F14040 00000000 *....CBTX01 ....*
00006FE0 +0060 00000000 00000000 00000000 *............*
*** END OF PSCB **
*** DUMP OF UPT - LENGTH= 56/038 ***
00008FC8 +0000 00389584 81A84040 40000000 23000001 *..nday .......*
00008FD8 +0010 C3C2E3F0 F0F14006 C5D5E4C5 D5E40000 *CBTX01 .ENUENU..*
00008FE8 +0020 80C3C2E3 F0F0F140 40060000 00000000 *.CBTX01 .......*
00008FF8 +0030 00000000 00000000 *........*
*** END OF UPT ***
*** DUMP OF ECT - LENGTH= 56/038 ***
0000CAF8 +0000 00000000 007A4F60 80000000 84A49497 *.....:|-....dump*
0000CB08 +0010 97A28382 40404040 40404040 00000000 *pscb ....*
0000CB18 +0020 00000000 00000000 A0000000 00000000 *................*
0000CB28 +0030 17CBBC90 17C1CF80 *.....A..*
*** END OF ECT ***
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
