QWA mapping

Table 1. Structure QWA
Offset Offset
Dec Hex Type Len Name(Dim) Description
0 (0) STRUCTURE 1200 QWA QUEUE WORK AREA
0 (0) ADDRESS 4  QWANCELL pointer to next Qwa when being obtained or freed
0 (0) CHARACTER 4   QWAID CONTROL BLOCK IDENTIFIER
4 (4) CHARACTER 48  QWABASIC QWA BASIC SECTION - THIS IS THE ONLY SECTION THAT CAN MAP TO THE RB EXTENDED SAVEAREA OR THE RMPL WORK AREA
4 (4) ADDRESS 4   QWAPELA INPUT PEL ADDRESS
8 (8) UNSIGNED 1   QWAKEY REQUESTOR-S KEY
  1111 ....    QWAKEYNB QWA KEY NIBBLE
  .... 1111    * RESERVED
9 (9) UNSIGNED 1   QWARETRY ID FOR RETRY ADDRESS
10 (A) CHARACTER 2   QWARSVD3 RESERVED
12 (C) ADDRESS 4   QWAPT1 PT OPERAND 1
16 (10) ADDRESS 4   QWAPT2 PT OPERAND 2
20 (14) CHARACTER 28   QWARSA REQUEST SAVE AREA - THIS AREA IS MOVED TO THE QWBHRSA WHEN A GLOBAL RESOURCE IS REQUESTED
20 (14) ADDRESS 4    QWAMRBQ POINTER TO FIRST MESSAGE IN MRB QUEUE
24 (18) UNSIGNED 1    QWAERR FIRST DIGIT OF ABEND CODE
25 (19) BITSTRING 1    QWAMFGS MISC FLAG BITS
  1... ....     QWAFFDM FAST-DEQ-MARK-FLAG. IF 1, BEING PERFORMED ON BEHALF OF A TASK WHICH RECEIVES A RETCODE OF OF ZERO WHEN IT ISSUED A DEQ. THE DEQ WAS HANDLED BY FAST-DEQ.
  .1.. ....     QWAFDQS FAST-DEQ-QWB-SEEN FLAG. WHEN 1, THIS FAST DEQ REQUEST-S QWB HAS BEEN SEEN BY ISGGRP00 AND CAN BE FREED BY ISGGNQDQ BACK-END OR HAS BEEN SEEN BY ISGGNQDQ BACK-END AND CAN BE FREED BY ISGGRP00
  ..1. ....     * WARNING QwbQxbOG maps here so do not use
  ...1 11..     * RESERVED
  .... ..1.     QWALISTREQ List request.
  .... ...1     QWAPCENQ ENQ/DEQ..LINKAGE=SYSTEM request or ISGENQ request. Not an SVC entered ENQ/DEQ/.. request. This is set via an ISGGPC path.@PFC
26 (1A) UNSIGNED 2    QWAPFLGS SAVED PEL FLAGS
26 (1A) UNSIGNED 1     QWAPLAST SAVED PELLAST FLAG BYTE
  1... ....      QWAEOL PELEOL
  .1.. ....      QWAIGNOR PELIGNOR
  ..1. ....      QWARES1 PELRES1
  ...1 ....      QWASHR PELSHR
  .... 1...      QWASAVE PELSAVE
  .... .1..      QWAGEN1 PELGEN1
  .... ..1.      QWAGEN2 PELGEN2
  .... ...1      QWATCBF PELTCBF
27 (1B) UNSIGNED 1     QWAPFLAG SAVED PELFLAG FLAG BYTE
  1... ....      QWASHARE PELSHARE
  .1.. ....      QWASCPE1 PELSCPE1
  ..1. ....      QWASYSMC PELSYSMC
  ...1 ....      QWASTPMC PELSTPMC
  .... 1...      QWASCPE2 PELSCPE2
  .... .1..      QWARET1 PELRET1
  .... ..1.      QWARET2 PELRET2
  .... ...1      QWARET3 PELRET3
28 (1C) BITSTRING 1    QWAFLAG1 QWA PROCESS FLAGS 
    THE FOLLOWING FLAGS ARE INITIALIZED IN THE QWA BY THE
    ENQ/DEQ/RESERVE MAINLINE ROUTINE. WHEN A GLOBAL RESOURCE REQUEST
    IS PROCESSED BY THE GRP, THE DATA IS MOVED TO THE QWB HEADER
    (QWBHFLG1). WHEN THE ENQ/DEQ/RESERVE SVRB IS POST'D, THE
    INFORMATION IS MOVED BACK TO THE QWA. THEREFORE THE BIT
    DEFINITIONS OF QWBHFLG1 MUST MATCH THE BIT DEFINITION OF
    QWAFLAG1.
  1... ....     QWASTLC STEAL PROCESSING IS NOW COMPLETE, I.E., STEAL QWB(S) HAVE BEEN PLACED ON THE REQUEST QUEUE IF NECESSARY
  .1.. ....     QWASMC INDICATES SET SMC STATUS (on ENQ request only)
  .1.. ....      QWARMC INDICATES RESET SMC STATUS (on DEQ or purge request only)
  ..1. ....     QWAMTDQ MASID-target DEQ. A QEL was DEQ-ed while it is the target of another QEL that has a non-zero QELMASID.
  ...1 ....     QWASPOST INDICATES SPOST IS NECESSARY
  .... 1...     QWAINT INDICATES AN INTERNALLY GENERATED REQUEST
  .... .1..     QWALNGWT A LONG-WAIT IS NECESSARY
  .... ..1.     QWAINGRS Primary=GRS (space-switching PC to GRS has occurred)
  .... ...1     QWAPURG INDICATE ISGGDEQP HAS PURGED THE QWB THAT WAS MAPPED TO THIS QWA
