CALL MZSTOR (IXSTOR*, CHNAME, CHOPT, FENCE, LQ(1), LQ(LR), LQ(LW), LQ(LIM2), LQ(LAST))
case 1 : the sizes of the various regions of the store
are either inconsistent or too small
case 2 : the size of the fence is less than 1 or more than 1000
case 3 : the maximum number of stores which can be handled
by ZEBRA is exceeded
case 4 : the new store overlaps with the table of a previous store
case 5 : the new store overlaps with a previous store
case 6 : the primary store cannot be a split store
The following numbers are given in /QUEST/
for all cases :
IQUEST(11) = char 1:4
(12) = 5:8 of the printing name of the new store
(13) = size of the fence
(14) = number of permanent structural links
(15) = number of permanent links
(16) = number of low words
(17) = total size of the store
(18) = minimum size of the reserve area required
(19) = minimum size of the data part of the store required
for cases 4 to 5 :
IQUEST(20) = serial number of the clashing previous store;
= 0 for the primary store,
= 1 for the first secondary store, etc.
(21) = char 1:4
(22) = 5:8 of the printing name of the clashing store