LMSASSEA

LMSASSEA generates the member attributes.

Name	Operation	Operands
name	LMSASSEA	[P=prefix,]MF={ D | C | L }

prefix	Up to 3 characters to be prefixed to the field names. The default value is the string EA.
D C L	A dummy section (DSECT) is generated. A storage area is generated (without CSECT statement). Constants are defined which can be used for initialization of the control blocks.

Expansion of LMSASSEA

***********************************************************************
*                                                                     *
*        ELEMENT ATTRIBUTES  (DSECT)                                  *
*                                                                     *
***********************************************************************
        SPACE
&NAME    DSECT
&P.UDAT  DS    CL14                    USER DATE                     IN  CL14' '
&P.UTIM  DS    CL8                     USER TIME                     IN  CL8' '
&P.CCSN  DS    CL8                     CODED CHARACTER SET NAME      IN  CL8' '
*
***********    SOURCE CODE CONTROL     ********************************
*
&P.HOSTA DS    CL1                     HOLD FLAG                     IN  CL1' '
.*                                     ' ': UNCHANGE
.*                                     '-': FREE
.*                                     'H': IN HOLD
&P.RES1  DS    CL8                     FREE (HOLDER USERID)          IN  CL8' '
*
&P.MDATI DS    CL1                     MODIFICATION DATE INDICATOR   IN  CL1'O'
.*                                     'O': OLD
.*                                     'S': SYSTEM DATE
&P.RES2  DS    CL56                    FREE                              CL56' '
*
&P.PLNG  EQU   *-&P.UDAT               EA LENGTH