29 (1D) BITSTRING 1    QWAFLAG2 QWA STATUS FLAGS 
    THE FOLLOWING FLAGS ARE INITIALIZED IN THE QWA BY THE
    ENQ/DEQ/RESERVE MAINLINE ROUTINE. WHEN A GLOBAL RESOURCE IS
    REQUESTED, MAINLINE FRONT-END PROCESSING WILL MOVE THIS FLAG
    BYTE TO QWBHFLG2. THEREFORE THE BIT DEFINITIONS OF QWAFLAG2
    MUST MATCH THE BIT DEFINITIONS OF QWBHFLG2.
  1... ....     QWAMIXR MIXED RESOURCE REQUEST
  .1.. ....     QWATCBFA REQUESTING TASK WAS ABENDING WHEN THE REQUEST WAS RECEIVED
  ..1. ....     QWAAUTH REQUESTOR IS AUTHORIZED
  ...1 ....     QWAGLBL GLOBAL RESOURCES DEFINED IN THE QWB
  .... 1...     QWAECBF ECB= SPECIFIED
  .... .1..     QWASVC56 ON, denotes an ENQ/RESERVE/ISGENQ OBTAIN request. OFF, denotes DEQ/ISGENQ RELEASE request. The SVC in name is misleading. It could be an ENQ/RESERVE with LINKAGE= SYSTEM (QWAPCENQ would be ON) or an ISGENQ OBTAIN request (QWAISGENQ and QWAPCENQ would be on)
  .... ..1.     QWAABDMC THE TASK OR ADDRESS SPACE HAS TERMINATED WHILE IN MUST COMPLETE
  .... ...1     QWASYNCC SYNCHRONIZATION COMPLETE
30 (1E) UNSIGNED 2    QWAGRES FOR ENQ REQUESTS, THE NUMBER OF GLOBAL RESOURCES FOR WHICH NO QEL WAS PUT IN QUEUE. FOR DEQ REQUESTS, THE NUMBER OF GLOBAL RESOURCES FOR WHICH A QEL WAS REMOVED FROM QUEUE
32 (20) ADDRESS 4    QWAECBA ECB ADDRESS - THIS FIELD IS REPLACED BY QWAQWBA WHEN THE QWABASIC SECTION MAPS TO THE SVRB EXTENDED SAVEAREA.
32 (20) ADDRESS 4     QWAQWBA DUAL USE FIELD. THIS FIELD WILL ONLY EXIST IN THE SVRB QWA WHEN AN ENQ/DEQ REQUESTOR IS SUSPENDED. IF A LOCAL RESOURCE IS BEING PROCESSED, THIS FIELD CONTAINS ZEROES. IF A GLOBAL RESOURCE IS BEING PROCESSED THIS FIELD CONTAINS THE ADDRESS OF THE FIRST QWB DEFINING THE REQUEST. THIS ENSURES THE QWB ADDRESS IS MADE AVAILABLE TO THE MAINLINE ESTAE ROUTINE SHOULD AN ERROR OCCUR OVER THE GLOBAL SUSPENSION.
36 (24) ADDRESS 4    QWATCBA REQUESTOR-S (OR DIRECTED) TCB ADDRESS
40 (28) ADDRESS 4    QWASVRBA SVRB ADDRESS FOR THIS REQUEST
44 (2C) ADDRESS 4    QWAQXB ADDRESS OF QXB 
        END OF RSA SECTION
48 (30) BITSTRING 1   QWAFLAG3 REQUEST PROCESSING FLAGS - THESE FLAGS ARE NOT TRANSPOSED TO THE QWB.
  1... ....    QWACMS CMS LOCK HELD
  .1.. ....    QWAFRR FRR ESTABLISHED
  ..1. ....    QWAREQLL REQUESTOR-S LOCAL LOCK
  ...1 ....    QWAGRSLL GRS LOCAL LOCK
  .... 1...    QWA3ERSQ EARLY-RESERVE-QUEUE FLAG. IF 1, THE ENQ/DEQ REQUEST HAS A GLOBAL RESOURCE WITH THE SAME NAME AS AN EARLY-RESERVE LOCAL RESOURCE. EVERY QWB OF THE REQUEST MUST BE PLACED ON THE EARLY-RESERVE QUEUE.
  .... .1..    QWARQDMG REQUEST DAMAGED FLAG. IF 1, THE QWB FOR THIS REQUEST WAS DAMAGED SINCE THE QWBHSYID FIELD DID NOT CONTAIN A VALID SYSID. IF THE REQUEST REPRESENTS AN ENQ, THE ENQ PROCESSING ROUTINE WILL SET THE QCBNOENQ FLAG IN EACH REQUESTED QCB AND WILL ADD A QEL TO THE QCB CHAIN.
  .... ..1.    * Reserved. Not used
  .... ...1    QWALSTRQ LIST REQUEST - IF 1, REQUEST WAS PART OF A MULTIPLE RESOURCE REQUEST FROM THIS SYSTEM
49 (31) BITSTRING 1   QWAFLAG4 REQUEST PROCESSING FLAGS - THESE FLAGS ARE NOT TRANSPOSED TO THE QWB.
  1... ....    QWABADML BAD MINOR LENGTH SPECIFIED
  .1.. ....    QWADMGE TRIGGERS Q-DAMAGE MESSAGE
  ..1. ....    QWAWAITN WAITING QEL FOUND (NOT ECB)
  ...1 ....    QWA1DEQ AT LEAST 1 QEL DEQUEUED
  .... 1...    QWAISGENQ ISGENQ request. Set on ISGGPC path. QWAPCENQ will also be on. Note that QWASVC56 denotes if it is an obtain/release
  .... .1..    QWAWAIT WAIT WITHIN ENQ/DEQ
  .... ..1.    QWAMVCP ISSUE MVCP - EITHER USER IS NOT AUTHORIZED OR THE INPUT PEL COULD NOT BE CONTAINED IN THE SQA QWB
  .... ...1    QWANOENQ TURN OFF ALL ENQ-S
