Loading...
Select Version
LMSASSEM generates the member mask.
Name | Operation | Operands |
name | LMSASSEM | [P=prefix,]MF={ D | C | L } |
prefix | Up to 3 characters to be prefixed to the field names. |
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 LMSASSEM
***********************************************************************
* *
* ELEMENT MASK (DSECT) *
* *
***********************************************************************
SPACE
&NAME DSECT
&P.TYPE DS CL20 ELEMENT TYPE IN CL20' '
&P.NAME DS CL132 ELEMENT NAME IN CL132' '
&P.VERS DS CL52 ELEMENT VERSION IN CL52' '
&P.STOR DS CL6 STORAGE FORM IN CL6' '
&P.UDAT DS CL32 USER DATE IN CL32' '
&P.UTIM DS CL20 USER TIME IN CL20' '
&P.CDAT DS CL32 CREATION DATE IN CL32' '
&P.CTIM DS CL20 CREATION TIME IN CL20' '
&P.MDAT DS CL32 MODIFICATION DATE IN CL32' '
&P.MTIM DS CL20 MODIFICATION TIME IN CL20' '
&P.SECN DS CL68 SECONDARY NAME IN CL68' '
&P.SECA DS CL20 SECONDARY ATTRIBUTE IN CL20' '
&P.RES1 DS CL14 FREE CL14' '
*
*********** PROTECTION ATTRIBUTES ********************************
*
&P.PTRD DS CL1 PROT. TYPE INDICATOR FOR READ IN CL1' '
.* 'A': ANY PROTECTION
.* 'N': NO SPECIAL PROTECTION
.* 'Y': SPECIAL PROTECTION
.* 'G': PROTECTION BY GUARD
&P.PRDU DS CL1 READ INDICATOR FOR OWNER IN CL1' '
&P.PRDG DS CL1 READ INDICATOR FOR GROUP IN CL1' '
&P.PRDO DS CL1 READ INDICATOR FOR OTHERS IN CL1' '
&P.PRDP DS CL1 READ PASSWORD INDICATOR IN CL1' '
&P.RES2 DS FL4 FL4'0'
*
&P.PTWR DS CL1 PROT. TYPE IND. FOR WRITE IN CL1' '
&P.PWRU DS CL1 WRITE INDICATOR FOR OWNER IN CL1' '
&P.PWRG DS CL1 WRITE INDICATOR FOR GROUP IN CL1' '
&P.PWRO DS CL1 WRITE INDICATOR FOR OTHERS IN CL1' '
&P.PWRP DS CL1 WRITE PASSWORD INDICATOR IN CL1' '
&P.RES3 DS FL4 FL4'0'
*
&P.PTEX DS CL1 PROT. TYPE INDICATOR FOR EXEC IN CL1' '
&P.PEXU DS CL1 EXEC INDICATOR FOR OWNER IN CL1' '
&P.PEXG DS CL1 EXEC INDICATOR FOR GROUP IN CL1' '
&P.PEXO DS CL1 EXEC INDICATOR FOR OTHERS IN CL1' '
&P.PEXP DS CL1 EXEC PASSWORD INDICATOR IN CL1' '
&P.RES4 DS FL4 FL4'0'
*
&P.PGRD DS CL40 READ GUARD IN CL40' '
&P.PGWR DS CL40 WRITE GUARD IN CL40' '
&P.PGEX DS CL40 EXEC GUARD IN CL40' '
&P.CCSN DS CL20 CODED CHARACTER SET NAME IN CL20' '
*
*********** SOURCE CODE CONTROL ********************************
*
&P.PTHO DS CL1 IND. FOR HOLDER-AUTHORIZATION IN CL1' '
.* 'N': NO SPECIAL AUTHORIZATION
.* 'Y': SPECIAL AUTHORIZATION
.* 'G': AUTHORIZATION BY GUARD
&P.PHOU DS CL1 HOLDER INDICATOR FOR OWNER IN CL1' '
&P.PHOG DS CL1 HOLDER INDICATOR FOR GROUP IN CL1' '
&P.PHOO DS CL1 HOLDER INDICATOR FOR OTHERS IN CL1' '
&P.PHOP DS CL1 HOLDER PASSWORD INDICATOR IN CL1' '
&P.RES5 DS FL4 FL4'0'
&P.PGHO DS CL40 HOLDER GUARD IN CL40' '
*
&P.HOSTA DS CL1 HOLD FLAG IN CL1' '
.* ' ': ANY
.* '-': FREE
.* 'H': IN HOLD
&P.HOLD DS CL20 HOLDER USERID IN CL20' '
&P.ADAT DS CL32 ACCESS DATE IN CL32' '
&P.ATIM DS CL20 ACCESS TIME IN CL20' '
*
&P.RES6 DS CL3 CL3' '
&P.ESMIN DS F ELEMENT-SIZE MINIMUM IN FL4'0'
&P.ESMAX DS F ELEMENT-SIZE MAXIMUM IN X'FFFFFFFF'
*
&P.RES7 DS CL64 FREE CL64' '
&P.PLNG EQU *-&P.TYPE EM LENGTH