*COMDECK COMRQUE
#     COMRQUE - QUEUE ENTRY DESCRIPTIONS. # 
                                               CONTROL NOLIST;
                                               CONTROL IFEQ LISTCON,1;
                                               CONTROL LIST;
                                               CONTROL FI;
# 
***   COMRQUE - QUEUE ENTRY DESCRIPTIONS. 
* 
*     COMRQUE CONTAINS THE ARRAY DEFINITIONS FOR QUEUE TYPE FORMATS.
*     THE FIRST WORD OF EVERY QUEUE TYPE HAS THE SAME FORMAT. 
*     SUBSEQUENT WORDS ARE DEFINED BASED ON QUEUE TYPE. 
*     A QUEUE ENTRY IS USED TO SAVE THE CURRENT STATE OF ALL TRANSAC- 
*     TIONS.  THIS ENABLES RHF TO BE EVENT DRIVEN AND STILL REMEMBER
*     SLOW TRANSACTIONS.
# 
  
      BEGIN  # COMRQUE COMDECK #
  
      DEF QU$FRSTUCP #1#;            # FIRST UCP QUEUE TYPE # 
      DEF QU$LASTUCP #O"10"#;        # LAST UCP QUEUE TYPE #
      DEF QU$FRSTNDR #O"20"#;        # FIRST NDR QUEUE TYPE # 
      DEF QU$LASTNDR #O"32"#;        # LAST NDR QUEUE TYPE #
      DEF QU$FRSTMSC #O"40"#;        # FIRST MISC. QUEUE TYPE # 
      DEF QU$LASTMSC #O"46"#;        # LAST MISC. QUEUE TYPE #
      DEF QU$FRSTINS #O"70"#;        # FIRST INSTALLATION QUEUE TYPE #
      DEF QU$LASTINS #O"77"#;        # LAST INSTALLATION QUEUE TYPE # 
                                     # 11 THRU 17 RESERVED #
                                     # 33 THRU 37 RESERVED #
                                     # 47 THRU 67 RESERVED #
      DEF QU$LENGTH  #8#;            # QUEUE ENTRY LENGTH # 
      DEF QT$EMPTY   #0#;            # EMPTY QUEUE ENTRY #
      DEF QT$UCPSWAP #1#;            # UCP SWAP IN REQUEST #
      DEF QT$UCPNSUP #2#;            # UCP NSUP REPLY # 
      DEF QT$UCPCOMP #3#;            # UCP COMPLETE # 
      DEF QT$UCPMSGR #4#;            # UCP ASYNCHRONOUS SUPERVISORY # 
                                     #   MESSAGE REPLY #
      DEF QT$UCPMSGI #5#;            # UCP ASYNCHRONOUS SUPERVISORY # 
                                     #   MESSAGE REQUEST (INCOMING) # 
      DEF QT$UCPSSFC #6#;            # UCP SSF CALL ENTRY # 
      DEF QT$UCPDATA #7#;            # UCP MESSAGE DATA FOR SSF CALL #
      DEF QT$UCPNTON #O"10"#;        # UCP NETON REPLY WORDS #
      DEF QT$ERRLGL  #O"11"#;        # ERROR LOGICAL ENTRY #
      DEF QT$UCPREQ  #O"20"#;        # UCP REQUEST #
      DEF QT$ACKMSG  #O"21"#;        # ACKNOWLEDGE MESSAGE #
      DEF QT$OUTCTLM #O"22"#;        # OUTGOING CONTROL MESSAGES #
      DEF QT$REQCON  #O"23"#;        # NDR REQUEST CONNECTION # 
      DEF QT$OBTCONR #O"24"#;        # NDR OBTAIN CONNECT REQUEST # 
      DEF QT$DISCON  #O"25"#;        # NDR DISCONNECT PATH #
      DEF QT$FLUSH   #O"26"#;        # NDR FLUSH PATH # 
      DEF QT$INITNAD #O"27"#;        # NDR INITIALIZE NAD # 
      DEF QT$STATUS  #O"30"#;        # NDR STATUS # 
      DEF QT$CMSEL   #O"31"#;        # CONVERT MODE SELECT #
      DEF QT$CMEXIT  #O"32"#;        # CONVERT MODE EXIT #
      DEF QT$EVENT   #O"40"#;        # STATUS EVENT # 
      DEF QT$INCTLMG #O"41"#;        # INCOMING CONTROL MESSAGE # 
      DEF QT$OVERFLW #O"42"#;        # OVERFLOW COUNTER # 
      DEF QT$NADOFF  #O"43"#;        # NAD OFF #
      DEF QT$CONAVL  #O"44"#;        # CONNECT REQUEST AVAILABLE #
      DEF QT$REMCONR #O"45"#;        # REMOTE CONNECTION REQUEST #
      DEF QT$CONWAIT #O"46"#;        # CONNECT REQUEST AWAITS ASSIGNMT #
  
      DEF UCP$FIRST  #1#;            # FIRST UCP REQUEST FUNCTION # 
      DEF UCP$NETON  #1#;            # NETON REQUEST #
      DEF UCP$NETOFF #2#;            # NETOFF REQUEST # 
      DEF UCP$NETWAT #3#;            # NETWAIT REQUEST #
      DEF UCP$NETGET #4#;            # NETGET REQUEST # 
      DEF UCP$NETGTL #5#;            # NETGETL REQUEST #
      DEF UCP$NETPUT #6#;            # NETPUT REQUEST # 
      DEF UCP$NETXFR #7#;            # NETXFR REQUEST # 
      DEF UCP$LAST   #7#;            # LAST UCP REQUEST FUNCTION #
  
      DEF STATUCPABT #2#;            # UCP ABORTED STATUS # 
      DEF STATOVRIDE #3#;            # OVERRIDE STATUS - NOS #
      DEF EVNT$IN    #0#;            # WAITING FOR INPUT EVENT #
      DEF EVNT$OUT   #1#;            # WAITING FOR OUTPUT EVENT # 
  
      DEF BT$CMD    #4#;             # COMMAND BLOCK TYPE # 
      DEF BACK       #3#;            # BACKWARDS ACKNOWLEDGE #
  
      DEF BRKLENGTH  #24#;           # BIT LENGTH OF FC/BRK CTL MSG # 
      DEF RSTLENGTH  #16#;           # BIT LENGTH OF FC/RST CTL MSG # 
      DEF CTLMSGRTYC #50#;           # CONTROL MESSAGE RETRY COUNT #
  
      COMMON COMRQUE; 
      BEGIN  # COMRQUE COMMON AREA #
  
      ITEM UNKNOWNREQ I = 0;         # UNKNOWN REQUEST QUEUE #
      ITEM NETONQ     I = 0;         # NETON QUEUE #
      ITEM NETOFFQ    I = 0;         # NETOFF QUEUE # 
      ITEM NETWAITQ   I = 0;         # NETWAIT QUEUE #
      ITEM ERRLGLQ    I = 0;         # ERROR LOGICAL QUEUE #
      ITEM STATUSQ    I = 0;         # STATUS EVENT QUEUE # 
      ITEM CTLMSGQ    I = 0;         # CONTROL MESSAGE QUEUE #
      ITEM OVERFLOWQ  I = 0;         # OVERFLOW QUEUE # 
      ITEM FLSHMSGQ   I = 0;         # FLASHING MESSAGE QUEUE # 
      ITEM SUPERMSGQ  I = 0;         # SUPERVISORY MESSAGE QUEUE #
      ITEM NADOFFQ    I = 0;         # NAD OFF QUEUE #
      ITEM FCNAKQ     I = 0;         # FC/NAK QUEUE # 
      ITEM FREEQ      I = 0;         # FREE QUEUE # 
      ITEM CONAVAILQ  I = 0;         # CONNECTION REQUEST AVAILABLE Q # 
      ITEM WAITASIGNQ I = 0;         # CONNECT REQUEST AWAIT ASSIGNMT Q#
      ITEM WAITSWAPQ  I = 0;         # WAIT FOR UCP SWAPIN QUEUE #
  
      ITEM FIELDLEN   I;             # FIELD LENGTH IN WORDS #
  
      BASED ARRAY QU$ADDRESS S(QU$LENGTH);
        BEGIN  # QUEUE ENTRY DESCRIPTIONS # 
  