50 (32) BITSTRING 1   QWAFLAG5 REQUEST PROCESSING FLAGS - THESE FLAGS ARE NOT TRANSPOSED TO THE QWB
  1... ....    QWAGLBLQ THE GLOBAL ASCB QEL QUEUE IS BEING SEARCHED
  .1.. ....    QWARMFP RMF HAS BEEN CALLED
  ..1. ....    QWAHOLD ISSUE ENQHOLD SYSEVENT
  ...1 ....    QWAQXBO QXB OBTAINED
  .... 1...    QWACSYID REQUEST WAS INITIATED FROM THE CURRENT SYSTEM
  .... .1..    QWAPHLDR QSCAN PLACE-HOLDER QCB IS BEING PURGED.
  .... ..1.    QWAMOD24 REQUEST WAS INITIATED IN 24-BIT AMODE
  .... ...1    QWAGBLRS TASK OWNS GLOBAL RESOURCES
51 (33) BITSTRING 1   QWAFLAG6 QWA STATUS FLAGS
  1... ....    QWAR15SW NON-ZERO RETURN CODE PRESENT
  .1.. ....    QWA6ECBZ ECB-ZERO FLAG. ECB-OPERAND WAS SPECIFIED, WITH ECB-ADDRESS OF ZERO. SET FLAG QELECBZ.
  ..1. ....    QWA6GERT Global ENQ RET=TEST PELs exist for this request
  ...1 ....    QWACALLGERTS Indicates whether ISGGLUPC should call ISGGERTS.
  .... 1...    QWAGLOBALSQUEUED Indicates that ISGGLU has or is about to place the global Qwb onto GvtReqQ
  .... .1..    QWARNLSCHANGED Indicates that ISGGLU detected that the RNLs had changed across the window where lock were dropped and the request thus needs to be redriven and the queued1 exit notified
  .... ..1.    QWAQXBOG Qxb obtained by a GRP
  .... ...1    QWAPRNEEDED ISGGQWBI did a stacking PC or a BAKR, so XENDUP in ISGGNQDQ needs to do the PR to unstack
52 (34) CHARACTER 0   QWAEND1 END BASIC SECTION 
     NOTE THAT THE FOLLOWING FIELDS ARE NOT INCLUDED IN THE SVRB QWA
52 (34) CHARACTER 140  QWARDA QWA REQUEST DATA AREA
52 (34) CHARACTER 16   QWARSA2 QWA REQUEST DATA AREA
52 (34) CHARACTER 8    QWAJOBNM JOBNAME/USERID OF REQUESTOR
60 (3C) UNSIGNED 4    QWAORIGN ORIGIN OF REQUESTOR
60 (3C) UNSIGNED 2     QWASYSID SYSID OF REQUESTOR
62 (3E) UNSIGNED 2     QWAASID ASID OF REQUESTOR
64 (40) ADDRESS 4    QWAASCB IF ENQ/DEQ/RESERVE, ADDRESS OF REQUESTOR-S ASCB. NOTE THAT IF THE HIGH-ORDER BIT IS SET, AN ISGQSCAN INFORMATION ROUTINE EXISTS FOR THE ADDRESS SPACE. IF A PURGE REQUEST, ADDRESS OF TARGET ASCB 
        END OF RSA2 SECTION
68 (44) SIGNED 4   QWALOCLR COUNT OF LOCAL RESOURCES REQUESTED
72 (48) SIGNED 4   QWAGLBLR COUNT OF GLOBAL RESOURCES REQUESTED
76 (4C) SIGNED 4   QWAQWBS COUNT OF QWB-S REQUIRED TO CONTAIN A GLOBAL RESOURCE REQUEST.
80 (50) SIGNED 4   QWAFREEC COUNT OF QCB/QEL/QXB-S TO BE FREED
84 (54) SIGNED 4   QWACPELR COUNT OF PEL ENTRIES REMAINING TO BE MOVED TO THE PRIVATE AREA QWB(S)
88 (58) SIGNED 4   QWAPRMSZ TOTAL SIZE OF INPUT PEL
92 (5C) SIGNED 4   QWANMESZ TOTAL SIZE OF QNAME/RNAME-S IN PEL
96 (60) UNSIGNED 2   QWAQWBSZ AVAILABLE BYTES IN A PRIVATE AREA QWB
98 (62) UNSIGNED 2   QWACSYS CURRENT SYSID (0 FOR A LOCAL RESOURCE REQUEST)
100 (64) ADDRESS 4   QWAQWBHS ADDRESS OF THE QWB HEADER AND SMPL. IF A LOCAL RESOURCE IS BEING PROCESSED, CONTAINS THE ADDRESS OF THE SQA QWB. IF A GLOBAL RESOURCE IS BEING PROCESSED, CONTAINS THE ADDRESS OF A PRIVATE AREA QWB.
104 (68) ADDRESS 4   QWAQWBF ADDRESS OF FIRST QWB ON THE REQUEST HOLD QUEUE
108 (6C) ADDRESS 4   QWAQWBL ADDRESS OF LAST QWB ON THE REQUEST HOLD QUEUE
112 (70) ADDRESS 4   QWAFQEL ADDRESS OF FIRST INITIALIZED QEL FOR THE CURRENT REQUEST
116 (74) ADDRESS 4   QWACOQWB CURRENT OUTPUT QWB ADDRESS, I.E., THE PRIVATE AREA QWB(S) TO CONTAIN THE GLOBAL RESOURCE(S)
120 (78) ADDRESS 4   QWACIQWB CURRENT INPUT QWB ADDRESS, I.E., THE SQA QWB OR SQA QWB EXTENSION
124 (7C) ADDRESS 4   QWANSLOT NEXT QWB SLOT
128 (80) ADDRESS 4   QWAHASH HASH TABLE SLOT OF INPUT RESOURCE NAME
132 (84) ADDRESS 4   QWAFQWB ADDRESS OF FIRST QWB DEFINING THE GLOBAL REQUEST.
136 (88) ADDRESS 4   QWAPPELE PREVIOUS PEL ENTRY
140 (8C) ADDRESS 4   QWAGSA ADDRESS OF LOCAL OR GLOBAL GSA
144 (90) CHARACTER 20   QWADPL DEQ PURGE LIST
164 (A4) ADDRESS 4   QWACNFY@ Address of contention notification parameter list
168 (A8) ADDRESS 4   QWANQAR@ Pointer to copy of QWA, SQA QWB, ISGGRX dynamic area, in the user address space
172 (AC) BITSTRING 2   QWAEXITS Exit processing indicators
172 (AC) BITSTRING 1    QWAEXITSTATUS
  1... ....     QWAEXITSTATUSKNOWN When set, exits have been checked
  .1.. ....     QWANEEDTOCALLQ1EXIT When set, the batch exit was or is about to be called and thus recovery will need to call the queued1 exit in the event of a failure between the batch exit and queued1 exit calls.
  ..1. ....     QWAMUSTCALLBATCHCND When set, the PreBatch exit, called in ISGLNQDQ, detected a request to call the BatchCnd exit. Don't recall the PreBatch exit and do call the BatchCnd exit during normal ENQ/DEQ processing
  ...1 ....     QWACALLCLEANUP When set, the PreBatch exit indicated not to call BatchCnd therefore NQAR must be deleted
