On Sun, 12 Nov 2023 22:35:12 -0500, Joseph Reichman <reichman...@gmail.com> 
wrote:

>I got the following message tracing VERBX routine under TEST
>BLS18100I ASID(X'0040') 01EF_85500000 not available
>
>Yet when I do the following running IPCS from the TSO command prompt
> LIST 01EF_85500000. ASID(X'0040') LENGTH(X'64') AREA
> _5500000. 00010000 00000000 000001EF 85501793 |............e&.l|

Since I've never used IPCS 64 bit, I don't know what to expect. The BLS18100I 
is missing the "." at the end of the address. In theory, that should not be a 
problem because it starts with a number. The list command output dropped the 
01EF and the 8. Does dropping these mean you are actually in 31 bit mode? Try 
list 5500000. len(100) to see if it displays the same storage. 

If you have the 64 bit address saved in storage, try using indirect addressing 
using "!".

VERBX VSMDATA should show allocated 64 storage. Maybe try other addresses that 
don't have the 8. I can't remember if the 8 has special meaning in 64 bit mode.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to