Example: RPL macro

In this example, an RPL macro is used to generate a request parameter list named PARMLIST.

ACCESS   ACB   MACRF=(SKP,OUT),                                        x
               DDNAME=PAYROLL
 
PARMLIST RPL   ACB=ACCESS,                                             x
               AM=VSAM,                                                x
               AREA=WORK,                                              x
               AREALEN=125,                                            x
               ARG=SEARCH,                                             x
               MSGAREA=MESSAGE,                                        x
               MSGLEN=128,                                             x
               OPTCD=(SKP,UPD)   Most OPTCD defaults are appropriate   x
                                 to assumptions.

WORK     DS    CL125
SEARCH   DS    CL8
MESSAGE  DS    CL128

The ACB macro named ACCESS, specifies skip-sequential retrieval for update. Further details might be provided on a DD statement named PAYROLL.

The RPL macro's parameters are:

ACB associates the request parameter list with the access method control block generated by ACCESS.
AREA and AREALEN specify a work area, WORK, that is 125 bytes long.
ARG specifies the search argument is defined at SEARCH. The search argument is 8 bytes long.
MSGAREA and MSGLEN specify a message area, MESSAGE, that is 128 bytes long. The message area is provided for physical error messages.
OPTCD specifies skip-sequential processing and specifies that a retrieved record can be updated or deleted.
NSR is assumed.

Because KEYLEN is not coded, a full-key search is assumed.