173 (AD) BITSTRING 1    QWALIVEEXITS indicates which exits, if any, exist
  1... ....     QWANXNQ When set, there is an ISGNQXIT exit routine
  .1.. ....     QWANXBX When set, there is an ISGNQXITBATCH exit routine
  ..1. ....     QWANXQ1X When set, there is an ISGNQXITQUEUED1 exit routine
  ...1 ....     QWANXFQ When set, there is an ISGNQXITFAST exit routine
  .... 1...     QWANXLQD When set, there is an ISGENDOFLQCB exit routine
  .... .1..     QWANXPB When set, there is an ISGNQXITPREBATCH exit routine
  .... ..1.     QWANXCB When set, there is an ISGNQXITBATCHCND exit routine
174 (AE) UNSIGNED 2   QWAABENDCD Abend Code presented to exit
176 (B0) ADDRESS 4   QWAGVTAD ADDRESS OF GVT
180 (B4) CHARACTER 12   QWAPLISTS
180 (B4) CHARACTER 12    QWARSVSP ISGGRSVS Parm List
180 (B4) ADDRESS 4     QWAQWB@ Pointer to QWB
184 (B8) ADDRESS 4     QWAQEL@ Pointer to QEL
188 (BC) ADDRESS 4     QWAPEL@ Pointer to PEL
192 (C0) CHARACTER 0   QWAEND2 END OF AREA CLEARED
192 (C0) SIGNED 4  QWAWORK1 GENERAL PURPOSE WORKAREA 
    SAVEAREAS FOLLOW. NOTE THE FOLLOWING PROTOCOL FOR USE OF THESE
    SAVEAREAS. SAVEAREAS 1-3 CAN BE USED BY ANY ROUTINE WITH CORRECT
    SERIALIZATION BUT CANNOT BE USED BETWEEN MODULES. (ISGGNQDQ,
    ISGGQWBC, AND ISGGPGRP ARE COUNTED AS ONE MODULE IN APPLYING
    THIS RULE.)
    ISGGNQDQ PLACES THE ADDRESS OF QWASAVE1 IN REGISTER 13 BEFORE
    CALLING ISGGQWBC OR ISGGPGRP. THESE MODULES MUST NOT USE
    QWASAVE1.
    SAVEAREA 4 IS USED BY ISGGRP00 TO INTERFACE WITH ISGGNQDQ
                              AND ISGGDEQP, AND BY ISGGNQDQ TO
                              CALL ISGGQWBI.
        (NOTE: THE SAVEAREA IS USED FOR ISGGQWBI IN THE
                 FRONT-END OF ISGGNQDQ, AND IS USED BY ISGGRP00
                 IN THE BACK-END PROCESSING DONE BY ISGGNQDQ.)
    SAVEAREA 5 IS USED BY ISGGDEQP TO INTERFACE WITH ISGGNQDQ
             AND BY ISGGQWBI IN CALLING EXTERNAL ROUTINES.
    (ISGGDEQP PLACES THE ADDRESS OF QWASAVE5 IN REGISTER 13 BEFORE
      CALLING ENTRY-POINT ISGGDQ00 OF ISGGNQDQ. ISGGQWBI IS NOT
      CALLED ON THIS PATH, WHICH IS BACK-END PROCESSING.)
    Note: The above comments may not be correct anymore. They don't
    seem to have been updated since before GRSSTAR
196 (C4) CHARACTER 72  QWASAVE1 SAVEAREA 1 - LEVEL 1 S.A.
268 (10C) CHARACTER 144  QWASAVE2_3 This field is used by ISGGRSV to save 64-bit regs
268 (10C) CHARACTER 72   QWASAVE2 SAVEAREA 2 - LEVEL 2 S.A.
340 (154) CHARACTER 72   QWASAVE3 SAVEAREA 3 - LEVEL 3 S.A.
412 (19C) CHARACTER 72  QWASAVE4 SAVEAREA 4 - FOR GRP00
484 (1E4) CHARACTER 72  QWASAVE5 SAVEAREA 5 - USED ONLY BY ISGGDEQP AND ISGGQWBI
556 (22C) ADDRESS 4  QWAS1R14 REG 14 SUBROUTINE SAVEAREA 1
560 (230) ADDRESS 4  QWAS2R14 REG 14 SUBROUTINE SAVEAREA 2
564 (234) ADDRESS 4  QWAS3R14 REG 14 SUBROUTINE SAVEAREA 3
568 (238) ADDRESS 4  QWAS4R14 REG 14 SUBROUTINE SAVEAREA 4
572 (23C) ADDRESS 4  QWAE1R13 REG 13 ENTRY POINT SAVEAREA 1
576 (240) ADDRESS 4  QWAGRP13 SAVEAREA TO CONTAIN THE SAVEAREA ADDRESS PROVIDED BY THE ATTACH OF GRP.
580 (244) CHARACTER 52  QWATRMRM ENQ/DEQ TERMINATION RESOURCE MANAGER WORK AREA.
580 (244) CHARACTER 8   QWASTPNM STEPNAME OF TERMINATING TASK
588 (24C) BITSTRING 1   QWARMFLG RESOURCE MANAGER FLAGS
  1... ....    QWAJSTEP WHEN 1, JOBSTEP IS TERMINATING
  .1.. ....    QWARMRV7 RESERVED
  ..1. ....    QWARMRV6 RESERVED
  ...1 ....    QWARMRV5 RESERVED
  .... 1...    QWARMRV4 RESERVED
  .... .1..    QWARMRV3 RESERVED
  .... ..1.    QWARMRV2 RESERVED
  .... ...1    QWARMRV1 RESERVED
