LMSASSRD

LMSASSRD generates the record description.

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

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

***********************************************************************
*                                                                     *
*        RECORD DESCRIPTION (DSECT)                                   *
*                                                                     *
***********************************************************************
        SPACE
&NAME    DSECT
&P.ACC   DS    F                       READ ACCESS ID         INOUT  X'FFFFFFFF'
&P.BLEN  DS    F                       BUFFER LENGTH             IN  F'0'
&P.RLEN  DS    F                       RECORD LENGTH          INOUT  F'0'
&P.RES1  DS    XL3                     FREE                          XL3'000000'
&P.RECID DS    0XL5                    RECORD ID              INOUT 
&P.RTYP  DS    XL1                     RECORD TYPE            INOUT  XL1'01'
&P.RNUM  DS    F                       RECORD NUMBER          INOUT  F'0'
&P.RES2  DS    2F                      FREE                          2F'0'
&P.PLNG  EQU   *-&P.ACC                RD LENGTH