On Thu, 13 Oct 2022 15:06:19 -0400, Tony Harminc <[email protected]> wrote:

>On Thu, 13 Oct 2022 at 12:23, Charles Mills <[email protected]> wrote:
>
>> XMD in Data Areas says Macro ID: IHAXMD
>>
>
>Looks like an OCO macro that somehow escaped into the Data Areas book... Or
>conceivably the other way around, and the IHAXMD macro wasn't shipped -
>perhaps because there's no ASM version?
>
>Tony H.
>

It's OCO.  Here is a hacked copy from SHOWMVS (SHOW801):

         MACRO                                                           
         IHAXMD                                                          
XMD      DSECT                         PC/AUTH                           
XMDXMD   DS    CL4'XMD'                                                  
XMDLXAT  DS    A(LXAT) Pointer to Linkage Index Allocation Table         
XMDETIBH DS    0XL8    Header of entry table information block queue     
XMDETIBF DS    A       Pointer to the first ETYIB on queue               
XMDETIBL DS    A       Pointer to last ETIB on queue                     
XMDAXAT  DS    A       Address of Authorization Index Allocation Tables  
XMDFLAGS DS    X       Flag byte                                         
XMDRSV1  EQU   X'80'   reserved flag                                     
XMDRSV2  EQU   X'40'   reserved flag                                     
XMDRSV9  DS    XL3     reserved field                                    
XMDXMSE  DS    A       Address of the queue of XMSE's in PC/AUTH's       
*                      address space                                     
XMDATLNB DS    XL2     Length of the System Authorization Table          
*                      (in bytes)                                        
XMDSATLN DS    XL2     Length of the System Authorization Table          
*                      (0030) used to initialize an ASTE                 
XMDSATOR DS    A       The real address of the System Authorization      
*                      Table in format to initialize the ASTE            
XMDSATOV DS    A       The virtual address of the System Authorization   
*                      Table                                             
XMDSLTD  DS    A       Read address and length of the System Linkage     
*                      Table (with the valid bit on) in ASTE format      
XMDSLT   DS    A       Address of the System Linkage Table which         
*                      contains only system wide entries                 
XMDXMSEL DS    A       Address of the last XMSE on the queue anchored    
*                      by XMDXMSE                                        
XMDR034  DS    XL4     reserved                                          
*                                                                        
XMDLNTH  EQU   *-XMD   length of XMD                                     
         MEND                                                            


Best Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:[email protected]
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html

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

Reply via email to