589 (24D) CHARACTER 3   QWARMR01 RESERVED
592 (250) CHARACTER 4   QWACCODE COMPLETION CODE
592 (250) BITSTRING 3    QWACOMPC SYSTEM COMPLETION CODE IS FIRST 12 BITS. USER COMPLETION CODE IS LAST 12 BITS.
595 (253) BITSTRING 1    QWACCRV1 RESERVED
596 (254) ADDRESS 4   QWARB CURRENT RB
600 (258) CHARACTER 32   QWARUBTM REGISTER UPDATE BLOCK FOR ISGGTRM1 RECOVERY
632 (278) CHARACTER 64  * Reserved not used
696 (2B8) CHARACTER 12  QWAPGROA OUTPUT AREA PRODUCED BY ISGGPGRP.
696 (2B8) BITSTRING 1   QWAFLAG7 FIRST FLAG-BYTE FROM ISGGPGRP.
  1... ....    QWA7OWNR REQUESTOR OWNS RESOURCE, OR REQUESTOR IS NOT ON QEL-CHAIN BUT WILL OWN RESOURCE WHEN ITS QEL IS ADDED TO THE QEL-CHAIN.
  .1.. ....    QWA7AURC ADJUST-UCB-RESERVE-COUNT. IF 1, THE CALLER SHOULD INCREASE THE UCB-RESERVE COUNT (ENQ/RESERVE) OR REDUCE THE COUNT (DEQ). (THIS ADJUSTMENT SHOULD BE DONE ONLY IF THE CALLER FINDS THAT THE RESERVE-CONVERSION RNLE DOES NOT SUPPRESS THE RESERVE) VALID ONLY IN ORIGINATING SYSTEM.
  ..1. ....    QWA7CHGA EXCLUSIVE-CONTROL ALLOWED. IF ENQ RET=CHNG: THE MATCH-QEL IS THE ONLY QEL THAT OWNS THE RESOURCE. IF MASID-ENQ: EXCLUSIVE-CONTROL IS ALLOWED IMMEDIATELY. IF MASID-ENQ CASE: VALID ONLY IN ORIGINATING SYSTEM.
  ...1 ....    QWA7HOLD ISSUE SYSEVENT-HOLD(S).
  .... 1...    QWA7POST POST A QEL OR QELS.
  .... .1..    QWA7RLSE ISSUE SYSEVENT-RLSE(S).
  .... ..1.    QWA7COEX COEXISTENCE RETURN-CODE FLAG. IF 1, THIS SYSTEM COULD NOT HONOR AN EXCLUSIVE ENQ WITH MASID OPERAND BECAUSE THE RESOURCE IS SHARED. VALID ONLY IN ORIGINATING SYSTEM.
  .... ...1    QWA7ABMR MASID-RESTRICTION VIOLATED. ENQ WITH MASID VIOLATES A RESTRICTION, OR DEQ RELEASES A RESOURCE USED AS A MASID-TARGET. VALID ONLY IN ORIGINATING SYSTEM.
697 (2B9) BITSTRING 1   QWAFLAG8 SECOND FLAG-BYTE FROM ISGGPGRP.
  1... ....    QWA8EXSH EXC/SHR. 1 MEANS RC=8 ENQ SHOULD REPORT SHR CONTROL. VALID ONLY IN ORIGINATING SYSTEM.
  .1.. ....    QWA8DCVT Delayed convert request being POSTed. Indicates that the QEL pointed to by QWAPSTAD is a MASID convert-to-exclusive request that can now be given access to the resource without actually owning it.
  ..1. ....    QWA8CNST Start of contention
  ...1 ....    QWA8CNCH Change in contention
  .... 1...    QWA8CNEN End of contention
  .... .1..    QWA8RSV3 RESERVED
  .... ..1.    QWA8RSV2 RESERVED
  .... ...1    QWA8RSV1 RESERVED