# 
*     FORMAT OF THE FIRST WORD
# 
  
#       ITEM QU$RESINS  U(00,00,05)    RESERVED FOR INSTALLATION #
        ITEM QU$RELEASE B(00,05,01); # RELEASE ENTRY #
#       ITEM QU$RES     U(00,06,06)    RESERVED # 
        ITEM QU$AUXPTR  I(00,12,18); # AUXILIARY QUEUE ENTRY POINTER #
        ITEM QU$PREVTYP U(00,30,06); # PREVIOUS QUEUE TYPE #
        ITEM QU$TYPE    U(00,36,06); # QUEUE TYPE # 
        ITEM QU$NXTADR  I(00,42,18); # NEXT QUEUE ENTRY ADDRESS # 
  
# 
*     EMPTY QUEUE ENTRY 
# 
  
  
# 
*     UCP QUEUE ENTRIES 
# 
  
        ITEM QU$WD1     I(01,00,60); # QUEUE WORD ONE # 
        ITEM QU$WD2     I(02,00,60); # QUEUE WORD TWO # 
        ITEM QU$WD3     I(03,00,60); # QUEUE WORD THREE # 
        ITEM QU$WD4     I(04,00,60); # QUEUE WORD FOUR #
        ITEM QU$WD5     I(05,00,60); # QUEUE WORD FIVE #
        ITEM QU$WD6     I(06,00,60); # QUEUE WORD SIX # 
        ITEM QU$WD7     I(07,00,60); # QUEUE WORD SEVEN # 
