<< LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION>>               00005000
<<=========================================================             00010000
=                                                         =             00015000
=                  INCLMIFT - B7                          =     <04292> 00020000
=                                                         =             00025000
=========================================================>>             00030000
Comment This file contains the definitions of the data structur<<06769>>00035000
        used by MMSTAT and MEASIO.It is unfortunate that these <<06769>>00040000
        structures cannot be completely separated from those of<<06769>>00045000
        measurement interface. MMSTAT has a buffer of SMONBUFSI<<06769>>00050000
        words, and a pointer into the buffer which keeps track <<06769>>00055000
        of the current available entry. The pointer is located <<06769>>00060000
        at location SMONBUFPTR in SYSGLOB. MEASIO has two      <<06769>>00065000
        contiguous buffers MEASBUFSIZE words each, a pointer   <<06769>>00070000
        with a function similar to that of MMSTAT. The pointer <<06769>>00075000
        is located inside of the MEASINFO structure, which is  <<06769>>00080000
        shared with the measurement interface. In addition     <<06769>>00085000
        since MEASIO uses a read and write buffer, there is    <<06769>>00090000
        a status word at location MEASFLAG IN SYSGLOB. The     <<06769>>00095000
        status word contains information about the current     <<06769>>00100000
        read/write buffer plus flags associated with tape I/O. <<06769>>00105000
        Similar to MMSTAT there is a pointer to the base of    <<06769>>00110000
        of the first MEASIO buffer at location MEASIOBUFPTR in <<06769>>00115000
        SYSGLOB. The MEASINFO structure also contains some     <<06769>>00120000
        information realted to MEASIO, such as the tape LDEV   <<06769>>00125000
        and the PLABEL of the tape driver. All these locations <<06769>>00130000
        are declared below.                                    <<06769>>00135000
;                                                              <<06769>>00140000
                                                               <<PN001>>00145000
POINTER MEASINFOTABPTR = %261;                                 <<PN001>>00150000
EQUATE                                                         <<06769>>00155000
   MAXEVENTNUMBER = %77777, << This is an artificial limit   >><<07292>>00160000
   MEASBUFPTR = %31,        << Sysglob location of pointer   >><<06769>>00165000
   SMONBUFPTR = %11,                                           <<06769>>00170000
   SMON'ENTRY'SIZE = %10,                                      <<06769>>00175000
   MEAS'ENTRY'SIZE = %12,                                      <<06769>>00180000
   MEASBUFSIZE = %1000,                                        <<06769>>00185000
   SMONBUFSIZE = %2000;                                        <<06769>>00190000
                                                               <<PN001>>00195000
LOGICAL POINTER                                                <<06769>>00200000
   SMONBUF  =  SMONBUFPTR,                                     <<06769>>00205000
   MEASBUF  =  MEASBUFPTR;                                     <<06769>>00210000
                                                               <<06769>>00215000
DEFINE                                                         <<06769>>00220000
       SYSMEASINFO'TABIDX  =  ABSOLUTE(%1261)#,                <<06769>>00225000
       MEASFLAG            =  ABSOLUTE(%1267)#,                <<06769>>00230000
       GCLASSENABLEDMASK  = ABSOLUTE(%1262)#,                  <<PN001>>00235000
       MEASSTATXDSBANK    = ABSOLUTE(%1263)#,                  <<PN001>>00240000
       MEASSTATXDSBASE    = ABSOLUTE(%1264)#;                  <<PN001>>00245000
                                                               <<PN001>>00250000
DEFINE     MEAS'LDEV  = MEASINFOTABPTR(0)#, <<TAPE LDEV>>      <<PN001>>00255000
           MEAS'PLAB  = MEASINFOTABPTR(1)#, <<MEASIO PLABEL>>  <<PN001>>00260000
           MEAS'DSTN  = MEASINFOTABPTR(2)#; <<MEASIO DST #>>   <<PN001>>00265000
                                                               <<PN001>>00270000
DEFINE MEASSTATXDS'NUM= MEASINFOTABPTR(16)#,                   <<PN001>>00275000
       MEASPROCXDSBANK= MEASINFOTABPTR(17)#,                   <<PN001>>00280000
       MEASPROCXDSBASE= MEASINFOTABPTR(18)#,                   <<PN001>>00285000
       MEASPROCXDSNUM = MEASINFOTABPTR(19)#;                   <<PN001>>00290000
                                                               <<PN001>>00295000
