Hi 

Just tried to get access list token for the GRS Address space ASID 7

Got R15 = 0 and alet = 0, as well this was both on my zpdt system and on the
CBT real iron I believe z15 system

As well was running under TESTAUTH

Here is the code 

*                                                                  JOER 
          LOCASCB ASID=SDWAPRIM                LOC prim to      SRB JOER 
 *                                                                  JOER 
          L     R1,ASCBASSB-ASCB(R1)                                JOER 
          MVC   STOKEN,ASSBSTKN-ASSB(R1)      Get Stokrn            JOER 
 *                                                                  JOER 
          ALESERV ADD,                        Put it on DU-AL       JOERX
                ACCESS=PUBLIC,                                      JOERX
                CHKEAX=NO,                                          JOERX
                AL=WORKUNIT,STOKEN=STOKEN,ALET=ALET                 JOER 
 *                                                                  JOER 
 *                                                                  JOER 
 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to