LFM - LIFO parameter list and standard DSA

    CONTROL BLOCK NAME = DFHLPLST, DFHLFS
    NAME OF MATCHING PLS CONTROL BLOCK = DFHLFMDS for DFHLFS
    DESCRIPTIVE NAME = CICS TS LIFO Parameter List and Standard DSA
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1980, 2013 
    FUNCTION =
           Maps the parameter list passed to DFHLFA.
           The values of the field DFHLPMOD are given in the module
           identifiers in DFHFMIDS.
           Maps the standard DSA.
    NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS = none
       MODULE TYPE = Control block definition
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHLPLST DSECT FOR PLIST
(0) DBL WORD 8 (0) Double word alignment
(0) .... ....   OFF0 "00" OFFSET OF FLAGS
(0) .... ...1   OFF1 "01" OFFSET OF STATUS FLAGS
(0) .... ..1.   OFLN "02" LENGTH OFFSET
(0) 1... ....   OFGR "128" CHAIN BACK OFFSET (64 bit)
(0) 1... .1..   OFDR "132" CHAIN BACK OFFSET (32 bit)
(0) .... 1...   OFGRE "8" OFFSET OF REG 14 (64 bit)
(0) .... 11..   OFLR "12" OFFSET OF REG 14 (32 bit)
(0) ..1. ....   OFGR1 "32" OFFSET OF REG 1 (64 bit)
(0) ..1. .1..   OFR1 "36" OFFSET OF REG 1 (32 bit)
(0) 1..1 ....   OFGRD "144" OFFSET OF REG 13 (64 bit)
(0) 1..1 .1..   OFRD "148" OFFSET OF REG 13 (32 bit)
(0) 11.1 ....   OFNB "208" NAB OFFSET (64 bit)
(0) 11.1 ....   NAB "208" NAB OFFSET (64 bit)
(0) 1.11 ....   OFTASN "176" OFFSET OF TASN (64 bit)
(0) 1.11 1...   OFPOWN "184" Offset of POWN
(0) 1111 111.   CINTISA "X'FE'" INITIAL SEGMENT NO *
         PLIST PASSED BETWEEN MODULE AND FIRST GET LIFO MODULE
(0) HALFWORD 2 DFHLPLEN LENGTH OF PLIST
(2) HALFWORD 2 DFHLPDFG DSA ID
(4) HALFWORD 2 DFHLPDLN DSA LENGTH
(6) HALFWORD 2 DFHLPMDS OFFSET OF MODULE START FROM PLIST START
(8) FULLWORD 4 DFHLPTRC TRACE FLAGS
(C) HALFWORD 2 DFHLPMOD MOD ID
(E) HALFWORD 2 DFHLPMDC MOD ID IN CHARACTER FORM
(10) BITSTRING 1 DFHLPTRF OPTION SETTING
(10) .1.. ....   LFLPTRRC "X'40'" RECOVERY ROUTINE PRESENT
(10) .... 1...   LFLPTRCN "X'08'" CONDITIONAL REQUEST
(10) .... .1..   LFLPTRRN "X'04'" COND RETURN REQUEST
(10) .... ..1.   LFLPTRIC "X'02'" IC LOGIC IS REQUESTED.
(10) .... ...1   LFLPTRTR "X'01'" TRACE IS REQUESTED.
(11) BITSTRING 1 DFHLPTR2 PERFORM, ACCOUNT, EXCEPT
(12) BITSTRING 1 DFHLPRS3 RESERVED
(13) BITSTRING 1 DFHLPRS4 RESERVED
(14) FULLWORD 4 DFHLPSMD Smode index
(14) .... ....   DFHLPS31 "0" Smode 31
(14) .... 1...   DFHLPS24 "8" Smode 24
(18) ADDRESS 8 DFHLPREC Recovery routine address *
         STANDARD DSA