# 
*     UCP SUBSYSTEM REQUEST FORMAT
# 
  
        ITEM QU$SSRC    U(01,00,06); # REPLY CODE # 
        ITEM QU$SSFP    U(01,06,12); # FUNCTION PARAMETER # 
        ITEM QU$SSUCPA  I(01,18,18); # RELATIVE ADDRESS WITHIN UCP #
        ITEM QU$SSSCPA  I(01,36,18); # RELATIVE ADDRESS WITHIN SCP #
        ITEM QU$SSFC    I(01,54,06); # FUNCTION CODE #
        ITEM QU$SSCOMP  B(01,59,01); # COMPLETE # 
  
# 
*     UCP SWAP IN REQUEST ( SEE SUBSYSTEM REQUEST FORMAT )
# 
  
# 
*     UCP NSUP REPLY
# 
  
        ITEM QU$CHARGE  U(01,00,02); # UCP CHARGE # 
#       ITEM QU$RES     U(01,02,40)    RESERVED # 
        ITEM QU$UCPA    I(01,42,18); # UCP REQUEST ADDRESS# 
  
# 
*     UCP REQUEST COMPLETE
# 
  
# 
*     ASYNCHRONOUS SUPERVISORY MESSAGE REPLY
# 
  
#       ITEM QU$CHARGE  U(01,00,02)    UCP CHARGE # 
#       ITEM QU$RES     U(01,02,03)    RESERVED # 
        ITEM QU$ERRLGL  B(01,05,01); # ERR/LGL MESSAGE #
        ITEM QU$HA      I(01,06,18); # HEADER ADDRESS # 
        ITEM QU$TA      I(01,24,18); # TEXT ADDRESS # 
#       ITEM QU$UCPA    I(01,42,18)    UCP REQUEST ADDRESS# 
  
  
# 
*     SUPERVISORY MESSAGE FORMATS.
# 
  
        ITEM QU$SUPAPAD I(02,00,60); # APPLICATION TABLE ADDRESS #
        ITEM QU$REQCLK  I(02,00,12); # CONNECTION REQUEST TIMER # 
  
        ITEM QU$SUPWD1  I(04,00,60); # WORD 1 OF SUPR MESSAGE TEXT #
        ITEM QU$SUPWD2  I(05,00,60); # WORD 2 OF SUPR MESSAGE TEXT #
        ITEM QU$SUPWD3  I(06,00,60); # WORD 3 OF SUPR MESSAGE TEXT #
        ITEM QU$SUPWD4  I(07,00,60); # WORD 4 OF SUPR MESSAGE TEXT #
  
        ITEM QU$PFCSFC  U(04,00,16); # PRIMARY/SECONDARY FUNC CODE #
        ITEM QU$SUPABN  I(04,24,18); # APPLICATION BLOCK NUMBER  #
        ITEM QU$ACRQABN U(04,24,18); # ABN RETURNED IN CON/ACRQ/A MSG  #
        ITEM QU$LID     C(04,42,03); # LID - CHARACTER #
        ITEM QU$LIDI    I(04,42,18); # LID - INTEGER #
        ITEM QU$NDENOFS U(04,24,18); # NAD ENTRY OFFSET # 
        ITEM QU$NDENTAD U(04,42,18); # NAD ENTRY POINTER #
        ITEM QU$CMSELTY U(04,48,12); # CONVERT MODE SELECT TYPE # 
        ITEM QU$APLNAME C(05,00,07); # APPLICATION NAME # 
        ITEM QU$SHOST   C(05,42,03); # SOURCE HOST IDENTIFIER  #
        ITEM QU$PID     C(05,42,03); # PID - CHARACTER  # 
        ITEM QU$PIDI    I(05,42,18); # PID - INTERGER  #
        ITEM QU$CTRLPID C(06,24,03); # PID RETURNED IN CTRL/INFO/N MSG #
        ITEM QU$RC      U(04,16,08); # RETURN CODE #
        ITEM QU$SUPACN  U(04,24,12); # APPLICATION CONNECTION NUMBER #
        ITEM QU$NUALN   U(04,54,06); # NEW APPL LIST NUMBER # 
        ITEM QU$NUACT   U(04,54,06); # NEW APPL CONNECTION TYPE # 
        ITEM QU$CONACT  U(04,50,04); # ACT IN CON/REQ/N # 
        ITEM QU$CTRNFNC U(05,18,06); # CTRL/INFO FUNCTION CODE #
        ITEM QU$CTRNBFL I(05,24,18); # CTRL/INFO BUFFER LENGTH #
        ITEM QU$CTRNBFA I(05,42,18); # CTRL/INFO BUFFER ADDRESS # 
  
  
  