698 (2BA) SIGNED 2   QWAGPMAS MASID-VALUE TO BE PLACED IN NEW QEL (IF ANY).
700 (2BC) ADDRESS 4   QWAMQLAD ADDRESS OF MATCH-QEL.
704 (2C0) ADDRESS 4   QWADSTAD DEFERRED-STEAL ADDRESS. ADDRESS OF A QEL THAT CAN NOW BE STOLEN WHEN A MASIDQEL IS DEQ-ED. VALID ONLY IN ORIGINATING SYSTEM.
708 (2C4) UNSIGNED 1  QWAPGRFN ISGGPGRP FUNCTION-CODE
709 (2C5) CHARACTER 1  QWARSVD5 RESERVED
710 (2C6) SIGNED 2  QWAFMTVL VALUE OF FORMAT-BYTE THAT PRECEDES FIRST PEL, OR ZERO
712 (2C8) SIGNED 4  QWASEHCT COUNT OF SYSEVENT-HOLDS TO BE ISSUED.
716 (2CC) SIGNED 4  QWAPSTCT COUNT OF POSTS TO BE ISSUED.
720 (2D0) SIGNED 4  QWASERCT COUNT OF SYSEVENT-RLSES TO BE ISSUED.
724 (2D4) ADDRESS 4  QWASEHAD ADDRESS OF FIRST QEL TO BE TARGET OF SYSEVENT-HOLD.
728 (2D8) ADDRESS 4  QWAPSTAD ADDRESS OF FIRST QEL TO BE TARGET OF POST.
732 (2DC) ADDRESS 4  QWASERAD ADDRESS OF FIRST QEL TO BE TARGET OF SYSEVENT-RLSE.
736 (2E0) CHARACTER 32  QWACLR2B BEGINNING OF SECOND QWA SECTION THAT IS CLEARED AT BEGINNING OF ENQ OR DEQ REQUEST
736 (2E0) CHARACTER 24   QWANWPEL BEGINNING OF PARAMETERS FROM NEW-FORMAT PEL-PREFIX. THIS FIELD IS SENT TO OTHER SYSTEMS IN FIELDS QWBXRSA3 AND QWBXR3LN OF MAPPING MACRO ISGQWB.
736 (2E0) ADDRESS 4    QWANPTCB TCB-ADDRESS OR ZERO.
740 (2E4) ADDRESS 4    QWANPECB ECB-ADDRESS OR ZERO.
744 (2E8) ADDRESS 4    QWANPMAS MASID-OPERAND OR ZERO.
748 (2EC) ADDRESS 4    QWANPMTC MTCB-OPERAND OR ZERO.
752 (2F0) CHARACTER 8    QWARSVC4 RESERVED.
760 (2F8) CHARACTER 0   QWANPEND END OF PARAMETERS.
760 (2F8) BITSTRING 1   QWAFLAG9 FLAG-BYTE
  1... ....    QWA9CNPP COPY NEW-FORMAT PEL-PREFIX FLAG. USED BY ISGGQWBI.
  .1.. ....    QWA9DSTL DEFERRED-STEAL NEEDED. USED BY XDEQQEL SUBROUTINE OF ISGGNQDQ.
  ..1. ....    QWA9RSV6 RESERVED
  ...1 ....    QWA9RSV5 RESERVED
  .... 1...    QWA9RSV4 RESERVED
  .... .1..    QWA9RSV3 RESERVED
  .... ..1.    QWA9RSV2 RESERVED
  .... ...1    QWA9RSV1 RESERVED
761 (2F9) CHARACTER 7   QWARSVD6 RESERVED
768 (300) ADDRESS 4  QWAFRRPARMAREA@ Address of FRRParm area used by ISGLNQDQ to give ISGGFRR0 information such as MODID, and the address of the QWA being used.
772 (304) ADDRESS 4  QWAQSQHTENT Address of ASID hash table for the home address space. Only set STEP requests
776 (308) CHARACTER 72  * Reserved not used
848 (350) BITSTRING 16  QWABUILTETOD Time that the QWA was initialize by either ISGLNQDQ, ISGGNQDQ, or ISGGPC. This time represents the time that the request was made. It makes its way into the QXBETOD and then the ENQTOKEN for ISGENQ requests
864 (360) CHARACTER 12  QWATCBATTOKNINFO Ttoken info associated with QWATCBA TCB
864 (360) BITSTRING 8   QWATCBATTKNSTKN From TTKNSTKN. This is STOKEN of the assigned address space.
872 (368) BITSTRING 4   QWATCBATTKNCNT From TTKNCNT
876 (36C) CHARACTER 120  QWAGENWORKAREA Workarea used by ISGGQWBC and ISGGNQDQ
876 (36C) BITSTRING 8   QWASAVEDRSVCODES Used by ISGGNQDQ
876 (36C) BITSTRING 4    QWASAVEDRSVRETCODE Return code from ISGGRSV saved by ISGGNQDQ on DEQ passing control to waiters only
880 (370) BITSTRING 4    QWASAVEDRSVRSNCODE Reason code from ISGGRSV saved by ISGGNQDQ on DEQ passing control to waiters only
884 (374) CHARACTER 0    QWASAVEDRSVRETCODEEND
996 (3E4) CHARACTER 88  * Reserved
1084 (43C) CHARACTER 28  QWAISGLNQDQCOMMUNICATIONAREA
Data passed from ISGLNQDQ to mainline ENQ/DEQ when exit status has been determined
1084 (43C) ADDRESS 4   QWAICANQAR@ Address of NQAR obtained for use by exit routines (copy of QwaNqar@)
1088 (440) CHARACTER 4   * Reserved (previously QwaICARet@)
1092 (444) CHARACTER 16   * Reserved (previously QwaICAReqToken)
1108 (454) BITSTRING 2   QWAICAEXITS Copy of exit flags (copy of QwaExits)
1110 (456) CHARACTER 2   * Reserved
1112 (458) CHARACTER 8  QWALRNLC Time stamp of last RNL change obtained from GvtLRnlC and subsequently checked later to see if an RNL change occurred across the window where locks were dropped in ISGGPC
1120 (460) SIGNED 4  * unused
1124 (464) SIGNED 4  * unused
1128 (468) UNSIGNED 4  QWAGRSALET set by ISGGPC and used by ISGGNX to reference the Qwa in the GRS address space after the CMSET to home.
1132 (46C) SIGNED 4  QWAQXBRECDECCNT used by ISGGPC recovery to decrement the Qxb list count
1136 (470) CHARACTER 16  QWAREQTOKEN Request token for exits
1152 (480) UNSIGNED 4  QWAEXITTYPE Exit to call, either Batch, Queued1, EndOfLcb, or EnqExit
1156 (484) UNSIGNED 4  QWA#XITPELS Number of non-step PELS for exit processing
1160 (488) UNSIGNED 4  QWATOTALRNAMELENGTH total number of bytes of storage needed to contain all of the non-step rnames
1164 (48C) ADDRESS 4  QWARET@ Next sequential instruction following the ENQ/DEQ request
1168 (490) UNSIGNED 4  QWASAEAX Reg value used to restore uses EAX.
1172 (494) ADDRESS 4  QWALNQDQADDDYNAREA@ Address of an additional work area that ISGLNQDQ uses when calling ISGSALC, ISGSDAL, and possibly others. See ISGLNQDQ for how it is used.
1176 (498) CHARACTER 12  QWACMSXM XMSAVE area for CMSET
1188 (4A4) ADDRESS 4  QWAUCBP@ UCB prefix address - used for DEQ of a RESERVE
1192 (4A8) UNSIGNED 4  QWARSNCD Reason code for QWAERR
1196 (4AC) UNSIGNED 4  QWADEQSAVEDLWCDECVALUE Used by ISGGNQDQ to save the value to decrement the QXBLWC by
1200 (4B0) CHARACTER 0  QWAEND3 END QWA
Table 2. Constants for QWA
Len Type        Value Name Description 
     Declare possible QWA eyecatcher values
