<<=========================================================             00010000
=                                                         =             00012000
=                  INCLPCB - A2                           =             00014000
=                                                         =             00016000
=========================================================>>             00018000
                                                                        00020000
                                                                        00022000
EQUATE PCBSIZE = %20;                                                   00023000
                                                                        00023100
                                                                        00024000
<<                                                                      00026000
PCB WORDS AND FIELDS                                                    00028000
>>                                                                      00030000
                                                                        00032000
LOGICAL ARRAY PCBRESABORTINFO(*)=DB+0,                                  00034000
              PCBSLLPTR(*)=DB+1,                                        00036000
              PCBDBXDSINFO(*)=DB+2,                                     00038000
              PCBSTKINFO(*)=DB+3,                                       00040000
              PCBWAKEMASK(*)=DB+4,                                      00042000
              PCBFATHERSONINFO(*)=DB+5,                                 00044000
              PCBBROTHERINFO(*)=DB+6,                                   00046000
              PCBPIMPPINBKLINK(*)=DB+7,                                 00048000
              PCBEVENTFLAGS(*)=DB+%12,                                  00050000
              PCBPROCSTATE(*)=DB+%11,                                   00052000
              PCBPIINFONIMPPIN(*)=DB+%10,                               00054000
              PCBLASTREFCODE(*)=DB+%13,                                 00056000
              PCBPBX(*)=DB+%14,                                         00058000
              PCBQUEUEINGINFO(*)=DB+%15,                                00060000
              PCBNQPTR(*)=DB+%16,                                       00062000
              PCBPQPTR(*)=DB+%17;                                       00064000
                                                                        00066000
DEFINE RESABORTINFO=PCBRESABORTINFO(X)#,                                00068000
       SLLPTR=PCBSLLPTR(X)#,                                            00070000
       DBXDSINFO=PCBDBXDSINFO(X)#,                                      00072000
       STKINFO=PCBSTKINFO(X)#,                                          00074000
       WAKEMASK=PCBWAKEMASK(X)#,                                        00076000
       FATHERSONINFO=PCBFATHERSONINFO(X)#,                              00078000
       BROTHERINFO=PCBBROTHERINFO(X)#,                                  00080000
       PIMPPINBKLINK=PCBPIMPPINBKLINK(X)#,                              00082000
       EVENTFLAGS=PCBEVENTFLAGS(X)#,                                    00084000
       PROCSTATE=PCBPROCSTATE(X)#,                                      00086000
       PIINFONIMPPIN=PCBPIINFONIMPPIN(X)#,                              00088000
       LASTREFCODESEG=PCBLASTREFCODE(X)#,                               00090000
       PBX=PCBPBX(X)#,                                                  00092000
       QUEUEINGINFO=PCBQUEUEINGINFO(X)#,                                00094000
       NQPTR=PCBNQPTR(X)#,                                              00096000
       PQPTR=PCBPQPTR(X)#;                                              00098000
                                                                        00100000
EQUATE RESABORTINFOWORDNUM=0,                                           00102000
       SLLIXWORDNUM=1,                                                  00104000
       DBXDSINFOWORDNUM=2,                                              00106000
       STKINFOWORDNUM=3,                                                00108000
       WAKEMASKWORDNUM=4,                                               00110000
       FATHERSONINFOWORDNUM=5,                                          00112000
       BROTHERINFOWORDNUM=6,                                            00114000
       PIMPPINBKLINKWORDNUM=7,                                          00116000
       PIINFONIMPPINWORDNUM=%10,                                        00118000
       PROCSTATEWORDNUM=%11,                                            00120000
       EVENTFLAGSWORDNUM=%12,                                           00122000
       LASTREFCODEWORDNUM=%13,                                          00124000
       PBXWORDNUM=%14,                                                  00126000
       QUEUEINGINFOWORDNUM=%15,                                         00128000
       NQPTRWORDNUM=%16,                                                00130000
       PQPTRWORDNUM=%17;                                                00132000
                                                                        00134000
EQUATE SARBIT=0, <<MISC BITS FOR TBC,TRBC, ...>>                        00136000
       SCBIT=1,                                                         00138000
       CRITBIT=2,                                                       00140000
       HASSIRBIT=3,                                                     00142000
       PIOVRBIT=4,                                                      00144000
       INCPROTECTEXPBIT=6,                                              00146000
       PREEMPTCAPBIT=7,                                                 00148000
       MUSTPREEMPTBIT=8,                                                00150000
       IMPEDEDWAITBIT=12,                                               00152000
       SIRWAITBIT=13,                                                   00154000
       TIMWAITBIT=14,                                                   00156000
       MEMORYWAITBIT=15,                                                00158000
       IMPEDEDWAKEBIT=12,                                               00160000
       SIRWAKEBIT=13,                                                   00162000
       TIMWAKEBIT=14,                                                   00164000
       MEMORYWAKEBIT=15,                                                00166000
       WWSBIT=15,                                                       00168000
       DISPQBIT=0,                                                      00170000
       MAIN=2,                                                 <<01677>>00172000
       SOFTKILL=%20,                                                    00174000
       LSCHEDBIT=1,                                                     00176000
       CSCHEDBIT=2,                                                     00178000
       DSCHEDBIT=3,                                                     00180000
       ESCHEDBIT=4,                                                     00182000
       INTERACTIVEBIT=5,                                                00184000
       CORERESBIT=6,                                                    00186000
       HOLDSIRPRIBIT=5;                                                 00188000
                                                                        00190000