# 
*     UCP ASYNCHRONOUS SUPERVISORY MESSAGE REQUEST
# 
  
#       ITEM QU$RES     U(01,00,06)    RESERVED # 
#       ITEM QU$HA      I(01,06,18)    HEADER ADDRESS # 
#       ITEM QU$TA      I(01,24,18)    TEXT ADDRESS # 
#       ITEM QU$UCPA    I(01,42,18)    UCP REQUEST ADDRESS #
  
# 
*     UCP SSF CALL FORMATS
# 
  
        ITEM QU$SFRC1   U(01,00,06); # RETURN CODE ONE #
        ITEM QU$SFFP1   U(01,06,12); # FUNCTION PARAMETER ONE # 
        ITEM QU$SFUCPA1 I(01,18,18); # UCP ADDRESS ONE #
        ITEM QU$SFSCPA1 I(01,36,18); # SCP ADDRESS ONE #
        ITEM QU$SFFC1   U(01,54,06); # FUNCTION CODE ONE #
        ITEM QU$SFCB1   B(01,59,01); # FUNCTION COMPLETE BIT #
        ITEM QU$SFJOBID I(02,00,60); # JOB IDENTIFIER # 
        ITEM QU$SFRC2   U(03,00,06); # LIST FUNCTIONS # 
        ITEM QU$SFFP2   U(03,06,12);
        ITEM QU$SFUCPA2 I(03,18,18);
        ITEM QU$SFSCPA2 I(03,36,18);
        ITEM QU$SFFC2   U(03,54,06);
        ITEM QU$SFRC3   U(04,00,06);
        ITEM QU$SFFP3   U(04,06,12);
        ITEM QU$SFUCPA3 I(04,18,18);
        ITEM QU$SFSCPA3 I(04,36,18);
        ITEM QU$SFFC3   U(04,54,06);
        ITEM QU$SFRC4   U(05,00,06);
        ITEM QU$SFFP4   U(05,06,12);
        ITEM QU$SFUCPA4 I(05,18,18);
        ITEM QU$SFSCPA4 I(05,36,18);
        ITEM QU$SFFC4   U(05,54,06);
        ITEM QU$SFRC5   U(06,00,06);
        ITEM QU$SFFP5   U(06,06,12);
        ITEM QU$SFUCPA5 I(06,18,18);
        ITEM QU$SFSCPA5 I(06,36,18);
        ITEM QU$SFFC5   U(06,54,06);
  
# 
*     UCP DAYFILE MESSAGE (MESSAGE DATA). 
# 
  
        ITEM QU$DATA    C(01,00,70); # UCP DAYFILE MESSAGE DATA # 
        ITEM QU$RHF     C(01,00,05); # RHF PREFIX ON MESSAGE #
        ITEM QU$MESSAGE C(01,30,65); # MESSAGE TO GO TO UCP # 
  
