         << LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION >>     00000001
$PAGE "Include File For I/O Structure Access"                  <<jb.dc>>00010000
                                                               <<jb.dc>>00015000
<<=======================================================>>    <<jb.dc>>00020000
<<                                                       >>    <<jb.dc>>00025000
<<                 INCLIO - A0                           >>    <<jb.dc>>00030000
<<                                                       >>    <<jb.dc>>00035000
<<=======================================================>>    <<jb.dc>>00040000
COMMENT                                                        <<jb.dc>>00045000
                                                               <<jb.dc>>00050000
INCLUDE FILE FOR DISC RELATED DEFINES AND EQUATES              <<jb.dc>>00055000
AND MEMORY MANAGEMENT - I/O SYSTEM INTERFACING FIELDS          <<jb.dc>>00060000
                                                               <<jb.dc>>00065000
;                                                              <<jb.dc>>00070000
                                                               <<jb.dc>>00075000
integer pointer S'DISCREQ = %31,                               <<jb.dc>>00080000
                S'LPDT = %10,                                  <<jb.dc>>00085000
                S'DST = %2,                                    <<jb.dc>>00090000
                S'DITP = %0;   << Sysbase relative >>          <<jb.dc>>00095000
                                                               <<jb.dc>>00100000
<<Disc Request Entry Flags Definitions>>                       <<jb.dc>>00105000
                                                               <<jb.dc>>00110000
DEFINE                                                         <<jb.dc>>00115000
                                                                        00120000
       ABORTREQATTMPTFLAG=(0:1)#,                              <<jb.dc>>00125000
       MMDISCREQFLAG=(1:1)#,                                   <<jb.dc>>00130000
       REQSYSBUFR=(3:1)#,                                      <<jb.dc>>00135000
       REQQUEUEDFLAG=(9:1)#,                                   <<jb.dc>>00140000
       DITSCURRREQFLAG=(12:1)#,                                <<jb.dc>>00145000
       DEFFEREDREQFLAG=(13:1)#,                                <<jb.dc>>00150000
       DISABLEDREQFLAG=(13:1)#,  << For MPEIV compatibility >> <<jb.dc>>00155000
       LOGREQFLAG=(14:1)#;                                     <<jb.dc>>00160000
                                                               <<jb.dc>>00165000
<<Disc Req Entry Flag Bit Numbers>>                            <<jb.dc>>00170000
                                                               <<jb.dc>>00175000
EQUATE ABORTREQATTMPTBIT=0,                                    <<jb.dc>>00180000
       DEFERREDREQBIT=13,                                      <<jb.dc>>00185000
       REQQUEUEDBIT=9,                                         <<jb.dc>>00190000
       DITSCURRREQBIT=12,                                      <<jb.dc>>00195000
       MMDISCREQBIT=1;                                         <<jb.dc>>00200000
                                                               <<jb.dc>>00205000
<<Function Code Equates>>                                      <<jb.dc>>00210000
                                                               <<jb.dc>>00215000
EQUATE READREQ=0,                                              <<jb.dc>>00220000
       WRITEREQ=1; <<FUNCTION CODE>>                           <<jb.dc>>00225000
                                                               <<jb.dc>>00230000
<<xfer status Definitions>>                                    <<jb.dc>>00235000
                                                               <<jb.dc>>00240000
EQUATE                                                         <<jb.dc>>00245000
                                                               <<jb.dc>>00250000
   iostatusok = 1 ;                                            <<jb.dc>>00255000
                                                               <<jb.dc>>00260000
<<Urgency Class Definition>>                                   <<jb.dc>>00265000
                                                               <<jb.dc>>00270000
EQUATE REQURGCLASSWORD=1,                                      <<jb.dc>>00275000
                                                               <<jb.dc>>00280000
       BKGRNDREADPRI=181,                                      <<jb.dc>>00285000
       FORCEDWRITEPRI=10,                                      <<jb.dc>>00290000
       BKGRNDPRI=255;                                          <<jb.dc>>00295000
                                                               <<jb.dc>>00300000
<<=============>>                                              <<jb.dc>>00305000
<<DIT STRUCTURE>>                                              <<jb.dc>>00310000
<<=============>>                                              <<jb.dc>>00315000
                                                               <<jb.dc>>00320000
LOGICAL ARRAY DIT00(*)=DB+0,                                   <<jb.dc>>00325000
              DIT01(*)=DB+1,                                   <<jb.dc>>00330000
              DIT02(*)=DB+2,                                   <<jb.dc>>00335000
              DIT04(*)=DB+4;                                   <<jb.dc>>00340000
                                                               <<jb.dc>>00345000
DEFINE DITFLAGS=DIT00(X)#,                                     <<jb.dc>>00350000
       NEXTDITSYSBASEINX=DIT01(X)#,                            <<jb.dc>>00355000
       DITIOQP=DIT02(X)#,                                      <<jb.dc>>00360000
       DITDLTP=DIT04(X)#;                                      <<jb.dc>>00365000
                                                               <<jb.dc>>00370000
INTEGER ARRAY DISCDIT00(*)=DB+0,                               <<jb.dc>>00375000
              DISCDIT01(*)=DB+1,                               <<jb.dc>>00380000
              DISCDIT02(*)=DB+2,                               <<jb.dc>>00385000
              DISCDIT03(*)=DB+3,                               <<jb.dc>>00390000
              DISCDIT04(*)=DB+4,                               <<jb.dc>>00395000
              DISCDIT05(*)=DB+5,                               <<jb.dc>>00400000
              DISCDIT06(*)=DB+6,                               <<jb.dc>>00405000
              DISCDIT07(*)=DB+7,                               <<jb.dc>>00410000
              DISCDIT08(*)=DB+8,                               <<jb.dc>>00415000
              DISCDIT09(*)=DB+9;                               <<jb.dc>>00420000
                                                               <<jb.dc>>00425000
