$page "Include File for Kernelc Importable Procedure Declarations"      00001000
                                                                        00002000
<<BEGIN INCLKCMP>>                                                      00003000
                                                                        00004000
INTEGER PROCEDURE CONVEXTLABELTODELTAP(EXTLABEL);                       00005000
VALUE EXTLABEL;                                                         00006000
INTEGER EXTLABEL;                                                       00007000
OPTION EXTERNAL;                                                        00008000
                                                                        00009000
PROCEDURE AWAKE (PCBPT,WAKECODE,WAITFLAGS);                             00010000
VALUE PCBPT,WAKECODE,WAITFLAGS;                                         00011000
INTEGER PCBPT,WAITFLAGS;                                                00012000
LOGICAL WAKECODE;                                                       00013000
OPTION EXTERNAL;                                                        00014000
                                                                        00015000
                                                                        00016000
LOGICAL PROCEDURE GETSYSTABENTRY(SYSTABINX);                            00017000
VALUE SYSTABINX;                                                        00018000
LOGICAL SYSTABINX;                                                      00019000
OPTION EXTERNAL;                                                        00020000
                                                                        00021000
PROCEDURE RELSYSTABENTRY(SYSTABINX,ENTRYSYSBASEINX);                    00022000
VALUE SYSTABINX,ENTRYSYSBASEINX;                                        00023000
LOGICAL SYSTABINX,ENTRYSYSBASEINX;                                      00024000
OPTION EXTERNAL;                                                        00025000
                                                                        00026000
INTEGER PROCEDURE PORTSTATUS(PORTNUMBER);                               00027000
VALUE PORTNUMBER;                                                       00028000
INTEGER PORTNUMBER;                                                     00029000
OPTION EXTERNAL;                                                        00030000
PROCEDURE PSEUDOINT;                                                    00038000
OPTION EXTERNAL;                                                        00039000
                                                                        00040000
LOGICAL PROCEDURE SETSYSDB;                                             00041000
OPTION EXTERNAL;                                                        00042000
                                                                        00043000
PROCEDURE RESETDB(WHERE);                                               00044000
VALUE WHERE;                                                            00045000
INTEGER WHERE;                                                          00046000
OPTION EXTERNAL;                                                        00047000
                                                                        00048000
LOGICAL PROCEDURE EXCHANGEDB(WHERE);                                    00049000
VALUE WHERE;                                                            00050000
INTEGER WHERE;                                                          00051000
OPTION EXTERNAL;                                                        00052000
                                                                        00053000
PROCEDURE GETDATASEGCHANGESTATE(SEGNUM);                                00054000
VALUE SEGNUM;                                                           00055000
INTEGER SEGNUM;                                                         00056000
OPTION EXTERNAL;                                                        00057000
                                                                        00058000
PROCEDURE IMPEDE(PCBPT);                                                00059000
VALUE PCBPT;                                                            00060000
INTEGER PCBPT;                                                          00061000
OPTION EXTERNAL;                                                        00062000
                                                                        00063000
PROCEDURE UNIMPEDE(PCBPT);                                              00064000
VALUE PCBPT;                                                            00065000
INTEGER PCBPT;                                                          00066000
OPTION EXTERNAL;                                                        00067000
                                                                        00068000
PROCEDURE QUEUEPROC(PROCSYSDBINX,QUEUENAME,LOCATION);                   00069000
VALUE PROCSYSDBINX,QUEUENAME,LOCATION;                                  00070000
INTEGER PROCSYSDBINX,QUEUENAME,LOCATION;                                00071000
OPTION EXTERNAL;                                                        00072000
                                                                        00073000
PROCEDURE IOFREEZE'(OBJIDENT);                                          00074000
VALUE OBJIDENT;                                                         00075000
LOGICAL OBJIDENT;                                                       00076000
OPTION EXTERNAL;                                                        00077000
                                                                        00078000
