The Legac-e Information Site

LOAD + CALL

This is an example of combining the use of both LOAD and CALL macros to effect dynamic linkage, and in this instance the called routine is executable rather than being a static table.

In the first example opposite both the Entry Point address and the Load Point address are being saved after the LOAD has been issued.

In the second example opposite only the Entry Point is of interest and it is being loaded into GPR 15 ready for the CALL, to reduce the work of the CALL macro, which in the first example will generate the instructions to load GPR 15.

First example of LOAD and CALL combined.

MAINPGM CSECT BASR R12,0 USING *,R12 . . . . . . . . LOAD EP=NEXTRTN,LOADPT=LPADDR ST 0,EPADDR Save entry point address CALL EPADDR,(P1,P2) . . . . . . . . EPADDR DC AL4(0) LPADDR DC AL4(0 P1 DC CL6'NAME' P2 DC CL60'ADDRESS'

Second example of LOAD and CALL combined.

MAINPGM CSECT BASR R12,0 USING *,R12 . . . . . . . . LOAD EP=NEXTRTN LR 15,0 Set up entry point address CALL (15),(P1,P2) . . . . . . . . P1 DC CL6'NAME' P2 DC CL60'ADDRESS'