CALL MZWORK (IXSTOR,DFIRST,DLAST,IFLAG)
Let NQREF be the number of permanent links in the store
NL be the number of wsp links derived from DFIRST
ND be the number of data words derived from DLAST
NEWL = NQREF + NL
NEWD = NQREF + NL + ND
case 1 : the value of parameter IFLAG is illegal
case 2 : NEWL is less than NQREF, ie. NL is negative
case 3 : NEWD is less than NEWL, ie. ND is negative
case 4 : NEWD reaches beyond the end of division 2
The following numbers are given in /QUEST/
IQUEST(11) = NQREF
(12) = NEWL
(13) = NEWD
(14) = IFLAG