DEFINE  IOSTATXDSBANK = MEASINFOTABPTR(20)#,                   <<PN001>>00300000
        IOSTATXDSBASE = MEASINFOTABPTR(21)#,                   <<PN001>>00305000
        IOSTATXDSNUM  = MEASINFOTABPTR(22)#;                   <<PN001>>00310000
                                                               <<PN001>>00315000
DEFINE CLASS0COUNT    = MEASINFOTABPTR(40).(0:8)#,             <<PN001>>00320000
       CLASS1COUNT    = MEASINFOTABPTR(40).(8:8)#,             <<PN001>>00325000
       CLASS2COUNT    = MEASINFOTABPTR(41).(0:8)#,             <<PN001>>00330000
       CLASS3COUNT    = MEASINFOTABPTR(41).(8:8)#,             <<PN001>>00335000
       CLASS4COUNT    = MEASINFOTABPTR(42).(0:8)#,             <<PN001>>00340000
       CLASS5COUNT    = MEASINFOTABPTR(42).(8:8)#,             <<PN001>>00345000
       CLASS6COUNT    = MEASINFOTABPTR(43).(0:8)#,             <<PN001>>00350000
       CLASS7COUNT    = MEASINFOTABPTR(43).(8:8)#,             <<PN001>>00355000
       CLASS8COUNT    = MEASINFOTABPTR(44).(0:8)#,             <<PN001>>00360000
       CLASS9COUNT    = MEASINFOTABPTR(44).(8:8)#,             <<PN001>>00365000
       CLASS10COUNT   = MEASINFOTABPTR(45).(0:8)#,             <<PN001>>00370000
       CLASS11COUNT   = MEASINFOTABPTR(45).(8:8)#,             <<PN001>>00375000
       CLASS12COUNT   = MEASINFOTABPTR(46).(0:8)#,             <<PN001>>00380000
       CLASS13COUNT   = MEASINFOTABPTR(46).(8:8)#,             <<PN001>>00385000
       CLASS14COUNT   = MEASINFOTABPTR(47).(0:8)#,             <<PN001>>00390000
       CLASS15COUNT   = MEASINFOTABPTR(47).(8:8)#;             <<PN001>>00395000
                                                               <<PN001>>00400000
                                                               <<PN001>>00405000
DEFINE  XDS1INDEX     = MEASINFOTABPTR(57)#,                   <<PN001>>00410000
        XDS2INDEX     = MEASINFOTABPTR(58)#,                   <<PN001>>00415000
           DCOUNT     = MEASINFOTABPTR(59)#,                   <<PN001>>00420000
           DLIMIT     = MEASINFOTABPTR(60)#,                   <<PN001>>00425000
           TCOUNT     = MEASINFOTABPTR(61)#,                   <<PN001>>00430000
           TLIMIT     = MEASINFOTABPTR(62)#,                   <<PN001>>00435000
           DLABEL     = MEASINFOTABPTR(63)#,                   <<PN001>>00440000
           SMONDIX     = ABSOLUTE(%1034)#;    <<MMSTAT index>> <<06769>>00445000
                                                               <<PN001>>00450000
DEFINE                                                         <<06769>>00455000
   MEAS'IDX      = MEASINFOTABPTR(66)#,  << Measio index >>    <<06769>>00460000
   MEAS'MSK0     = MEASINFOTABPTR(67)#,                        <<06769>>00465000
   MEAS'MSK1     = MEASINFOTABPTR(68)#;                        <<06769>>00470000
                                                               <<06769>>00475000
                                                               <<PN001>>00480000
DEFINE IOSTATMASK    = (14:1)#,                                <<PN001>>00485000
        IOSTATSENBLD = GCLASSENABLEDMASK.IOSTATMASK <> 0#,     <<PN001>>00490000
        IOSTATREQ    = CLASSMASK.IOSTATMASK <> 0#;             <<PN001>>00495000
                                                               <<PN001>>00500000
<<=========================================================             00505000
=                                                         =             00510000
=                  END INCLMIFT                           =             00515000
=                                                         =             00520000
=========================================================>>             00525000
