On Sat, 24 Nov 2012 21:52:08 GMT "[email protected]" <[email protected]> wrote:
:>If I need to obtain the Space Token for the current address space, :>I usually use an ALESERV Macro with the EXTRACTH parameter. :>* :>Method 1 :> ALESERV EXTRACTH,STOKEN=ASTOKEN :> :>ASTOKEN DS D :> :> :>I have seen Older Assembler Code which chains through Control Blocks :>PSA -> ASCB -> ASSB :>* Method 2 :> MODSET MODE=SUP SET SUPERVISOR STATE PSW :> USING PSA,R0 Map Prefix Save Area :> L R4,PSAAOLD Curent Address Space :> USING ASCB,R4 MAP ASCB :> L R5,ASCBASSB GET ADDRESS OF Target ASSB :> USING ASSB,R5 MAP ASSB :> ST R5,ASSB@ Save Target ASSB Address :> MVC ASTOKEN,(L'XTOKEN),ASSBSTKN Address Space Token :> :>ASTOKEN DS D :> :> :> :> :>Should there be a difference in the valude of ASTOKEN regardless of the :>technique used ? Home A/S? No. :>Is it ever appropriate to use Method 2 anymore to retrieve the SPACE Token for An Address Space ? Does anyone still use EXTRACT FIELDS=(TIOT) -- Binyamin Dissen <[email protected]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies.
