Diagnostics for MZFLAG - MZMARK - MZVOLM

CALL MZFLAG (IXSTOR,L,IBIT,CHOPT)
CALL MZMARK (IXSTOR,L,CHOPT,NID,IDLIST)
CALL MZVOLM (IXSTOR,L,CHOPT)

#ZFATAL>ZFATAL termination

  case 1 :  maximum depth exceeded
  case 2 :  invalid input parameter L
  case 3 :  invalid next-link LNEW contained in bank LCUR
  case 4 :  invalid link LNEW contained in link JL of bank LCUR
  case 5 :  the bank pointed to by the next-link LNEW in bank LCUR
            does not point back to LCUR with its origin-link

The following numbers are given in /QUEST/

for cases 1 to 5 :

 IQUEST(11) = L, the input parameter

for cases 3 to 5 :

       (12) = LNEW = LQ(LCUR+JL)
       (13) = LCUR, the adr of the bank containing the link LNEW

for case 4 :

       (14) = JL, at this link number

for case 5 :

       (14) = LQ(LNEW+2)

The post-mortem dump of /MZCN/ shows the parameters of the bank pointed to by L or LNEW.