# 
*     UCP NETON REPLY.
# 
  
        ITEM QU$NTONRPY I(01,00,60); # NETON REPLY WORD # 
        ITEM QU$STATUS  U(01,36,06); # NETON RETURN STATUS VALUE #
        ITEM QU$APLRPLY I(01,42,18); # APPL TABLE ADDRESS # 
        ITEM QU$NTONSUP I(02,00,60); # NETON REPLY NSUP VALUE # 
  
# 
*     ERROR LOGICAL ENTRY 
# 
  
        ITEM QU$ERROR   U(01,00,06); # ERROR LOGICAL CODE # 
        ITEM QU$SUBERRC U(01,06,06); # ERROR LOGICAL SUB ERROR CODE # 
#       ITEM QU$UCPA    I(01,42,18)    UCP REQUEST ADDRESS #
#       ITEM QU$SUPAPAD I(02,42,18)    APPLICATION TABLE ADDRESS #
        ITEM QU$FIPFUNC U(04,36,12); # APPLICATION FUNCTION REQUESTED # 
        ITEM QU$FIPACN  U(04,48,12); # APPLICATION ACN REQUESTED #
        ITEM QU$BH      I(05,00,60); # BLOCK HEADER # 
        ITEM QU$SSFREQW I(05,00,60); # SSF REQUEST WORD # 
        ITEM QU$FWOT    I(06,00,60); # FIRST WORD OF TEXT # 
        ITEM QU$TWOFR   I(07,00,60); # THIRD WORD OF FIP REQUEST #
  
# 
*     NDR QUEUE ENTRIES 
# 
  
# 
*     FIP REQUEST  GENERAL
# 
  
#       ITEM QU$CHARGE  U(01,00,02)    UCP CHARGE # 
#       ITEM QU$RES     U(01,02,10)    RESERVED # 
        ITEM QU$EVENT   I(01,12,12); # EVENT.  0 = WAITING FOR INPUT #
                                     # 1 = WAITING FOR OUTPUT SPACE # 
        ITEM QU$RETRY   I(01,24,12); # RETRY COUNT #
        ITEM QU$STAT    I(01,36,06); # STAT.  0 = USER CALL # 
                                     # 1 = NORMAL UCP TERMINATION # 
                                     # 2 = ERROR UCP TERMINATION #
#       ITEM QU$UCPA    I(01,42,18)    UCP REQUEST ADDRESS #
        ITEM QU$JOBID   I(02,00,60); # JOB IDENTIFIER # 
        ITEM QU$JOBNAME C(02,00,07); # JOB NAME # 
        ITEM QU$JOBORD  U(02,42,18); # JOB ORDINAL #
#       ITEM QU$RES     I(03,00,24)    RESERVED FOR SUBSYSTEM # 
#       ITEM QU$RESINS  I(03,24,36)    RESERVED FOR INSTALLATION #
        ITEM QU$WC      U(03,36,06); # WORD COUNT # 
#       ITEM QU$RES     U(03,30,18)    SEE SPRM # 
        ITEM QU$FUNCT   U(04,00,12); # FIP REQUEST FUNCTION # 
        ITEM QU$APLADR  U(04,42,18); # APPLICATION TABLE ADDRESS #
  
# 
*     FIP REQUEST  NETON
# 
  
        ITEM QU$MINACN  U(04,12,12); # MINACN # 
        ITEM QU$MAXACN  U(04,24,12); # MAXACN # 
#       ITEM QU$RES     U(04,36,24)    RESERVED # 
        ITEM QU$ANAME   C(05,00,07); # APPLICATION NAME # 
        ITEM QU$NSUP    I(05,42,18); # NSUP ADDRESS # 
  
# 
*     FIP REQUEST  NETOFF 
# 
  
# 
*     FIP REQUEST  NETWAIT
# 
  
        ITEM QU$TIME    U(04,12,12); # DELAY TIME # 
        ITEM QU$FLAG    I(04,24,12); # FLAG # 
        ITEM QU$WFCMR   U(04,36,06); # WAITING FOR CONVERT MODE PATH #
        ITEM QU$WCMACN  U(05,00,12); # ACN REQUIRING CM RESOURCES # 
  
# 
*     FIP REQUEST  NETGET 
# 
  
        ITEM QU$UCPACN  U(04,12,12); # ACN #
        ITEM QU$UCPHA   I(05,06,18); # HEADER ADDRESS # 
        ITEM QU$TLMAX   U(05,24,12); # TEXT LENGTH MAX. # 
        ITEM QU$UCPTA   I(05,42,18); # TEXT ADDRESS # 
  
