COMBLRQ 
COMMON
  
#     COMBLRQ - LOW LEVEL REQUEST QUEUE.                              # 
                                               CONTROL NOLIST;
                                               CONTROL IFEQ LISTCON,1;
                                               CONTROL LIST;
                                               CONTROL FI;
      BEGIN  # COMBLRQ #
  
# 
***   COMBLRQ - LOW LEVEL REQUEST QUEUE.
* 
*     COMBLRQ DEFINES THE STRUCTURE OF A LOW LEVEL REQUEST
*     QUEUE (LLRQ) ENTRY.  THE *LLRQ* IS USED TO CONTROL THOSE
*     PROCESSES THAT NEED TO BE SUSPENDED WHILE AWAITING
*     COMPLETION OF DRIVER (HARDWARE) ACTIONS.
# 
  
  
      DEF LLRQENTL   #10#;           # *LLRQ* ENTRY LENGTH #
  
      COMMON BLRQCOM; 
  
        BEGIN  # BLRQCOM #
  
        BASED 
        ARRAY LLRQ [0:0] S(LLRQENTL); 
          BEGIN 
          ITEM LLR$WORD0  U(00,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$FLAGS  U(00,00,06);  # FLAGS IN ENTRY #
          ITEM LLR$DRFUL  B(00,00,01);  # FORCED DIRVER UNLOAD #
          ITEM LLR$UCPABT B(00,01,01);  # UCP ABORTED # 
          ITEM LLR$CCF    B(00,02,01);  # COPY COMPLETE FLAG #
          ITEM LLR$DRDL   B(00,04,01);  # *LLRQ* LOADED CARTRIDGE # 
          ITEM LLR$UNLD   B(00,05,01);  # CARTRIDGE UNLOADIND # 
          ITEM LLR$DR     U(00,06,12);  # DRIVER RESPONSE # 
          ITEM LLR$RC     U(00,18,09);  # DRIVER REQUEST CODE # 
          ITEM LLR$PRCNME U(00,27,06);  # PROCESS NAME #
          ITEM LLR$PRCST  U(00,33,06);  # PROCESS STATE # 
          ITEM LLR$LCF    B(00,39,01);  # SUSPECTED LOST CARTRIGDE #
          ITEM LLR$LDERR  B(00,40,01);  # DRIVER ERROR ON LOAD #
          ITEM LLR$DRDOFF B(00,41,01);  # DRD OFF BY ERROR #
          ITEM LLR$LINK1  U(00,42,18);  # LINK 1 #
          ITEM LLR$WORD1  U(01,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$LTCT   U(01,00,06);  # *LTCT* ENTRY ORDINAL #
          ITEM LLR$RS     U(01,06,06);  # DRIVER REQUEST STATE #
          ITEM LLR$CU     U(01,12,06);  # CONTROLLER ORDINAL #
          ITEM LLR$RTIME  U(01,18,24);  # RESTART TIME #
          ITEM LLR$SAL    U(01,42,18);  # SECONDARY ACTIVITY LINK # 
          ITEM LLR$WORD2  U(02,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$CSNT   C(02,00,10);  # TOTAL CSN # 
          ITEM LLR$CCOD   C(02,00,02);  # CARTRIDGE MAKER IDENT # 
          ITEM LLR$CSND   C(02,12,08);  # CSN OF CARTRIDGE #
          ITEM LLR$WORD3  U(03,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$SSD    U(03,00,06);  # SAVED SM/DRD ORDINALS # 
          ITEM LLR$MSFET  U(03,06,18);  # MSF FET ADDRESS # 
          ITEM LLR$DSKFET U(03,24,18);  # DISK FET ADDRESS #
          ITEM LLR$UCPRA  U(03,42,18);  # UCP REQUEST ADDRESS # 
          ITEM LLR$WORD4  U(04,00,60);  # FULL WORD DEFINTION # 
          ITEM LLR$RQR    U(04,00,06);  # REQUEST RESPONSE CODE # 
          ITEM LLR$UDTQ   U(04,06,18);  # UDT RELATIVE ADDRESS #
          ITEM LLR$BYNR   U(04,24,06);  # OFF SET BIT ADDRESS # 
          ITEM LLR$PMMR   U(04,30,01);  # STATUS BIT #
          ITEM LLR$ST$LW  U(04,06,18);  # STRIPE LOW #
          ITEM LLR$ST$HI  U(04,24,18);  # STRIPE HIGH # 
          ITEM LLR$LT$ST  U(04,42,18);  # LAST STRIPE WRITTEN # 
          ITEM LLR$WORD5  U(05,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$RQT    U(05,00,06);  # REQUEST TYPE #
          ITEM LLR$RQC    U(05,06,06);  # REQUEST CODE #
          ITEM LLR$RQI    U(05,12,05);  # REQUEST ID #
          ITEM LLR$SMIF   U(05,18,09);  # FULL SMA INTERFACE #
          ITEM LLR$SMA    U(05,18,06);  # SM-ID # 
          ITEM LLR$D$SMO  U(05,24,06);  # DRD AND SM ORDINALS # 
          ITEM LLR$DRD    U(05,24,01);  # DRD OFFSET #
          ITEM LLR$SMO    U(05,25,05);  # SM ORDINAL #
          ITEM LLR$CIF    U(05,30,03);  # CHANNEL INTERFACE # 
          ITEM LLR$YZ     U(05,33,09);  # Y AND Z COORDINATE #
          ITEM LLR$Y      U(05,33,05);  # Y COORDINATE #
          ITEM LLR$Z      U(05,38,04);  # Z COORDINATE #
          ITEM LLR$ADDR2  U(05,42,18);  # ADDRESS OF ADDITIONAL DATA #
          ITEM LLR$SAV$HI U(05,42,18);  # RAW STRIPE HI # 
          ITEM LLR$WORD6  U(06,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$ACKIN  U(06,00,03);  # SAVED UDT ACK INDEX # 
          ITEM LLR$SC     U(06,06,02);  # SERVICE CELL FLAGS #
          ITEM LLR$LOWSC  B(06,06,01);  # CHECKING LOWER SERVICE CELL # 
          ITEM LLR$UPSC   B(06,07,01);  # CHECKING UPPER SERVICE CELL # 
          ITEM LLR$SRC    U(06,08,04);  # SAVED DRIVER REQUEST CODE # 
          ITEM LLR$SDR    U(06,12,12);  # SAVED DRIVER RESPONSE # 
          ITEM LLR$MBH    U(06,24,18);  # M860 MESSAGE BUFFER HEADER #
          ITEM LLR$LOG$ST U(06,42,18);  # LOGICAL STRIPE NUMBER # 
          ITEM LLR$WORD7  U(07,00,60);  # FULL WORD DEFINITION #
          ITEM LLR$CCB    U(07,00,18);  # COPY CONTROL BLOCK ADDRESS #
          ITEM LLR$DA     U(07,18,18);  # DATA BUFFER ADDRESS # 
          ITEM LLR$DRDRA  U(07,36,18);  # UDT-DRD RESERVE ADDRESS # 
          ITEM LLR$ACKLN  U(07,42,06);  # SAVED UDT ACK LINE #
          ITEM LLR$SCIF   U(07,54,03);  # SAVED CIF WITH CHAN/DRD ERR # 
          ITEM LLR$SCU    U(07,57,03);  # SAVED CU WITH CHAN/DRD ERROR #
          ITEM LLR$KWORDS C(08,00,20);  # K-DISPLAY WORDS # 
          END 
  
        END  # BLRQCOM #
  
      END  # COMBLRQ #
  
                                               CONTROL LIST;
