<<=========================================================             00010000
=                                                         =             00015000
=                  INCLPCB - A2                           =             00020000
=                                                         =             00025000
=========================================================>>             00030000
                                                                        00035000
                                                                        00040000
EQUATE PCBSIZE = %20;                                          <<06204>>00045000
                                                               <<06204>>00050000
                                                                        00055000
<<                                                                      00060000
PCB WORDS AND FIELDS                                                    00065000
>>                                                                      00070000
                                                                        00075000
LOGICAL ARRAY PCBRESABORTINFO(*)=DB+0,                                  00080000
              PCBSLLPTR(*)=DB+1,                                        00085000
              PCBDBXDSINFO(*)=DB+2,                                     00090000
              PCBSTKINFO(*)=DB+3,                                       00095000
              PCBWAKEMASK(*)=DB+4,                                      00100000
              PCBFATHERSONINFO(*)=DB+5,                                 00105000
              PCBBROTHERINFO(*)=DB+6,                                   00110000
              PCBPIMPPINBKLINK(*)=DB+7,                                 00115000
              PCBEVENTFLAGS(*)=DB+%12,                                  00120000
              PCBPROCSTATE(*)=DB+%11,                                   00125000
              PCBPIINFONIMPPIN(*)=DB+%10,                               00130000
              PCBLASTREFCODE(*)=DB+%13,                                 00135000
              PCBMAPDST(*)=DB+%14,                             <<06106>>00140000
              PCBQUEUEINGINFO(*)=DB+%15,                                00145000
              PCBNQPTR(*)=DB+%16,                                       00150000
              PCBPQPTR(*)=DB+%17;                                       00155000
                                                                        00160000
DEFINE RESABORTINFO=PCBRESABORTINFO(X)#,                                00165000
       SLLPTR=PCBSLLPTR(X)#,                                            00170000
       DBXDSINFO=PCBDBXDSINFO(X)#,                                      00175000
       STKINFO=PCBSTKINFO(X)#,                                          00180000
       WAKEMASK=PCBWAKEMASK(X)#,                                        00185000
       FATHERSONINFO=PCBFATHERSONINFO(X)#,                              00190000
       BROTHERINFO=PCBBROTHERINFO(X)#,                                  00195000
       PIMPPINBKLINK=PCBPIMPPINBKLINK(X)#,                              00200000
       EVENTFLAGS=PCBEVENTFLAGS(X)#,                                    00205000
       PROCSTATE=PCBPROCSTATE(X)#,                                      00210000
       PIINFONIMPPIN=PCBPIINFONIMPPIN(X)#,                              00215000
       LASTREFCODESEG=PCBLASTREFCODE(X)#,                               00220000
       MAPDST=PCBMAPDST(X)#,                                   <<06106>>00225000
       QUEUEINGINFO=PCBQUEUEINGINFO(X)#,                                00230000
       NQPTR=PCBNQPTR(X)#,                                              00235000
       PQPTR=PCBPQPTR(X)#;                                              00240000
                                                                        00245000
EQUATE RESABORTINFOWORDNUM=0,                                           00250000
       SLLIXWORDNUM=1,                                                  00255000
       DBXDSINFOWORDNUM=2,                                              00260000
       STKINFOWORDNUM=3,                                                00265000
       WAKEMASKWORDNUM=4,                                               00270000
       FATHERSONINFOWORDNUM=5,                                          00275000
       BROTHERINFOWORDNUM=6,                                            00280000
       PIMPPINBKLINKWORDNUM=7,                                          00285000
       PIINFONIMPPINWORDNUM=%10,                                        00290000
       PROCSTATEWORDNUM=%11,                                            00295000
       EVENTFLAGSWORDNUM=%12,                                           00300000
       LASTREFCODEWORDNUM=%13,                                          00305000
       MAPDSTWORDNUM=%14,                                      <<06106>>00310000
       QUEUEINGINFOWORDNUM=%15,                                         00315000
       NQPTRWORDNUM=%16,                                                00320000
       PQPTRWORDNUM=%17;                                                00325000
                                                                        00330000
EQUATE SARBIT=0, <<MISC BITS FOR TBC,TRBC, ...>>                        00335000
       SCBIT=1,                                                         00340000
       CRITBIT=2,                                                       00345000
       HASSIRBIT=3,                                                     00350000
       PIOVRBIT=4,                                                      00355000
       INCPROTECTEXPBIT=6,                                              00360000
       PREEMPTCAPBIT=7,                                                 00365000
       MUSTPREEMPTBIT=8,                                                00370000
       IMPEDEDWAITBIT=12,                                               00375000
       SIRWAITBIT=13,                                                   00380000
       TIMWAITBIT=14,                                                   00385000
       MEMORYWAITBIT=15,                                                00390000
       IMPEDEDWAKEBIT=12,                                               00395000
       SIRWAKEBIT=13,                                                   00400000
       TIMWAKEBIT=14,                                                   00405000
       MEMORYWAKEBIT=15,                                                00410000
       WWSBIT=15,                                                       00415000
       DISPQBIT=0,                                                      00420000
       MAIN=2,                                                 <<01677>>00425000
       SOFTKILL=%20,                                                    00430000
       LSCHEDBIT=1,                                                     00435000
       CSCHEDBIT=2,                                                     00440000
       DSCHEDBIT=3,                                                     00445000
       ESCHEDBIT=4,                                                     00450000
       INTERACTIVEBIT=5,                                                00455000
       CORERESBIT=6,                                                    00460000
       HOLDSIRPRIBIT=5;                                                 00465000
                                                                        00470000
