$PAGE "I/O SYSTEM IMPORTABLE PROCEDURE DECLARATIONS"                    00001000
                                                                        00002000
<< BEGIN INCLUDE FILE : INCLIOIM>>                                      00003000
                                                                        00004000
PROCEDURE HELP;                                                         00005000
OPTION EXTERNAL;                                                        00006000
                                                                        00007000
PROCEDURE INITIO(FLAGS);                                                00008000
VALUE FLAGS;                                                            00009000
INTEGER FLAGS;                                                          00010000
OPTION EXTERNAL;                                                        00011000
                                                                        00012000
DOUBLE PROCEDURE TIMER;                                                 00013000
OPTION EXTERNAL;                                                        00014000
                                                                        00015000
PROCEDURE SUDDENDEATH(WHICH);                                           00016000
VALUE WHICH;                                                            00017000
INTEGER WHICH;                                                          00018000
OPTION EXTERNAL;                                                        00019000
                                                                        00020000
INTEGER PROCEDURE TIMEREQ(C,R,T);                                       00021000
VALUE C,R,T;                                                            00022000
INTEGER C,R;                                                            00023000
DOUBLE T;                                                               00024000
OPTION EXTERNAL;                                                        00025000
                                                                        00026000
PROCEDURE ABORTTIMEREQ(TRLX);                                           00027000
VALUE TRLX;                                                             00028000
INTEGER TRLX;                                                           00029000
OPTION EXTERNAL;                                                        00030000
                                                                        00031000
PROCEDURE AWAKEIO(DITP,FLAGS);                                          00032000
VALUE DITP,FLAGS;                                                       00033000
INTEGER POINTER DITP;                                                   00034000
INTEGER FLAGS;                                                          00035000
OPTION EXTERNAL;                                                        00036000
                                                                        00037000
DOUBLE PROCEDURE ATTACHIO(LDEV,QMISC,DSTX,ADR,FNCT,CNT,P1,P2,FLAGS);    00038000
VALUE LDEV,QMISC,DSTX,ADR,FNCT,CNT,P1,P2,FLAGS;                         00039000
INTEGER LDEV,QMISC,DSTX,ADR,FNCT,CNT,P1,P2,FLAGS;                       00040000
OPTION EXTERNAL;                                                        00041000
                                                                        00042000
INTEGER PROCEDURE GETDISCREQ(REQTYPE);                                  00043000
VALUE REQTYPE;                                                          00044000
INTEGER REQTYPE;                                                        00045000
OPTION EXTERNAL;                                                        00046000
                                                                        00047000
PROCEDURE RETURNDISCREQ(PNTR);                                          00048000
VALUE PNTR;                                                             00049000
INTEGER POINTER PNTR;                                                   00050000
OPTION EXTERNAL;                                                        00051000
                                                                        00052000
PROCEDURE STARTCLOCK(YEARDAY,TIMEDAY);                                  00053000
VALUE YEARDAY,TIMEDAY;                                                  00054000
INTEGER YEARDAY;                                                        00055000
DOUBLE TIMEDAY;                                                         00056000
OPTION EXTERNAL;                                                        00057000
                                                                        00058000
PROCEDURE DISCQMANAGER(REQP,REQUESTTYPE);                               00059000
VALUE REQP,REQUESTTYPE;                                                 00060000
INTEGER REQP,REQUESTTYPE;                                               00061000
OPTION EXTERNAL;                                                        00062000
                                                                        00063000
PROCEDURE QUEUEDISCREQ(REQP, QTYPE, AUXINFO);                           00064000
VALUE REQP, QTYPE, AUXINFO;                                             00065000
INTEGER REQP, QTYPE, AUXINFO;                                           00066000
OPTION EXTERNAL;                                                        00067000
                                                                        00068000
PROCEDURE DEQUEUEDISCREQ(REQP, QTYPE, AUXINFO);                         00069000
VALUE REQP, QTYPE, AUXINFO;                                             00070000
INTEGER REQP, QTYPE, AUXINFO;                                           00071000
OPTION EXTERNAL;                                                        00072000
                                                                        00073000
LOGICAL PROCEDURE CHEKTRLFREE;                                          00074000
OPTION EXTERNAL;                                                        00075000
                                                                        00076000
procedure CHECKLDEV(LDEV);                                              00077000
value LDEV;                                                             00078000
integer LDEV;                                                           00079000
option external;                                                        00080000
                                                                        00081000
double procedure WAITFORIO(IOQX);                                       00082000
value IOQX;                                                             00083000
integer IOQX;                                                           00084000
option external;                                                        00085000
                                                                        00086000
                                                                        00087000
<< This HARDRES procedure performs I/O request        >>                00088000
<< completion processing.  Called from CDT'COMPLETOR. >>                00089000
procedure SIODM'REQUEST'DONE(REQP);                                     00090000
value REQP;                                                             00091000
integer pointer REQP;                                                   00092000
option external;                                                        00093000
                                                                        00094000
<< Call physical ATTACHIO if CACHING cannot satisfy request >>          00095000
DOUBLE PROCEDURE P'ATTACHIO(LDEV, QMISC, DSTX, ADDR, FNCT,     <<04317>>00096000
                            CNT, P1, P2, FLAGS,                <<04500>>00097000
                            EXTBASE, EXTSIZE);                 <<04500>>00098000
                                                               <<04317>>00099000
VALUE                       LDEV, QMISC, DSTX, ADDR, FNCT,     <<04317>>00100000
                            EXTBASE, EXTSIZE,                  <<04500>>00101000
                            CNT, P1, P2, FLAGS;                <<04317>>00102000
                                                               <<04317>>00103000
INTEGER                     LDEV, QMISC, DSTX, ADDR, FNCT,     <<04317>>00104000
                            CNT, P1, P2, FLAGS;                <<04317>>00105000
                                                               <<04317>>00106000
DOUBLE                      EXTBASE;                           <<04500>>00107000
                                                               <<04500>>00108000
LOGICAL                     EXTSIZE;                           <<04500>>00109000
                                                               <<04500>>00110000
OPTION PRIVILEGED, EXTERNAL, VARIABLE;                                  00111000
                                                                        00112000
PROCEDURE BUMPWRITEPRI(DISCREQENTRYINDEX,NEWPRI);                       00112100
VALUE DISCREQENTRYINDEX,NEWPRI;                                         00112200
INTEGER DISCREQENTRYINDEX,NEWPRI;                                       00112300
OPTION EXTERNAL;                                                        00112400
                                                                        00112500
INTEGER PROCEDURE SERIALWRITEQMGR(DISCREQENTRYINDEX,                    00112600
   CONTROLCODE,AUXINFO);                                                00112700
VALUE DISCREQENTRYINDEX,CONTROLCODE,AUXINFO;                            00112800
INTEGER DISCREQENTRYINDEX,CONTROLCODE,AUXINFO;                          00112900
OPTION EXTERNAL;                                                        00112910
                                                                        00112920
<< END INCLUDE FILE : INCLIOIM>>                                        00113000
                                                                        00114000
