While waiting for a reply for previous post I noticed didn't the following
byte set as it was dsected

After inserting the following instruction MVI   MAPRST,MAPRST64


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 
The storage is there 

 
IPCS

 BLS21001I IPCS for z/OS 02.05.00-0

 IPCS

L 01EF_85500000.

 

 LIST 01EF_85500000. ASID(X'0040') LENGTH(X'04') AREA

 _5500000. 00010000                            |....            |

L 01EF_85500000. LEN(100)

 

 LIST 01EF_85500000. ASID(X'0040') LENGTH(X'64') AREA

 _5500000. 00010000 00000000 000001EF 85501793 |............e&.l|

 _5500010. 00000200 00000000 00000001 EF855018 |.............e&.|

 _5500020. 53000003 00000000 00000000 01EF8550 |..............e&|

 _5500030. 19130000 04000000 00000000 0001EF85 |...............e|

 _5500040. 5019D300 00050000 00000000 000001EF |&.L.............|

 ***


----------------------------------------------------------------------
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