DEFINE SARFLAG=(0:1)#,                                                  00475000
       SCFLAG=(1:1)#,                                                   00480000
       CRITFLAG=(2:1)#,                                                 00485000
       HASSIRFLAG=(3:1)#,                                               00490000
       CRITSIRFLAG=(2:2)#,                                     <<03039>>00495000
       PIOVRFLAG=(4:1)#,                                                00500000
       INCPROTECTEXPFLAG=(6:1)#,                                        00505000
       PREEMPTCAPFLAG=(7:1)#,                                           00510000
       MUSTPREMPTFLAG=(8:1)#,                                           00515000
       PCBLONGWAITFLAG=(9:1)#,                                          00520000
       PCBSHORTWAITFLAG=(10:1)#,                                        00525000
       PCBTERMREADFLAG=(11:1)#,                                         00530000
       USEDQUANTUMFLAG=(12:1)#,                                         00535000
       HOLDIMPPRIFLAG=(13:1)#,                                          00540000
       DELAYSOFTFLAG=(8:1)#,                                            00545000
       STOVABORTFLAG=(14:1)#,                                           00550000
       RITBRKFLAG=(15:1)#,                                              00555000
       ABSDBFLAG=(0:1)#,                                                00560000
       XDSDSTFIELD=(1:10)#,                                             00565000
       STOVRALLFLAG=(0:1)#,                                             00570000
       STKDSTFIELD=(1:10)#,                                             00575000
       INSYSTEMFLAG=(11:1)#,                                            00580000
       PIMPPINFIELD=(0:8)#,                                             00585000
       NIMPPINFIELD=(8:8)#,                                             00590000
       OAFIELD=(4:2)#,                                                  00595000
       CRITEVENTFIELD=(12:4)#,                                          00600000
       NONCRITEVENTFIELD=(0:12)#,                                       00605000
       MOURNWAITFLAG=(0:1)#,                                            00610000
       BLKDIOWAITFLAG=(4:1)#,                                           00615000
       IMPEDEDWAITFLAG=(12:1)#,                                         00620000
       SIRWAITFLAG=(13:1)#,                                             00625000
       TIMERWAITFLAG=(14:1)#,                                           00630000
       FATHERSONWAKEFLAGS=(10:2)#,                                      00635000
       FATHERWAITFLAG=(11:1)#,                                          00640000
       ABORTWAKEFLAGS=(8:4)#,                                  <<03039>>00645000
       INTFASONWAKEFLAGS=(9:3)#,                                        00650000
       MEMORYWAITFLAG=(15:1)#,                                          00655000
       MOURNWAKEFLAG=(0:1)#,                                            00660000
       IMPEDEDWAKEFLAG=(12:1)#,                                         00665000
       SIRWAKEFLAG=(13:1)#,                                             00670000
       TIMERWAKEFLAG=(14:1)#,                                           00675000
       WWS=(15:1)#,                                                     00680000
       MEMORYWAKEFLAG=(15:1)#,                                          00685000
       FATHERPINFIELD=(0:8)#,                                           00690000
       SONPINFIELD=(8:8)#,                                              00695000
       BROTHERPINFIELD=(0:8)#,                                          00700000
       PBXFIELD=(8:8)#,                                        <<06106>>00705000
       BREAKPTLINKFIELD=(8:8)#,                                         00710000
       PTYPEFIELD=(6:3)#,                                      <<01677>>00715000
       FACFLAG=(7:1)#,                                                  00720000
       STOVFLAG=(5:1)#,                                                 00725000
       SYSTEMPROCFLAG=(6:1)#,                                           00730000
       ALIVEFLAG=(0:1)#,                                                00735000
       SOFTINTFLAG=(9:1)#,                                     <<03039>>00740000
       SIPIFLAGSFIELD=(9:7)#,                                  <<03039>>00745000
       PIFLAGSFIELD=(10:6)#,                                            00750000
       HYBERNATEFLAG=(13:1)#,                                           00755000
       STOPFLAG=(12:1)#,                                                00760000
       CYFLAG=(14:1)#,                                                  00765000
       BKFLAG=(15:1)#,                                                  00770000
       PSIMFIELD=(0:3)#,                                                00775000
       WAKESOFTFLAG=(3:1)#,                                    <<03039>>00780000
       DISPQFLAG=(0:1)#,                                                00785000
       LSCHEDFLAG=(1:1)#,                                               00790000
       CSCHEDFLAG=(2:1)#,                                               00795000
       DSCHEDFLAG=(3:1)#,                                               00800000
       ESCHEDFLAG=(4:1)#,                                               00805000
       INTERACTIVEFLAG=(5:1)#,                                 <<04521>>00810000
       PROCRESIDENTFLAG=(6:1)#,                                <<04521>>00815000
       HOLDSIRPRIFLAG=(5:1)#,                                  <<04521>>00820000
       QUEUEFIELD=(1:4)#,                                      <<04521>>00825000
       ALLOWSOFTFLAG=(7:1)#,                                   <<04521>>00830000
       PRIFIELD=(8:8)#;                                        <<04521>>00835000
                                                               <<04521>>00840000
                                                               <<04521>>00845000
