MVS Jan 2005.p65 - CBT Tape

#LOWON EQU B'ØØØØØØØ1' Low bit on
**********************************************************************
* Print lines definitions. *
**********************************************************************
$XM1LIN2 DS ØH
DC C'ØXmseAddr Job Name Asid XmsePrev XmseNext AscbAddr '
DC C' XmseSetc To From'
XMSLIN2L EQU *-$XM1LIN2
*
$XM1LINE DC CL133' ' Output line for LISTXME1
$XM1ASA EQU $XM1LINE,1
$XM1ASCB EQU $XM1ASA+1,8 Ascb addr
$XM1SEØ1 EQU $XM1ASCB+8,1
$XM1JBNA EQU $XM1SEØ1+1,8 Jobname
$XM1SEØ2 EQU $XM1JBNA+8,1
$XM1ASID EQU $XM1SEØ2+1,4 Asid number
$XM1SEØ3 EQU $XM1ASID+4,1
$XM1ASTE EQU $XM1SEØ3+1,8 Addr space second table
$XM1SEØ4 EQU $XM1ASTE+8,1
$XM1LTOV EQU $XM1SEØ4+1,8 Linkage table origin virtual addr
$XM1SEØ5 EQU $XM1LTOV+8,1
$XM1ATOV EQU $XM1SEØ5+1,8 Authorization table origin virtual addr
$XM1SEØ6 EQU $XM1ATOV+8,1
$XM1ETC EQU $XM1SEØ6+1,4 Num of entry tables owned by this adrspc
$XM1SEØ7 EQU $XM1ETC+4,1
$XM1ETCN EQU $XM1SEØ7+1,4 Num of connections to entry tables
$XM1SEØ8 EQU $XM1ETCN+4,1
$XM1LXR EQU $XM1SEØ8+1,4 Num of linkage indexes reserved
$XM1SEØ9 EQU $XM1LXR+4,1
$XM1AXR EQU $XM1SEØ9+1,4 Num of authorization indexes reserved
$XM1SE1Ø EQU $XM1AXR+4,1
$XM1XMSE EQU $XM1SE1Ø+1,8 Cross-memory services block addr
$XM1SE11 EQU $XM1XMSE+8,1
$XM1SETC EQU $XM1SE11+1,8 SETC addr
$XM1SE12 EQU $XM1SETC+8,1
$XM1SYLX EQU $XM1SE12+1,5 This LX is System LX
$XM1SE13 EQU $XM1SYLX+5,1
$XM1TO EQU $XM1SE13+1,4 Number of 'TO' connections
$XM1SE14 EQU $XM1TO+4,1
$XM1FROM EQU $XM1SE14+1,4 Number of 'FROM' connections
$XM1SE15 EQU $XM1FROM+4,1
*
$XM2LINE DC CL133' ' Output line for LISTXME2
$XM2ASA EQU $XM2LINE,1
$XM2JBNA EQU $XM2ASA+1,8 Jobname
$XM2SEØ1 EQU $XM2JBNA+8,1
$XM2ASID EQU $XM2SEØ1+1,4 Asid
$XM2SEØ2 EQU $XM2ASID+4,1
*
$XM2TYPE EQU $XM2ASA+1,4 Type of connection (To or From)
24 © 2005. Xephon USA telephone (214) 340 5690, fax (214) 341 7081.