"James G. Stracka" <[EMAIL PROTECTED]> wrote:
>The only sure way is to display the storage.

Indeed...by which Jim means:

1) Log onto MAINT.
2) VMFSETUP ZVM CP
3) Figure out the text deck you're interested in -- for example, let's say the 
module is HCPLOG
4) Look at the text deck and note the eyecatcher and date on the first TXT 
record:
 "TXT """  ""  ""å00"HCPLOG  "DEME304""03/23/02:00.47PE
5) LOCATE the module in real storage:
 LOC HCPLOG
 HCPLOG   = 00472000 PAGEABLE
6) If it's pageable, lock it:
 LOCK SYSTEM 472 472 MAP
 VIRTPAGE    REALPAGE
 00472000    00472000
 Command complete
7) Display the first bit:
 D HT472000.FF
 H00472000  47F0F028 C8C3D7D3 D6C74040 01C4C5D4 04 *.00.HCPLOG  .DEM*
 H00472010  C5F3F0F4 0000F0F3 61F2F361 F0F27AF0    *E304..03/23/02:0*
 H00472020  F04BF4F7 D7C50000 A7CAFFD8 4590C8B4    *0.47PE..x..Q..H.*
 H00472030  9610B2AB 921C5005 58400998 D2075055    *o...k.&.. .qK.&.*
8) Unlock it if you locked it:
 UNLOCK SYSTEM 472 472
 Command complete

This is only necessary if you've gotten to the point where you REALLY don't 
think you're running what you think you are, of course...

HTH

...phsiii

Reply via email to