Operation

Use the LINKX macro to invoke the ASASYMBM service:
* Set up MYSYMBP as in previous examples.
⋮
        MVC   MYLIST(MYSLIST_LEN),MYSLIST Initialize execute form
        LINKX EP=ASASYMBM,MF=(E,MYSYMBP),SF=(E,MYLIST)  call service
⋮
MYSLIST LINKX SF=L                     Initialized list form
MYSLIST_LEN   EQU *-MYSLIST            Length of list form
DYNAREA DSECT
MYLIST  LINKX SF=L                     List form in dynamic area
        DS    0F
MYSYMBP DS    CL(SYMBP_LEN)            SYMBP area
        ASASYMBP   ,                   Mapping of SYMBP area