# 
*     FIP REQUEST  NETGETL
# 
  
        ITEM QU$ALN     U(04,12,12); # ALN #
  
# 
*     FIP REQUEST  NETPUT 
# 
  
# 
*     FIP REQUEST  NETXFR 
# 
  
        ITEM QU$FETFUNC I(05,00,12); # FET I/O FUNCTION # 
        ITEM QU$CMTREQ  U(05,12,12); # CONVERT MODE TYPE #
        ITEM QU$FETADR  I(05,42,18); # FET ADDRESS #
  
# 
*     AYNCHRONOUS SUPERVISORY MESSAGE BLOCK HEADER
# 
  
        ITEM QU$BLKHDR  I(03,00,60); # BLOCK HEADER # 
        ITEM QU$HDRABT  I(03,00,06); # APPLICATION BLOCK TYPE # 
        ITEM QU$HDRADR  I(03,06,12); # ACN - ALWAYS ZERO #
        ITEM QU$HDRABN  I(03,18,18); # ABN #
        ITEM QU$HDRIBU  B(03,40,01); # INPUT BLOCK UNDELIVERABLE #
        ITEM QU$HDRTLC  U(03,48,12); # TEXT LENGTH #
  
# 
*     NETWORK CONTROL MESSAGE FORMAT
# 
  
        ITEM QU$CTLWD   U(02,00,60); # CONTROL MESSAGE FIRST WORD # 
        ITEM QU$CTLNAD  U(02,00,08); # NAD #
        ITEM QU$CTLLT   U(02,08,04); # LOCAL TRUNK ENABLES #
        ITEM QU$CTLDEST U(02,12,04); # DESTINATION #
        ITEM QU$CTLACC  U(02,16,16); # ACCESS CODE #
        ITEM QU$CTLNAME U(02,32,08); # NAME - ASCII R # 
        ITEM QU$CTLP$ID U(02,48,08); # PATH ID #
        ITEM QU$CTLLGTH U(03,36,16); # LENGTH # 
        ITEM QU$CTLPATH U(04,24,08); # PATH ID #
        ITEM QU$BLKTYP  U(04,37,03); # BLOCK TYPE # 
        ITEM QU$CTLABN1 U(04,54,06); # ABN - TOP PART # 
        ITEM QU$CTLABN2 U(05,00,12); # ABN - LOWER PART # 
        ITEM QU$CTLFC   U(05,12,16); # FUNCTION CODE #
        ITEM QU$CTLRC   U(05,28,08); # REASON CODE #
  
# 
*     ACK MESSAGE 
# 
  
        ITEM QU$RTYCNT  I(01,00,12); # CONTROL MESSAGE RETRY COUNT #
        ITEM QU$ACN     U(01,12,12); # ACN #
#       ITEM QU$RES     U(01,24,18)    RESERVED # 
        ITEM QU$APPL    I(01,42,18); # APPLICATION ADDRESS #
  
# 
*     OUTGOING CONTROL MESSAGE FORMAT.
# 
  
# 
*     NDR REQUEST CONNECTION
# 
  
#       ITEM QU$RTYCNT  I(01,00,12)    CONTROL MESSAGE RETRY COUNT #
#       ITEM QU$RES     I(01,12,12)    RESERVED # 
        ITEM QU$CMPST   I(01,24,18); # COMPLETION STATUS ADDRESS #
        ITEM QU$MSGADR  I(01,42,18); # MESSAGE ADDRESS #
  
# 
*     NDR OBTAIN CONNECT REQUEST
# 
  
# 
*     NDR DISCONNECT PATH 
# 
  
        ITEM QU$PATHID  U(01,00,08); # PATH ID #
  
# 
*     NDR FLUSH PATH
# 
  
# 
*     MISCELLANEOUS QUEUE ENTRIES 
# 
  
# 
*     STATUS EVENT
# 
  
# 
*     INCOMING CONTROL MESSAGE
# 
  
        ITEM QU$REJECT  B(01,00,01); # REJECTED CONTROL MESSAGE # 
        ITEM QU$BYTECNT U(01,24,12); # BYTE CNT BEYOND 192 BIT HDR #
  