DEFINE SARFLAG=(0:1)#,                                                  00192000
       SCFLAG=(1:1)#,                                                   00194000
       CRITFLAG=(2:1)#,                                                 00196000
       HASSIRFLAG=(3:1)#,                                               00198000
       CRITSIRFLAG=(2:2)#,                                     <<03039>>00200000
       PIOVRFLAG=(4:1)#,                                                00202000
       INCPROTECTEXPFLAG=(6:1)#,                                        00204000
       PREEMPTCAPFLAG=(7:1)#,                                           00206000
       MUSTPREMPTFLAG=(8:1)#,                                           00208000
       PCBLONGWAITFLAG=(9:1)#,                                          00210000
       PCBSHORTWAITFLAG=(10:1)#,                                        00212000
       PCBTERMREADFLAG=(11:1)#,                                         00214000
       USEDQUANTUMFLAG=(12:1)#,                                         00216000
       HOLDIMPPRIFLAG=(13:1)#,                                          00218000
       DELAYSOFTFLAG=(8:1)#,                                            00220000
       STOVABORTFLAG=(14:1)#,                                           00222000
       RITBRKFLAG=(15:1)#,                                              00224000
       ABSDBFLAG=(0:1)#,                                                00226000
       XDSDSTFIELD=(1:10)#,                                             00228000
       STOVRALLFLAG=(0:1)#,                                             00230000
       STKDSTFIELD=(1:10)#,                                             00232000
       INSYSTEMFLAG=(11:1)#,                                            00234000
       PIMPPINFIELD=(0:8)#,                                             00236000
       NIMPPINFIELD=(8:8)#,                                             00238000
       OAFIELD=(4:2)#,                                                  00240000
       CRITEVENTFIELD=(12:4)#,                                          00242000
       NONCRITEVENTFIELD=(0:12)#,                                       00244000
       MOURNWAITFLAG=(0:1)#,                                            00246000
       BLKDIOWAITFLAG=(4:1)#,                                           00248000
       IMPEDEDWAITFLAG=(12:1)#,                                         00250000
       SIRWAITFLAG=(13:1)#,                                             00252000
       TIMERWAITFLAG=(14:1)#,                                           00254000
       FATHERSONWAKEFLAGS=(10:2)#,                                      00256000
       FATHERWAITFLAG=(11:1)#,                                          00258000
       ABORTWAKEFLAGS=(8:4)#,                                  <<03039>>00260000
       INTFASONWAKEFLAGS=(9:3)#,                                        00262000
       MEMORYWAITFLAG=(15:1)#,                                          00264000
       MOURNWAKEFLAG=(0:1)#,                                            00266000
       IMPEDEDWAKEFLAG=(12:1)#,                                         00268000
       SIRWAKEFLAG=(13:1)#,                                             00270000
       TIMERWAKEFLAG=(14:1)#,                                           00272000
       WWS=(15:1)#,                                                     00274000
       MEMORYWAKEFLAG=(15:1)#,                                          00276000
       FATHERPINFIELD=(0:8)#,                                           00278000
       SONPINFIELD=(8:8)#,                                              00280000
       BROTHERPINFIELD=(0:8)#,                                          00282000
       BREAKPTLINKFIELD=(8:8)#,                                         00284000
       PTYPEFIELD=(6:3)#,                                      <<01677>>00286000
       FACFLAG=(7:1)#,                                                  00288000
       STOVFLAG=(5:1)#,                                                 00290000
       SYSTEMPROCFLAG=(6:1)#,                                           00292000
       ALIVEFLAG=(0:1)#,                                                00294000
       SOFTINTFLAG=(9:1)#,                                     <<03039>>00296000
       SIPIFLAGSFIELD=(9:7)#,                                  <<03039>>00298000
       PIFLAGSFIELD=(10:6)#,                                            00300000
       HYBERNATEFLAG=(13:1)#,                                           00302000
       STOPFLAG=(12:1)#,                                                00304000
       CYFLAG=(14:1)#,                                                  00306000
       BKFLAG=(15:1)#,                                                  00308000
       PSIMFIELD=(0:3)#,                                                00310000
       WAKESOFTFLAG=(3:1)#,                                    <<03039>>00312000
       DISPQFLAG=(0:1)#,                                                00314000
       LSCHEDFLAG=(1:1)#,                                               00316000
       CSCHEDFLAG=(2:1)#,                                               00318000
       DSCHEDFLAG=(3:1)#,                                               00320000
       ESCHEDFLAG=(4:1)#,                                               00322000
       INTERACTIVEFLAG=(5:1)#,                                 <<04521>>00324000
       PROCRESIDENTFLAG=(6:1)#,                                <<04521>>00326000
       HOLDSIRPRIFLAG=(5:1)#,                                  <<04521>>00328000
       QUEUEFIELD=(1:4)#,                                      <<04521>>00330000
       ALLOWSOFTFLAG=(7:1)#,                                   <<04521>>00332000
       PRIFIELD=(8:8)#;                                        <<04521>>00334000
                                                               <<04521>>00336000
                                                               <<04521>>00338000