PROCEDURE IOUNFREEZE'(OBJIDENT);                                        00079000
VALUE OBJIDENT;                                                         00080000
LOGICAL OBJIDENT;                                                       00081000
OPTION EXTERNAL;                                                        00082000
                                                                        00083000
PROCEDURE QUEUEONOBJECT(OBJIDENT);                                      00084000
VALUE OBJIDENT;                                                         00085000
LOGICAL OBJIDENT;                                                       00086000
OPTION EXTERNAL;                                                        00087000
                                                                        00088000
PROCEDURE WAIT(EVENTMASK,SPECIALINFO);                                  00089000
VALUE EVENTMASK,SPECIALINFO;                                            00090000
INTEGER EVENTMASK;                                                      00091000
LOGICAL SPECIALINFO;                                                    00092000
OPTION EXTERNAL;                                                        00093000
                                                                        00094000
PROCEDURE ADDTOLOCALITY(SLLINX,OBJIDENTIFIER,FLAGS);                    00095000
VALUE SLLINX,OBJIDENTIFIER,FLAGS;                                       00096000
INTEGER SLLINX,FLAGS;                                                   00097000
LOGICAL OBJIDENTIFIER;                                                  00098000
OPTION EXTERNAL;                                                        00099000
                                                                        00100000
PROCEDURE PreFetchObject(Pin, ObjID);                                   00101000
VALUE Pin, ObjID;                                                       00102000
INTEGER Pin;                                                            00103000
LOGICAL ObjID;                                                          00104000
OPTION EXTERNAL;                                                        00105000
                                                                        00106000
PROCEDURE ADJUSTLOCALITY(PROCINX,OBJIDENT,REQSIZE,FLAGS);               00107000
VALUE PROCINX,OBJIDENT,REQSIZE,FLAGS;                                   00108000
LOGICAL PROCINX,OBJIDENT,REQSIZE,FLAGS;                                 00109000
OPTION EXTERNAL;                                                        00110000
                                                                        00111000
LOGICAL PROCEDURE SETCRITICAL;                                          00112000
OPTION EXTERNAL;                                                        00113000
                                                                        00114000
PROCEDURE RESETCRITICAL(OLDCRITICAL);                                   00115000
VALUE OLDCRITICAL;                                                      00116000
                                                                        00117000
LOGICAL OLDCRITICAL;                                                    00118000
OPTION EXTERNAL;                                                        00119000
                                                                        00120000
PROCEDURE RELEASEREGION(REGIONBASE,REQSIZE);                            00121000
VALUE REGIONBASE,REQSIZE;                                               00122000
DOUBLE REGIONBASE;                                                      00123000
INTEGER REQSIZE;                                                        00124000
OPTION EXTERNAL;                                                        00125000
                                                                        00126000
PROCEDURE STARTOBJWRITE(OBJID,URGCLASS,REGIONBASE,LOGXFERREQ,           00127000
                        DISCREQINX);                                    00128000
VALUE OBJID,URGCLASS,REGIONBASE,LOGXFERREQ,DISCREQINX;                  00129000
LOGICAL OBJID;                                                          00130000
INTEGER URGCLASS,LOGXFERREQ,DISCREQINX;                                 00131000
DOUBLE REGIONBASE;                                                      00132000
OPTION EXTERNAL;                                                        00133000
                                                                        00134000
PROCEDURE RECOVEROC (OBJID,SEGDESCSTINX, OCREGIONBASE);                 00135000
VALUE OBJID, SEGDESCSTINX, OCREGIONBASE;                                00136000
DOUBLE OCREGIONBASE;                                                    00137000
INTEGER OBJID,SEGDESCSTINX;                                             00138000
OPTION EXTERNAL;                                                        00139000
                                                                        00140000
INTEGER PROCEDURE BUILDOBJID(OBJTYPE,OBJNUMBER,PIN);                    00141000
VALUE OBJTYPE,OBJNUMBER,PIN;                                            00142000
INTEGER OBJTYPE,OBJNUMBER,PIN;                                          00143000
OPTION EXTERNAL;                                                        00144000
                                                                        00145000