# 
*     NDR INITIALIZE NAD
# 
  
        ITEM QU$CMCSF   U(02,12,12); # CONVERT MODE CONTROL FUNC #
        ITEM QU$CMBUFFS U(02,24,12); # CONVERT MODE BUFFERS # 
        ITEM QU$CMPATHS U(02,36,12); # CONVERT MODE PATHS # 
  
# 
*     NDR STATUS
# 
  
# 
*     CONVERT MODE SELECT.
# 
  
#       ITEM QU$PATHID  U(01,00,08)    PATH ID #
#       ITEM QU$ACN     U(01,12,12)    ACN #
        ITEM QU$CMTYPE  U(01,24,12); # CONVERT MODE SELECT TYPE # 
#       ITEM QU$APPL    I(01,42,18)    APPLICATION TABLE ADDRESS #
  
# 
*     CONVERT MODE EXIT.
# 
  
#       ITEM QU$PATHID  U(01,00,08)    PATH ID #
#       ITEM QU$ACN     U(01,12,12)    ACN #
#       ITEM QU$APPL    I(01,42,18)    APPLICATION TABLE ADDRESS #
  
# 
*     NDR START 
# 
  
# 
*     OVERFLOW COUNTER
# 
  
        ITEM QU$COUNTER I(01,24,12); # COUNTER #
  
# 
*       NAD OFF 
# 
  
        ITEM QU$NADORD  I(01,00,06); # LOCAL NAD ORDINAL #
        ITEM QU$PTHERR  B(01,06,01); # PATH ERROR # 
        ITEM QU$DAYF    B(01,07,01); # DAYFILE NAD OFF  # 
  
  
# 
*     REMOTE CONNECT REQUEST
# 
  
        ITEM QU$CONNAD  U(01,00,08); # NAD ADDRESS #
        ITEM QU$CONLT   U(01,08,04); # TCU THAT ACCEPTED CONNECT MSG #
        ITEM QU$CONDEST U(01,12,04); # DESTINATION #
        ITEM QU$CONACES U(01,16,16); # ACCESS CODE #
        ITEM QU$CONNAME U(01,32,16); # CONTROL MSG NAME # 
        ITEM QU$CONPTID U(01,48,08); # PATH ID #
        ITEM QU$CONBUFF U(02,02,02); # BUFF SIZE ALLOC REQUEST #
        ITEM QU$CONAN1A U(02,36,24); # ANAME1 (UPPER PART) - ASCII #
        ITEM QU$CONAN1B U(03,00,32); # ANAME1 (LOWER PART) - ASCII #
        ITEM QU$CONPID  U(03,32,24); # REQUESTORS PID - ASCII # 
        ITEM QU$CONAN2A U(03,56,04); # ANAME2 (UPPER PART) - ASCII #
        ITEM QU$CONAN2B U(04,00,52); # ANAME2 (LOWER PART) - ASCII #
        ITEM QU$CONABNA U(04,52,08); # ABN (UPPER PART) - ASCII # 
        ITEM QU$CONABNB U(05,00,16); # ABN (LOWER PART) - ASCII # 
        ITEM QU$CONPWA  U(05,16,44); # PASSWORD (UPPER PART) - ASCII #
        ITEM QU$CONPWB  U(06,00,12); # PASSWORD (LOWER PART) - ASCII #
        ITEM QU$CONLID  U(06,12,24); # LID USED TO INITIATE THIS RQST # 
  
# 
*     REMOTE CONNECT REQUEST AWAITING ASSIGNMENT. (DISPLAY CODE)
# 
  
        ITEM QU$LOCNAD  U(02,30,06); # LOCAL NAD ORDINAL #
        ITEM QU$REMABN  U(02,36,24); # REQUESTED ABN #
        ITEM QU$ANAME1  C(03,00,07); # REQUESTED APPLICATION #
        ITEM QU$REMPID  C(03,42,03); # REQUESTORS PID # 
        ITEM QU$ANAME2  C(04,00,07); # REQUESTORS APPLICATION # 
        ITEM QU$PASSWD  C(05,00,07); # PASSWORD # 
        ITEM QU$LIDREQ  C(04,42,03); # REQUESTED LID #
  
  
        END  # QUEUE ENTRY DESCRIPTIONS # 
  
      END  # COMRQUE COMMON AREA #
  
      END  # COMRQUE COMDECK #
                                               CONTROL LIST;