DEFINE                                                         <<04521>>00340000
   SPCBCRITSIR    = PCB(PCBPT).CRITSIRFLAG#,                   <<04521>>00342000
   SPCBPIOVRFLAG  = PCB(PCBPT).PIOVRFLAG#,                     <<04521>>00344000
   SPCBDELAYSOFT  = PCB(PCBPT).DELAYSOFTFLAG#,                          00346000
   SPCBWAITFIELD  = PCB(PCBPT+WAKEMASKWORDNUM).(0:15)#,                 00348000
   SPCBNONCRITWAIT= PCB(PCBPT+WAKEMASKWORDNUM).NONCRITEVENTFIELD#,      00350000
   SPCBABORTWAKE  = PCB(PCBPT+WAKEMASKWORDNUM).ABORTWAKEFLAGS#,         00352000
   SPCBIMPEDE     = PCB(PCBPT+WAKEMASKWORDNUM).IMPEDEDWAITFLAG#,        00354000
   SPCBPSIM       = PCB(PCBPT+PIINFONIMPPINWORDNUM).PSIMFIELD#,         00356000
   SPCBWAKESOFT   = PCB(PCBPT+PIINFONIMPPINWORDNUM).WAKESOFTFLAG#,      00358000
   SPCBSOFTINT    = PCB(PCBPT+PROCSTATEWORDNUM).SOFTINTFLAG#,           00360000
   SPCBPIFLAGS    = PCB(PCBPT+PROCSTATEWORDNUM).PIFLAGSFIELD#,          00362000
   SPCBDISPQ      = PCB(PCBPT+QUEUEINGINFOWORDNUM).DISPQFLAG#,          00364000
   SPCBALLOWSOFT  = PCB(PCBPT+QUEUEINGINFOWORDNUM).ALLOWSOFTFLAG#,      00366000
                                                                        00368000
   CPCBCRITSIR    = ABS(ABS(CPCB)).CRITSIRFLAG#,                        00370000
   CPCBPIOVRFLAG  = ABS(ABS(CPCB)).PIOVRFLAG#,                          00372000
   CPCBDELAYSOFT  = ABS(ABS(CPCB)).DELAYSOFTFLAG#,                      00374000
   CPCBWAITFIELD  = ABS(ABS(CPCB)+WAKEMASKWORDNUM).(0:15)#,             00376000
   CPCBNONCRITWAIT= ABS(ABS(CPCB)+WAKEMASKWORDNUM).NONCRITEVENTFIELD#,  00378000
   CPCBABORTWAKE  = ABS(ABS(CPCB)+WAKEMASKWORDNUM).ABORTWAKEFLAGS#,     00380000
   CPCBIMPEDE     = ABS(ABS(CPCB)+WAKEMASKWORDNUM).IMPEDEDWAITFLAG#,    00382000
   CPCBPSIM       = ABS(ABS(CPCB)+PIINFONIMPPINWORDNUM).PSIMFIELD#,     00384000
   CPCBWAKESOFT   = ABS(ABS(CPCB)+PIINFONIMPPINWORDNUM).WAKESOFTFLAG#,  00386000
   CPCBSOFTINT    = ABS(ABS(CPCB)+PROCSTATEWORDNUM).SOFTINTFLAG#,       00388000
   CPCBPIFLAGS    = ABS(ABS(CPCB)+PROCSTATEWORDNUM).PIFLAGSFIELD#,      00390000
   CPCBDISPQ      = ABS(ABS(CPCB)+QUEUEINGINFOWORDNUM).DISPQFLAG#,      00392000
   CPCBALLOWSOFT  = ABS(ABS(CPCB)+QUEUEINGINFOWORDNUM).ALLOWSOFTFLAG#;  00394000
                                                                        00396000
<<=========================================================             00398000
=                                                         =             00400000
=                  END INCLPCB                            =             00402000
=                                                         =             00404000
=========================================================>>             00406000
