$PAGE "Include File For PCBX Acess : INCLPCBX"                          00010000
                                                                        00015000
                                                                        00020000
integer array mem(*)=db+0;                                              00025000
                                                                        00030000
<<                                                                      00035000
pcbx                                                                    00040000
>>                                                                      00045000
                                                                        00050000
equate pxglobsize=%14,  <<for access thru extended addressing>>         00055000
       sbtostkdldisp=0,                                                 00060000
       stkdltosbdisp=0,                                                 00065000
       sbtostkreldbdisp=1,                                              00070000
       stkdltostkdbdisp=1,                                              00075000
       stkdbtostkdldisp=-1,                                             00080000
       stkdltodbrelzdisp=%16,                                           00085000
       stkdltopxfixeddisp=12,                                           00090000
       sbtodbrelsdisp=pxglobsize+1,                                     00095000
       sbtodbrelzdisp=pxglobsize+2,                                     00100000
       sbtoinitqdisp=pxglobsize+3,                                      00105000
       sbtodbreldldisp=pxglobsize+4,                                    00110000
       sbtomaxdatadisp=pxglobsize+%15,                                  00115000
       sbtoproctimedisp=pxglobsize+%30,                                 00120000
       sbtopmbndstat=pxglobsize+%36,                                    00125000
       sbtotimeleftdisp=pxglobsize+%37,                                 00130000
       sbtotslrdisp=pxglobsize+%52,                                     00135000
       sbtotstbdisp=pxglobsize+%53,                                     00140000
       sbtotsswapindisp=pxglobsize+%54,                                 00145000
       sbtotsladisp=pxglobsize+%55,                                     00150000
       sbtotslddisp=pxglobsize+%56,                                     00155000
       sbtomeasstopreason=pxglobsize+%75,                               00160000
       sbtomeasstoptime=pxglobsize+%76,                                 00165000
       sbtoqueuetimestampdisp=pxglobsize+%76; <<double word>>           00170000
                                                                        00175000
equate tslrtotstbdisp=1,                                                00180000
       tslrtoqcntdisp=5,                                                00185000
       stkreldbtodbreldldisp=%17,                                       00190000
       stkreldbtosbdisp=-1,                                             00195000
       dbreldltodbrelzdisp=-2,                                          00200000
       dbrelztodbrelsdisp=-1,                                           00205000
       proctimetojcidisp=-%37,                                          00210000
       jcitofrolsdisp=%46,                                              00215000
       jcitotsswapindisp=%63,                                           00220000
       frolstojcidisp=-%46,                                             00225000
       jcitosbdisp=-%5,                                                 00230000
       tsldtotsladisp=-1,                                               00235000
       tslswapintotslrdisp=-2,                                          00240000
       tsswapintotslddisp=2,                                            00245000
       jcitojrolsdisp=%46,                                     <<s7943>>00250000
       tslrtoqcntdisip=5,                                               00255000
       tstbtoqcntdisp=4,                                                00260000
       tslatotslddisp=1;                                                00265000
                                                                        00270000
equate stbtomaxdata=sbtomaxdatadisp,                                    00275000
       maxdatatorelz=-11,                                               00280000
       sbtoreldb=1,                                                     00285000
       maxdatatoreldb=-24,                                              00290000
       relztorbdisp=-14,                                                00295000
       reldbtorelz=13;                                                  00300000
$if x8=off                                                              00305000
$control nolist                                                         00310000
$if                                                                     00315000
comment:                                                                00320000
**********************************************************              00325000
**    if modifications are made on this include file    **              00330000
**    be sure to check the pcbfincl and inclpxg in-     **              00335000
**    clude files for possible modifications also!      **              00340000
**    any changes to this include file will directly    **              00345000
**    affect kernelc, kerneld, and inin.                **              00350000
**********************************************************              00355000
;                                                                       00360000
$control list                                                           00365000
