Example

The following example shows sample coding for a data set attribute call using a LINK statement.

Figure 1. Example of an IGWASMS Call LINK Statement

            .
            .

          LINK EP=IGWASMS,MF=(E,ASMSLIST)
            .
            .

RC2       DC   F'0'
RS2       DC   F'0'
PROB1     DC   2F'0'
DSNLEN1   DC   A(L'DSN1)
DSN1      DC   CL12'THIS.DATASET'
SMSDATA   DC   3CL30' '
DSTYPE    DC   F'0'
ASMSLIST  DC   A(RC2)
          DC   A(RS2)
          DC   A(PROB1)
          DC   A(DSNLEN1)
          DC   A(DSN1)
          DC   A(SMSDATA)
          DC   A(DSTYPE)