INTEGER POINTER SIRTAB = %14;                                           00010000
equate sirtabentrylength = 4,                                  <<06710>>00015000
       first'jobsir      = 43;                                 <<06710>>00020000
define                                                                  00025000
   sir'holder     = sirtab(sirtabinx)#,                                 00030000
   sir'queuelen   = sirtab(sirtabinx+1)#,                               00035000
   sir'head       = sirtab(sirtabinx+2)#,                               00040000
   sir'tail       = sirtab(sirtabinx+3)#;                               00045000