Table 2.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHLFS
(0) BITSTRING 1 LFDSOFF0 FLAG BYTE 0
(1) BITSTRING 1 LFDSOFF1 FLAG BYTE 1
(1) 1... ....   LFDSTRST "X'80'" Trusted stack
(1) .1.. ....   LFDSERRD "X'40'" DFHKERRD exists, i.e. stack in error state
(1) ..1. ....   LFDSACR "X'20'" CICS Recovery added
(1) ...1 ....   LFDSSAVE "X'10'" Save area exists and is pointed to by KERNSAVP
(1) .... 1...   LFDSLCON "X'08'" Loop controller
(1) .... .1..   LFDSDFAB "X'04'" Deferred abend scheduled
(1) .... ...1   LFDSF4SA "X'01'" Format 4 save area against this stack
(2) HALFWORD 2 LFDSOFLN LENGTH OF DSA
(4) CHARACTER 4 LFDSOSID Savearea Id
(8) ADDRESS 8 LFDSOGLR (0) Register 14 (64 bit)
(8) ADDRESS 4
(C) ADDRESS 4 LFDSOFLR Register 14 (32 bit)
(10) ADDRESS 8 LFDSOGBR (0) Register 15 (64 bit)
(10) ADDRESS 4
(14) ADDRESS 4 LFDSOFBR Register 15 (32 bit)
(18) ADDRESS 8 LFDSOGR0 (0) Register 0 (64 bit)
(18) ADDRESS 4
(1C) ADDRESS 4 LFDSOFR0 Register 0 (32 bit)
(20) ADDRESS 8 LFDSOGR1 (0) Register 1 (64 bit)
(20) ADDRESS 4
(24) ADDRESS 4 LFDSOFR1 Register 1 (32 bit)
(28) ADDRESS 8 LFDSOGR2 (0) Register 2 (64 bit)
(28) ADDRESS 4
(2C) ADDRESS 4 LFDSOFR2 Register 2 (32 bit)
(30) ADDRESS 8 LFDSOGAR (0) Register 3 (64 bit)
(30) ADDRESS 4
(34) ADDRESS 4 LFDSOFAR Register 3 (32 bit)
(38) ADDRESS 8 LFDSOGR4 (0) Register 4 (64 bit)
(38) ADDRESS 4
(3C) ADDRESS 4 LFDSOFR4 Register 4 (32 bit)
(40) ADDRESS 8 LFDSOGR5 (0) Register 5 (64 bit)
(40) ADDRESS 4
(44) ADDRESS 4 LFDSOFR5 Register 5 (32 bit)
(48) ADDRESS 8 LFDSOGR6 (0) Register 6 (64 bit)
(48) ADDRESS 4
(4C) ADDRESS 4 LFDSOFR6 Register 6 (32 bit)
(50) ADDRESS 8 LFDSOGR7 (0) Register 7 (64 bit)
(50) ADDRESS 4
(54) ADDRESS 4 LFDSOFR7 Register 7 (32 bit)
(58) ADDRESS 8 LFDSOGR8 (0) Register 8 (64 bit)
(58) ADDRESS 4
(5C) ADDRESS 4 LFDSOFR8 Register 8 (32 bit)
(60) ADDRESS 8 LFDSOGR9 (0) Register 9 (64 bit)
(60) ADDRESS 4
(64) ADDRESS 4 LFDSOFR9 Register 9 (32 bit)
(68) ADDRESS 8 LFDSOGRX (0) Register 10 (64 bit)
(68) ADDRESS 4
(6C) ADDRESS 4 LFDSOFRX Register 10 (32 bit)
(70) ADDRESS 8 LFDSOGRY (0) Register 11 (64 bit)
(70) ADDRESS 4
(74) ADDRESS 4 LFDSOFRY Register 11 (32 bit)
(78) ADDRESS 8 LFDSOGCR (0) Register 12 (64 bit)
(78) ADDRESS 4
(7C) ADDRESS 4 LFDSOFCR Register 12 (32 bit)
(80) ADDRESS 8 LFDSOGDR (0) Backward chain (64 bit)
(80) ADDRESS 4
(84) ADDRESS 4 LFDSOFDR Backward chain (32 bit)
(88) ADDRESS 8   Reserved (Forward chain) End of F4SA
(90) ADDRESS 8 LFDSOGRD (0) Register 13 (64 bit)
(90) ADDRESS 4
(94) ADDRESS 4 LFDSOFRD Register 13 (32 bit)
(98) ADDRESS 4   Reserved - 64 bit
(9C) BITSTRING 1 LFDSFLG2 Flag byte 2
(9C) 1... ....   LFDSABTM "X'80'" Abterm allowed switch
(9C) .... ..1.   LFDSPCPY "X'02'" Plist was copied
(9C) ...1 ....   LFDSLOOP "X'10'" DSA may be looping
(9D) FULLWORD 1 LFDSSMX Stack mode index used by kernel
(9E) FULLWORD 1 LFDSSKEY Stack key
(9F) FULLWORD 1 LFDSPLLN Plist qword length (if copied)
(A0) ADDRESS 8   Reserved - 64 bit
(A8) ADDRESS 8   Used by Kernel


(B0) ADDRESS 8 LFDSTASN Address of task entry
(B8) ADDRESS 8 LFDSPOWN Address of process own
(C0) ADDRESS 8 LFDSDTAB Callers domain entry
(C8) FULLWORD 8 LFDSTRFL Trace flags
(D0) ADDRESS 8 LFDSOFNB NAB
(D8) ADDRESS 8 LFDSAPLT Module PLIST pointer
(E0) ADDRESS 8   Used by Kernel.
(E8) FULLWORD 8 LFDSSMOD SMODE index 0=31-bit 8=24-bit
(F0) BITSTRING 1 LFDSMOD1 MODULE ID
(F1) BITSTRING 1 LFDSMOD2 SUB MODULE ID
(F2) HALFWORD 2 LFDSMODN MOD NAME 2 CHAR
(F4) ADDRESS 4   Reserved
(F8) ADDRESS 4   Used by Kernel
(FC) ADDRESS 4   Used by Kernel
(100) DBL WORD 8 LFDSUSS1 (0) USER AREA START
(100) DBL WORD 8 LFDSUSS2 (0) START USER AREA AFTER COPY *
           END OF STANDARD SECTION
         Kernel Domain Table Entry Overlay. Pointed to by LFDSDTAB.
Table 3.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 LFDSDTE ,
(0) CHARACTER 8   Used by Kernel
(8) FULLWORD 4 LFDSDTEI Domain index
(C) CHARACTER 4   USED BY KERNEL
(10) ADDRESS 8 LFDSDTEA Domain anchor
(18) CHARACTER 32   Used by Kernel
(38) CHARACTER 1 (0) Used by Kernel
Table 4.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHLFS Continue stack dsect