LOGICAL PROCEDURE IsObjectAbsent ( objid );                             00146000
VALUE objid;                                                            00147000
LOGICAL objid;                                                          00148000
OPTION EXTERNAL;                                                        00149000
                                                                        00150000
LOGICAL PROCEDURE IsObjectROC ( objid );                                00151000
VALUE objid;                                                            00152000
LOGICAL objid;                                                          00153000
OPTION EXTERNAL;                                                        00154000
                                                                        00155000
                                                                        00156000
INTEGER PROCEDURE ProcessPri(pin);                                      00157000
VALUE pin;                                                              00158000
INTEGER pin;                                                            00159000
OPTION EXTERNAL;                                                        00160000
                                                                        00161000
                                                                        00162000
PROCEDURE FLAGPROCABSENT(PIN,OBJIDENT,SPECIALINST);                     00163000
VALUE PIN,OBJIDENT,SPECIALINST;                                         00164000
INTEGER PIN,OBJIDENT;                                                   00165000
LOGICAL SPECIALINST;                                                    00165100
OPTION EXTERNAL;                                                        00166000
                                                                        00167000
                                                                        00168000
PROCEDURE MMSTAT(EVENT,P1,P2,P3);                                       00169000
VALUE EVENT,P1,P2,P3;                                                   00170000
INTEGER EVENT,P1,P2,P3;                                                 00171000
OPTION EXTERNAL;                                                        00172000
                                                                        00173000
PROCEDURE SET'PSIF(PCBPT,FLAG);                                         00174000
VALUE PCBPT,FLAG;                                                       00175000
INTEGER PCBPT;                                                          00176000
LOGICAL FLAG;                                                           00177000
OPTION EXTERNAL;                                                        00178000
                                                                        00179000
PROCEDURE SENDMSG(DESTPIN,DESTPORTNUM,MSGLENGTH,FLAGS);                 00180000
VALUE DESTPIN,DESTPORTNUM,MSGLENGTH,FLAGS;                              00181000
INTEGER DESTPIN,DESTPORTNUM,MSGLENGTH;                                  00182000
LOGICAL FLAGS;                                                          00183000
OPTION EXTERNAL;                                                        00184000
                                                                        00185000
PROCEDURE GENSPECREQ(DSTNUM,NEWSIZE,READDISP,MOVELENGTH);               00186000
VALUE DSTNUM,NEWSIZE,READDISP,MOVELENGTH;                               00187000
INTEGER DSTNUM,NEWSIZE,READDISP,MOVELENGTH;                             00188000
OPTION EXTERNAL;                                                        00189000
                                                                        00190000
INTEGER PROCEDURE CONVSEGIDTOSTINX(OBJIDENTIFIER);                      00191000
VALUE OBJIDENTIFIER;                                                    00192000
LOGICAL OBJIDENTIFIER;                                                  00193000
OPTION EXTERNAL;                                                        00194000
                                                                        00195000
PROCEDURE LOCKSEG'(OBJIDENT,BLOCKEDLOCK);                               00196000
VALUE OBJIDENT,BLOCKEDLOCK;                                             00197000
INTEGER OBJIDENT;                                                       00198000
LOGICAL BLOCKEDLOCK;                                                    00199000
OPTION EXTERNAL;                                                        00200000
                                                                        00201000
PROCEDURE FREEZESEG'(OBJIDENT,BLOCKEDLOCK);                             00202000
VALUE OBJIDENT,BLOCKEDLOCK;                                             00203000
INTEGER OBJIDENT;                                                       00204000
LOGICAL BLOCKEDLOCK;                                                    00205000
OPTION EXTERNAL;                                                        00206000
                                                                        00207000
PROCEDURE UNLOCKSEG'(OBJIDENT);                                         00208000
VALUE OBJIDENT;                                                         00209000
INTEGER OBJIDENT;                                                       00210000
OPTION EXTERNAL;                                                        00211000
                                                                        00212000