DEFINE                                                         <<04521>>00850000
   SPCBCRITSIR    = PCB(PCBPT).CRITSIRFLAG#,                   <<04521>>00855000
   SPCBPIOVRFLAG  = PCB(PCBPT).PIOVRFLAG#,                     <<04521>>00860000
   SPCBDELAYSOFT  = PCB(PCBPT).DELAYSOFTFLAG#,                          00865000
   SPCBWAITFIELD  = PCB(PCBPT+WAKEMASKWORDNUM).(0:15)#,                 00870000
   SPCBNONCRITWAIT= PCB(PCBPT+WAKEMASKWORDNUM).NONCRITEVENTFIELD#,      00875000
   SPCBABORTWAKE  = PCB(PCBPT+WAKEMASKWORDNUM).ABORTWAKEFLAGS#,         00880000
   SPCBIMPEDE     = PCB(PCBPT+WAKEMASKWORDNUM).IMPEDEDWAITFLAG#,        00885000
   SPCBPSIM       = PCB(PCBPT+PIINFONIMPPINWORDNUM).PSIMFIELD#,         00890000
   SPCBWAKESOFT   = PCB(PCBPT+PIINFONIMPPINWORDNUM).WAKESOFTFLAG#,      00895000
   SPCBSOFTINT    = PCB(PCBPT+PROCSTATEWORDNUM).SOFTINTFLAG#,           00900000
   SPCBPIFLAGS    = PCB(PCBPT+PROCSTATEWORDNUM).PIFLAGSFIELD#,          00905000
   SPCBDISPQ      = PCB(PCBPT+QUEUEINGINFOWORDNUM).DISPQFLAG#,          00910000
   SPCBALLOWSOFT  = PCB(PCBPT+QUEUEINGINFOWORDNUM).ALLOWSOFTFLAG#,      00915000
   SPCBPBX        = PCB(PCBPT+BROTHERINFOWORDNUM).PBXFIELD#,   <<06106>>00920000
   SPCBMAPDST     = PCB(PCBPT+MAPDSTWORDNUM)#,                 <<06106>>00925000
                                                                        00930000
   CPCBCRITSIR    = ABS(ABS(CPCB)).CRITSIRFLAG#,                        00935000
   CPCBPIOVRFLAG  = ABS(ABS(CPCB)).PIOVRFLAG#,                          00940000
   CPCBDELAYSOFT  = ABS(ABS(CPCB)).DELAYSOFTFLAG#,                      00945000
   CPCBWAITFIELD  = ABS(ABS(CPCB)+WAKEMASKWORDNUM).(0:15)#,             00950000
   CPCBNONCRITWAIT= ABS(ABS(CPCB)+WAKEMASKWORDNUM).NONCRITEVENTFIELD#,  00955000
   CPCBABORTWAKE  = ABS(ABS(CPCB)+WAKEMASKWORDNUM).ABORTWAKEFLAGS#,     00960000
   CPCBIMPEDE     = ABS(ABS(CPCB)+WAKEMASKWORDNUM).IMPEDEDWAITFLAG#,    00965000
   CPCBPSIM       = ABS(ABS(CPCB)+PIINFONIMPPINWORDNUM).PSIMFIELD#,     00970000
   CPCBWAKESOFT   = ABS(ABS(CPCB)+PIINFONIMPPINWORDNUM).WAKESOFTFLAG#,  00975000
   CPCBSOFTINT    = ABS(ABS(CPCB)+PROCSTATEWORDNUM).SOFTINTFLAG#,       00980000
   CPCBPIFLAGS    = ABS(ABS(CPCB)+PROCSTATEWORDNUM).PIFLAGSFIELD#,      00985000
   CPCBDISPQ      = ABS(ABS(CPCB)+QUEUEINGINFOWORDNUM).DISPQFLAG#,      00990000
   CPCBALLOWSOFT  = ABS(ABS(CPCB)+QUEUEINGINFOWORDNUM).ALLOWSOFTFLAG#,  00995000
   CPCBPBX        =ABS(ABS(CPCB)+BROTHERINFOWORDNUM).PBXFIELD#,<<06106>>01000000
   CPCBMAPDST     = ABS(ABS(CPCB)+MAPDSTWORDNUM)#;             <<06106>>01005000
                                                                        01010000
<<=========================================================             01015000
=                                                         =             01020000
=                  END INCLPCB                            =             01025000
=                                                         =             01030000
=========================================================>>             01035000
