CALL MZLINK (IXSTOR,CHNAME,LAREA,LREF,LREFL) CALL MZLINT (IXSTOR,CHNAME,LAREA,LREF,LREFL)
case 1 : the parameters are inconsistent case 2 : the new link-area overlaps with the table of some store case 3 : the new link-area overlaps with some store case 4 : the new link-area overlaps with a previously defined link-area for some store
The following numbers are given in /QUEST/
for cases 1 to 4 : IQUEST(11) = char 1:4 (12) = 5:8 of the printing name of the new link-area (13) = absolute adr of parameter LAREA (14) = absolute adr of parameter LREF (15) = absolute adr of parameter LREFL (16) = number of structural links derived (17) = total number of links derived for cases 2 to 4 : IQUEST(18) = serial number of the clashing store; = 0 for the primary store, = 1 for the first secondary store, etc. (19) = char 1:4 (20) = 5:8 of the printing name of the clashing store for case 4 : IQUEST(21) = char 1:4 (22) = 5:8 of the printing name of the clashing link-area (23) = absolute adr of the start of the clashing link-area (24) only for MZLINT : = initial content of LAREA(2)
Case 4 will happen with MZLINT if the user over-writes
the system word in LAREA(2)
,
in which case the link-area will appear to clash with itself.
CALL MZMARK (IXSTOR,L,CHOPT,NID,IDLIST)
See MZFLAG