DEFINE DITACTIVEFLAG=(2:1)#,                                   <<jb.dc>>00430000
       DIT'CACHE'ENABLED = (4:1)#;                             <<jb.dc>>00435000
                                                               <<jb.dc>>00440000
DEFINE DITQHEADP=DISCDIT08(X)#,                                <<jb.dc>>00445000
       DITQTAILP=DISCDIT09(X)#,                                <<jb.dc>>00450000
       DITCURRENTREQP=DISCDIT02(X)#;                           <<jb.dc>>00455000
                                                               <<jb.dc>>00460000
DEFINE conf'disc'req'cnt=(0:8)#;                               <<jb.dc>>00465000
                                                               <<jb.dc>>00470000
EQUATE                                                         <<jb.dc>>00475000
                                                               <<jb.dc>>00480000
   deferredqheadword = 8 ; <<pts to pnding q from entry 0 of>> <<jb.dc>>00485000
                          <<discreqtab>>                       <<jb.dc>>00490000
                                                               <<jb.dc>>00495000
<< parameter equates for Queue/Dequeue Disc Req >>             <<jb.dc>>00500000
                                                               <<jb.dc>>00505000
EQUATE                                                         <<jb.dc>>00510000
                                                               <<jb.dc>>00515000
   <<qtype parameter>>                                         <<jb.dc>>00520000
                                                               <<jb.dc>>00525000
   deferredreqq = 0,                                           <<jb.dc>>00530000
   cdtreqq = 1,                                                <<jb.dc>>00535000
   ditreqq = 2;                                                <<jb.dc>>00540000
equate serwq = 4; <<temp-get rid of this in mpev>>             <<dc.dc>>00545000
<< SerialWriteQMgr's controlcode parameter specification>>     <<dc.dc>>00550000
                                                               <<dc.dc>>00555000
EQUATE serwqqueuecode=0,                                       <<dc.dc>>00560000
       serwqdequeuecode = 1,                                   <<dc.dc>>00565000
       serwqbumppricode= 2;                                    <<dc.dc>>00570000
                                                               <<dc.dc>>00575000
<< SerialWriteQMgr's return parameter specification.>>         <<dc.dc>>00580000
                                                               <<dc.dc>>00585000
EQUATE serwqerrallok = 0,                                      <<dc.dc>>00590000
       serwqerrnothead =1;                                     <<dc.dc>>00595000
                                                               <<jb.dc>>00600000
<<Parameter Descriptions for DiscQManager>>                    <<jb.dc>>00605000
                                                               <<jb.dc>>00610000
DEFINE ABORTDISCREQFLAG=(0:1)#, <<DISCQMANAGER'S REQUESTTYPE PA<<jb.dc>>00615000
       DISABLEDISCREQFLAG=(15:1)#;                             <<jb.dc>>00620000
EQUATE                                                         <<jb.dc>>00625000
       QUEUEREQCODE=0,                                         <<jb.dc>>00630000
       DEFEREQCODE=1,                                          <<jb.dc>>00635000
       ABORTREQCODE=%100000;                                   <<jb.dc>>00640000
                                                                        00645000
<<================================>>                           <<jb.dc>>00650000
<<DLT MM/DRIVER COMMUNICATION BITS>>                           <<jb.dc>>00655000
<<================================>>                           <<jb.dc>>00660000
                                                               <<jb.dc>>00665000
INTEGER ARRAY DLT(*)=DB+0;                                     <<jb.dc>>00670000
                                                               <<jb.dc>>00675000
DEFINE DLTFLAGS=DLT(X)#,                                       <<jb.dc>>00680000
       DLTDRVRFRZNFLAG=(8:1)#,                                 <<jb.dc>>00685000
       DLTMMERRORCFLAG=(9:1)#;                                 <<jb.dc>>00690000
                                                               <<jb.dc>>00695000
<<===========>>                                                <<jb.dc>>00700000
<<GENERAL IOQ>>                                                <<jb.dc>>00705000
<<===========>>                                                <<jb.dc>>00710000
                                                               <<jb.dc>>00715000
INTEGER ARRAY IOQ00(*)=DB+0,                                   <<jb.dc>>00720000
              IOQ02(*)=DB+2;                                   <<jb.dc>>00725000
                                                               <<jb.dc>>00730000
DEFINE IOQFLAGS=IOQ00(X)#,                                     <<jb.dc>>00735000
       IOQLDEVNUMBER=IOQ02(X).(8:8)#,                          <<jb.dc>>00740000
       IOQDATAFZNFLAG=(7:1)#,                                  <<jb.dc>>00745000
       IOQMMERRORDFLAG=(8:1)#;                                 <<jb.dc>>00750000
                                                               <<jb.dc>>00755000
EQUATE sectorsizeinwords=128;                                  <<jb.dc>>00760000
                                                               <<jb.dc>>00765000
                                                               <<jb.dc>>00770000
<<=======================================================>>    <<jb.dc>>00775000
<<                                                       >>    <<jb.dc>>00780000
<<                 END INCLIO                            >>    <<jb.dc>>00785000
<<                                                       >>    <<jb.dc>>00790000
<<=======================================================>>    <<jb.dc>>00795000
