LMSASSEA

LMSASSEA generiert die Elementattribute.

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

prefix	Max. 3 Zeichen, die den Feldnamen vorangestellt werden sollen. Standardwert ist die Zeichenfolge EA.
D C L	Ein Pseudoabschnitt (DSECT) wird generiert. Ein Speicherbereich wird generiert (ohne CSECT-Anweisung). Es werden Konstanten definiert, die für die Initialisierung der Kontrollblöcke verwendet werden können.

Auflösung von 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