Previous Topic: EBCXMTRN Statement Parameters

Next Topic: Sample JCL


Macro Coding Example

Assume that two CA Deliver systems have been created.

The databases for the two systems have high-level names of RMO.SYSTEM1 and RMO.SYSTEM2. A user must enter transaction identifier RM1 for the first system and RM2 for the second.

The source for program EC0XMCTR contains these control statements:

EBCXMOPT MSGLVL=CRIT,USERMAX=50
EBCXMTRN TRANID=RM1,INDEX=RMO.SYSTEM1
EBCXMTRN TRANID=RM2,INDEX=RMO.SYSTEM2
EBCXMTRN TYPE=GEN
END

EBCXMTRN TYPE=GEN must be the last statement before the END. This statement causes the EBCXMCTR CSECT to be generated.