$PAGE "Include File : Object Identifier Format"                         00010000
<<=========================================================             00015000
=                                                         =             00020000
=                  inclobj - h4       * mpe v *           =             00025000
=                                                         =             00030000
=========================================================>>             00035000
                                                                        00040000
                                                                        00045000
                                                                        00050000
<<  begin include file  :  inclobj  >>                                  00055000
                                                                        00060000
comment                                                                 00065000
                                                                        00070000
   the format of the mpe5 object descriptor is as follows:              00075000
                                                                        00080000
           0     3 4                    15                              00085000
          ---------------------------------                             00090000
        0 | type  |      cstblk           |                             00095000
          |_______|_______________________|                             00100000
        1 |     number field              |                             00105000
          |                               |                             00110000
          ---------------------------------                             00115000
                                                                        00120000
   where :                                                              00125000
             0.(0:4) is the object type:                                00130000
                     0 => data segment                                  00135000
                     1 => sl segment                                    00140000
                     2 => program segment                               00145000
                     3 => cache domain                                  00150000
                                                                        00155000
             0.(4:12) is the program index into the cstblk              00160000
                                                                        00165000
             1.(0:16) is the segment number, or dst entry number,       00170000
                      or sl entry number, or cdt entry number.          00175000
                                                                        00180000
;                                                                       00185000
                                                                        00190000
equate                                                                  00195000
                                                                        00200000
   objiddatatype      = 0,                                              00205000
   objidsltype        = 1,                                              00210000
   objidpgmtype       = 2,                                              00215000
   objidcdtype        = 3;                                              00220000
                                                                        00225000
                                                                        00230000
define                                                                  00235000
                                                                        00240000
   objidtype          = (0:4)#,                                         00245000
   objiddescfield     = 0#,                                             00250000
   objidtypefield     = objiddescfield).(0:4#,                          00255000
   objidpbxfield      = objiddescfield).(4:12#,                         00260000
   objidnumfield      = 1#;                                             00265000
                                                                        00270000
equate                                                                  00275000
                                                                        00280000
   dataobject         = objiddatatype,                                  00285000
   slobject           = objidsltype,                                    00290000
   pbxobject          = objidpgmtype,                                   00295000
   mappeddomainobject = objidcdtype;                                    00300000
                                                                        00305000
                                                                        00310000
                                                                        00315000
<<=========================================================             00320000
=                                                         =             00325000
=                end of inclobj                           =             00330000
=                                                         =             00335000
=========================================================>>             00340000
$title " "                                                              00345000