4 CHARACTER LQWA KLQWAID Local QWA
4 CHARACTER GQWA KGQWAID Global QWA
4 CHARACTER PQWA KPQWAID Private QWA i.e. ISGGPC
4 CHARACTER SQWA KSQWAID Local Lock serialized quick space QWA
4 DECIMAL            1 QWAPGFMS QWAPGRFN FUNCTION IS MASID-SCAN
4 DECIMAL            2 QWAPGFEQ QWAPGRFN FUNCTION IS ENQ
4 DECIMAL            3 QWAPGFDQ QWAPGRFN FUNCTION IS DEQ
4 DECIMAL         1200 QWA_KLENGTH 
     The following QwaExitType function codes that are used to tell
    ISGGRX entry points why they are being called.
4 DECIMAL            1 QWA_KBATCH
4 DECIMAL            2 QWA_KQUEUED1
4 DECIMAL            3 QWA_KENDOFLQCB
4 DECIMAL            4 QWA_KENQEXIT
4 DECIMAL            5 QWA_KPREBATCH
4 DECIMAL            6 QWA_KCLEANUP
4 DECIMAL            7 QWA_KISGENQPOST Special ISGENQ ECB posting hook for ISGGNQDQ. Really nothing to do with exit processing
4 DECIMAL            8 QWA_KDELETE64CELLS for gfrr0 to call to delete 64 but rname cells off sqa qwb
4 DECIMAL            9 QWA_KINCCONCOUNT Increment concurrent request count (lnqdq usage)
4 DECIMAL           10 QWA_KFUZZYINCLST Upfront check of concurrent request count for potentially many requests (gnqdq front-end usage)
4 DECIMAL           11 QWA_KFORCEDINC Unconditionally increment concurrent request count (gnqdq back-end usage)
4 DECIMAL           12 QWA_KDECCONCOUNT Decrement concurrent request count (common back-end usage)
Table 3. Cross Reference for QWA
Name Offset Hex Tag  
QWA 0  
QWA#XITPELS 484  
QWAABDMC 1D 02  
QWAABENDCD AE  
QWAASCB 40  
QWAASID 3E  
QWAAUTH 1D 20  
QWABADML 31 80  
QWABASIC 4  
QWABUILTETOD 350  
QWACALLCLEANUP AC 10  
QWACALLGERTS 33 10  
QWACCODE 250  
QWACCRV1 253  
QWACIQWB 78  
QWACLR2B 2E0  
QWACMS 30 80  
QWACMSXM 498  
QWACNFY@ A4  
QWACOMPC 250  
QWACOQWB 74  
QWACPELR 54  
QWACSYID 32 08  
QWACSYS 62  
QWADEQSAVEDLWCDECVALUE 4AC  
QWADMGE 31 40  
QWADPL 90  
QWADSTAD 2C0  
QWAECBA 20  
QWAECBF 1D 08  
QWAEND1 34  
QWAEND2 C0  
QWAEND3 4B0  
QWAEOL 1A 80  
QWAERR 18  
QWAEXITS AC  
QWAEXITSTATUS AC  
QWAEXITSTATUSKNOWN AC 80  
QWAEXITTYPE 480  
QWAE1R13 23C  
QWAFDQS 19 40  
QWAFFDM 19 80  
QWAFLAG1 1C  
QWAFLAG2 1D  
QWAFLAG3 30  
QWAFLAG4 31  
QWAFLAG5 32  
QWAFLAG6 33  
QWAFLAG7 2B8  
QWAFLAG8 2B9  
QWAFLAG9 2F8  
QWAFMTVL 2C6  
QWAFQEL 70  
QWAFQWB 84  
QWAFREEC 50  
QWAFRR 30 40  
QWAFRRPARMAREA@ 300  
QWAGBLRS 32 01  
QWAGENWORKAREA 36C  
QWAGEN1 1A 04  
QWAGEN2 1A 02  
QWAGLBL 1D 10  
QWAGLBLQ 32 80  
QWAGLBLR 48  
QWAGLOBALSQUEUED 33 08  
QWAGPMAS 2BA  
QWAGRES 1E  
QWAGRP13 240  
QWAGRSALET 468  
QWAGRSLL 30 10  
QWAGSA 8C  
QWAGVTAD B0  
QWAHASH 80  
QWAHOLD 32 20  
QWAICAEXITS 454  
QWAICANQAR@ 43C  
QWAID 0  
QWAIGNOR 1A 40  
QWAINGRS 1C 02  
QWAINT 1C 08  
QWAISGENQ 31 08  
QWAISGLNQDQCOMMUNICATIONAREA 43C  
QWAJOBNM 34  
QWAJSTEP 24C 80  
QWAKEY 8  
QWAKEYNB 8 F0  
QWALISTREQ 19 02  
QWALIVEEXITS AD  
QWALNGWT 1C 04  
QWALNQDQADDDYNAREA@ 494  
QWALOCLR 44  
QWALRNLC 458  
QWALSTRQ 30 01  
QWAMFGS 19  
QWAMIXR 1D 80  
QWAMOD24 32 02  
QWAMQLAD 2BC  
QWAMRBQ 14  
QWAMTDQ 1C 20  
QWAMUSTCALLBATCHCND AC 20  
QWAMVCP 31 02  
QWANCELL 0  
QWANEEDTOCALLQ1EXIT AC 40  
QWANMESZ 5C  
QWANOENQ 31 01  
QWANPECB 2E4  
QWANPEND 2F8  
QWANPMAS 2E8  
QWANPMTC 2EC  
QWANPTCB 2E0  
QWANQAR@ A8  
QWANSLOT 7C  
QWANWPEL 2E0  
QWANXBX AD 40  
QWANXCB AD 02  
QWANXFQ AD 10  
QWANXLQD AD 08  
QWANXNQ AD 80  
QWANXPB AD 04  
QWANXQ1X AD 20  
QWAORIGN 3C  
QWAPCENQ 19 01  
QWAPEL@ BC  
QWAPELA 4  
QWAPFLAG 1B  
QWAPFLGS 1A  
QWAPGRFN 2C4  
QWAPGROA 2B8  
QWAPHLDR 32 04  
QWAPLAST 1A  
QWAPLISTS B4  
QWAPPELE 88  
QWAPRMSZ 58  
QWAPRNEEDED 33 01  
QWAPSTAD 2D8  
QWAPSTCT 2CC  
QWAPT1 C  
QWAPT2 10  
QWAPURG 1C 01  
QWAQEL@ B8  
QWAQSQHTENT 304  
QWAQWB@ B4  
QWAQWBA 20  
QWAQWBF 68  
QWAQWBHS 64  
QWAQWBL 6C  
QWAQWBS 4C  
QWAQWBSZ 60  
QWAQXB 2C  
QWAQXBO 32 10  
QWAQXBOG 33 02  
QWAQXBRECDECCNT 46C  
QWARB 254  
QWARDA 34  
QWAREQLL 30 20  
QWAREQTOKEN 470  
QWARES1 1A 20  
QWARET@ 48C  
QWARETRY 9  
QWARET1 1B 04  
QWARET2 1B 02  
QWARET3 1B 01  
QWARMC 1C 40  
QWARMFLG 24C  
QWARMFP 32 40  
QWARMRV1 24C 01  
QWARMRV2 24C 02  
QWARMRV3 24C 04  
QWARMRV4 24C 08  
QWARMRV5 24C 10  
QWARMRV6 24C 20  
QWARMRV7 24C 40  
QWARMR01 24D  
QWARNLSCHANGED 33 04  
QWARQDMG 30 04  
QWARSA 14  
QWARSA2 34  
QWARSNCD 4A8  
QWARSVC4 2F0  
QWARSVD3 A  
QWARSVD5 2C5  
QWARSVD6 2F9  
QWARSVSP B4  
QWARUBTM 258  
QWAR15SW 33 80  
QWASAEAX 490  
QWASAVE 1A 08  
QWASAVEDRSVCODES 36C  
QWASAVEDRSVRETCODE 36C  
QWASAVEDRSVRETCODEEND 374  
QWASAVEDRSVRSNCODE 370  
QWASAVE1 C4  
QWASAVE2 10C  
QWASAVE2_3 10C  
QWASAVE3 154  
QWASAVE4 19C  
QWASAVE5 1E4  
QWASCPE1 1B 40  
QWASCPE2 1B 08  
QWASEHAD 2D4  
QWASEHCT 2C8  
QWASERAD 2DC  
QWASERCT 2D0  
QWASHARE 1B 80  
QWASHR 1A 10  
QWASMC 1C 40  
QWASPOST 1C 10  
QWASTLC 1C 80  
QWASTPMC 1B 10  
QWASTPNM 244  
QWASVC56 1D 04  
QWASVRBA 28  
QWASYNCC 1D 01  
QWASYSID 3C  
QWASYSMC 1B 20  
QWAS1R14 22C  
QWAS2R14 230  
QWAS3R14 234  
QWAS4R14 238  
QWATCBA 24  
QWATCBATTKNCNT 368  
QWATCBATTKNSTKN 360  
QWATCBATTOKNINFO 360  
QWATCBF 1A 01  
QWATCBFA 1D 40  
QWATOTALRNAMELENGTH 488  
QWATRMRM 244  
QWAUCBP@ 4A4  
QWAWAIT 31 04  
QWAWAITN 31 20  
QWAWORK1 C0  
QWA1DEQ 31 10  
QWA3ERSQ 30 08  
QWA6ECBZ 33 40  
QWA6GERT 33 20  
QWA7ABMR 2B8 01  
QWA7AURC 2B8 40  
QWA7CHGA 2B8 20  
QWA7COEX 2B8 02  
QWA7HOLD 2B8 10  
QWA7OWNR 2B8 80  
QWA7POST 2B8 08  
QWA7RLSE 2B8 04  
QWA8CNCH 2B9 10  
QWA8CNEN 2B9 08  
QWA8CNST 2B9 20  
QWA8DCVT 2B9 40  
QWA8EXSH 2B9 80  
QWA8RSV1 2B9 01  
QWA8RSV2 2B9 02  
QWA8RSV3 2B9 04  
QWA9CNPP 2F8 80  
QWA9DSTL 2F8 40  
QWA9RSV1 2F8 01  
QWA9RSV2 2F8 02  
QWA9RSV3 2F8 04  
QWA9RSV4 2F8 08  
QWA9RSV5 2F8 10  
QWA9RSV6 2F8 20  
Parent topic: QWA Information