LU 6.2 API Application Programmer's Reference Guide (30294-90008)

Appendix E 205
Transact Parameter Masks
The Parameter Mask
Example E-10 MCGetAllocate Declarations and Intrinsic Call
DEFINE(ITEM) TP-ID I(4):
SESSION-TYPE X(8):
TP-NAME X(64):
RESOURCE-ID I(4):
SYNC-LEVEL I(4):
TIMER I(4):
SECURITY I(4):
NUM-PIPS I(4):
PIP-LENGTHS[16] I(4):
PIP1 X(1980):
PIP2 X(1980): << The lengths given in the PIP >>
PIP3 X(1980): << declarations may vary from >>
PIP4 X(1980): << 0 to 1980 bytes. >>
PIP5 X(1980):
PIP6 X(1980): << The maximum combined length >>
PIP7 X(1980): << of all PIP parameters is >>
PIP8 X(1980): << 1980 bytes. >>
PIP9 X(1980):
PIP10 X(1980):
PIP11 X(1980):
PIP12 X(1980):
PIP13 X(1980):
PIP14 X(1980):
PIP15 X(1980):
PIP16 X(1980);
LIST TP-ID: SESSION-TYPE: TP-NAME: RESOURCE-ID:
SYNC-LEVEL: TIMER: SECURITY: NUM-PIPS: PIP-LENGTHS:
PIP1: PIP2: PIP3: PIP4: PIP5: PIP6: PIP7: PIP8: PIP9:
PIP10: PIP11: PIP12: PIP13: PIP14: PIP15: PIP16;
LET (MASK32) = 522125312; << "11111000111110000000000000000" >>
PROC MCGETALLOCATE ( #(TP-ID),
%(SESSION-TYPE),
%(TP-NAME),
(RESOURCE-ID),
(STATUS),
<< #(SYNC-LEVEL), optional, not used >>
<< #(TIMER), optional, not used >>
<< #(SECURITY), optional, not used >>
#(NUM-PIPS), << optional >>
#(PIP-LENGTHS), << optional >>
%(PIP1), << optional >>
%(PIP2), << optional >>
%(PIP3), << optional >>
<< %(PIP4), optional, not used >>
<< %(PIP5), optional, not used >>
<< %(PIP6), optional, not used >>
<< %(PIP7), optional, not used >>
<< %(PIP8), optional, not used >>