PROCEDURE UNFREEZESEG'(OBJIDENT);                                       00213000
VALUE OBJIDENT;                                                         00214000
INTEGER OBJIDENT;                                                       00215000
OPTION EXTERNAL;                                                        00216000
                                                                        00227000
INTEGER PROCEDURE GETSIR(SIRNUMBER);                                    00229000
VALUE SIRNUMBER;                                                        00230000
INTEGER SIRNUMBER;                                                      00231000
OPTION EXTERNAL;                                                        00232000
                                                                        00233000
PROCEDURE RELSIR(SIRNUMBER,SAVEDVALUE);                                 00234000
VALUE SIRNUMBER,SAVEDVALUE;                                             00235000
INTEGER SIRNUMBER,SAVEDVALUE;                                           00236000
OPTION EXTERNAL;                                                        00237000
                                                                        00238000
PROCEDURE MAKEOC(DESCSTINX,SEGIDENT,REQSIZE,REGIONBASE);                00238100
VALUE DESCSTINX,SEGIDENT,REQSIZE,REGIONBASE;                            00238200
INTEGER DESCSTINX,SEGIDENT,REQSIZE;                                     00238300
DOUBLE REGIONBASE;                                                      00238310
OPTION EXTERNAL;                                                        00238400
                                                                        00238500
                                                                        00239000
                                                                        00239001
PROCEDURE StringPinAtTail(headpin,newpin);                              00239002
VALUE headpin,newpin;                                                   00239003
INTEGER headpin,newpin;                                                 00239004
OPTION EXTERNAL;                                                        00239005
                                                                        00239006
INTEGER PROCEDURE UnstringHeadPIN(headpin);                             00239007
VALUE headpin;                                                          00239008
INTEGER headpin;                                                        00239009
OPTION EXTERNAL;                                                        00239010
                                                                        00239011
procedure CLEARWWS;                                                     00239100
option external;                                                        00239200
                                                                        00239300
INTEGER PROCEDURE UPDATESTATISTICS(CLASS,SUBCLASS,SUBCLASSENTRY,        00239400
                                   STARTINGITEM,NEWVALUEFLAG,           00239500
                                   VALUECHANGE,DOUBLEITEMFLAG);         00239600
  VALUE   CLASS,SUBCLASS,SUBCLASSENTRY,STARTINGITEM,NEWVALUEFLAG,       00239700
          VALUECHANGE,DOUBLEITEMFLAG;                                   00239800
  INTEGER CLASS,SUBCLASS,SUBCLASSENTRY,STARTINGITEM;                    00239900
  DOUBLE  VALUECHANGE;                                                  00239910
  LOGICAL NEWVALUEFLAG,DOUBLEITEMFLAG;                                  00239920
  OPTION  EXTERNAL;                                                     00239930
                                                                        00239940
INTEGER PROCEDURE FUPDATESTATISTICS(CLASS,SUBCLASS,SUBCLASSENTRY,       00239941
                                   STARTINGITEM,NEWVALUEFLAG,           00239942
                                   VALUECHANGE,DOUBLEITEMFLAG);         00239943
  VALUE   CLASS,SUBCLASS,SUBCLASSENTRY,STARTINGITEM,NEWVALUEFLAG,       00239944
          VALUECHANGE,DOUBLEITEMFLAG;                                   00239945
  INTEGER CLASS,SUBCLASS,SUBCLASSENTRY,STARTINGITEM;                    00239946
  DOUBLE  VALUECHANGE;                                                  00239947
  LOGICAL NEWVALUEFLAG,DOUBLEITEMFLAG;                                  00239948
  OPTION  EXTERNAL;                                                     00239949
DOUBLE PROCEDURE PROCTIME;                                              00239950
OPTION EXTERNAL;                                                        00239960
                                                                        00239961
PROCEDURE DELAY(INTERVAL);                                              00239962
VALUE INTERVAL;                                                         00239963
DOUBLE INTERVAL;                                                        00239964
OPTION EXTERNAL;                                                        00239965
<<END INCLKIMP>>                                                        00240000
