LMSASSTA

LMSASSTA generates the type attributes.

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

prefix	Up to 3 characters to be prefixed to the field names. The default value is the string TA.
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 LMSASSTA

***********************************************************************
*                                                                     *
*        TYPE ATTRIBUTES (DSECT)                                      *
*                                                                     *
***********************************************************************
        SPACE
&NAME    DSECT
&P.CONV  DS    CL1                     TYPE CONVENTION               IN  CL1' '
.*                                     'N' - NONE
.*                                     'S' - STD-SEQUENCE
.*                                     'M' - MULTI-SEQUENCE
.*                                     'T' - STD-TREE
&P.RES1  DS    CL3                     FREE                              CL3' '
&P.EXPL  DS    CL24                    VERSION EXAMPLE (F. SEQ.)     IN  CL24' '
*
&P.PTAD  DS    CL1                     PROT. TYPE INDI. FOR ADMIN    IN  CL1' '
.*                                     'N': NO SPECIAL PROTECTION
.*                                     'Y': SPECIAL PROTECTION
.*                                     'G': PROTECTION BY GUARD
&P.PADU  DS    CL1                     ADMIN INDICATOR FOR OWNER     IN  CL1' '
&P.PADG  DS    CL1                     ADMIN INDICATOR FOR GROUP     IN  CL1' '
&P.PADO  DS    CL1                     ADMIN INDICATOR FOR OTHERS    IN  CL1' '
&P.PADP  DS    CL1                     ADMIN PASSWORD INDICATOR      IN  CL1' '
&P.PADW  DS    FL4                     ADMIN PASSWORD                IN  FL4'0'
&P.PGAD  DS    CL18                    ADMIN GUARD                   IN  CL18' '
*
&P.STOR  DS    CL1                     STORAGE FORM FOR LIBRARY      IN  CL1' '
.*                                     ' ': UNCHANGE
.*                                     'N': NONE
.*                                     'S': STD ( FULL OR DELTA )
.*                                     'V': FULL  ELEMENT
.*                                     'D': DELTA ELEMENT
&P.WRCT  DS    CL1                     WRITE-CONTROL FOR LIBRARY     IN  CL1' '
.*                                     ' ': UNCHANGE
.*                                     'N': NONE
.*                                     'A': ACTIVATE
.*                                     'D': DEACTIVATE 
&P.STYP  DS    CL8                     SUPER TYPE                    IN  CL8' '
*
&P.RES2  DS    CL47                    FREE                              CL47' '
&P.PLNG  EQU   *-&P.CONV                TA LENGTH