NAME       : HCPMRQBK
 DESCRIPTION: Diagnose 98 Multiple Request Block
 DSECT      : MRQBK
 FUNCTION   :
              Used by a virtual machine when invoking a CP Diagnose
              98 (Subfunction x'10') Multiple Block Request.
              The Diagnose 98 Multiple Request Block is used by the
              program to specify multiple occurrences of a single
              Diagnose 98 Subfunction to CP for execution.  The
              Diagnose 98 Multiple Request Block is a self defining
              control block, which is divided into two sections.
              The first section called the Diagnose 98 Multiple
              Request Block Fixed Header is used to define the
              control block, provide parameters, and a response
              area, which is global to the entire request.  The fix
              header section is common for all Block Diagnose 98
              Requests.
              The second section of the Diagnose 98 Multiple Request
              Block is a variable size area, which contains an array
              of Diagnose 98 Subfunction requests.  The actual
              number of requests within the array is determined by
              CP from the LENGTH and FCN fields specified in the
              Fixed Header of the Diagnose 98 Multiple Request
              Block.  The data within an array entry is determined
              by the FCN code specified.
 CREATED BY : A virtual machine which invokes Diagnose 98.
 DELETED BY : The creating virtual machine.
 RELOCATION CONSIDERATIONS : None

 MRQBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      MRQBK          Diagnose 98 Multiple Request Block
0000    0 Bitstring   16 MRQFH (0)      MRQ Fixed Header
0000    0 Signed       2 MRQID          ID Field of the Control Block
          00000098       MRQ98ID        X'0098' MRQ98ID Diagnose 98 ID
0002    2 Bitstring    1 MRQFCN         FCN Field (Function Code)
          00000000       MRQLCK         X'00' MRQLCK Lock Subfunction
          00000004       MRQULCK        X'04' MRQULCK UnLock Subfunction
          00000020       MRQRELLK       X'20' MRQRELLK Release and Lock
                                        Subfunction
          00000004       MRQLFCN        MRQULCK MRQLFCN Last Valid
                                        Subfunction
0003    3 Bitstring    1 *              Reserved for Future IBM Use
0004    4 Signed       2 *              Reserved for Future IBM Use
0006    6 Signed       2 MRQLEN         LENGTH Field (size of block)
          ..1. 1...      MRQLOWLN       X'28' MRQLOWLN Low bounds for
                                        Length
          00MRQLEN       MRQHILEN       X'1000' MRQHILEN High bounds for
                                        Length
0008    8 Dbl-Word     8 *              Reserved for Future IBM Use
          00000010       MRQSREQ        * Start of Variable Request Area
0010   16 Bitstring    1 MRQ$END (0)    The end of the fixed header
      Notes      : The following assembler equates are defined and can be
            used but do not appear in the control block expansion
            because they are in the PLX section and PRINT OFF,
            NOGEN is in effect.
     -------------- Start of Lock/Unlock Request ***************-


 MRQFCNLK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      MRQFCNLK       Diagnose 98 Multiple Request Block
0000    0 Bitstring   24 MRQREQ04 (0)   MRQ Lock/Unlock Request
0000    0 Dbl-Word     8 MRQGABS (0)    Guest Absolute Address
0000    0 Signed       4 *
0004    4 Address      4 MRQGAB31       Guest Absolute Address AMODE31
0008    8 Dbl-Word     8 MRQHABS (0)    Host Absolute Address
0008    8 Signed       4 *
000C   12 Address      4 MRQHAB31       Host Absolute Address AMODE31
0010   16 Signed       4 *              Reserved for Future IBM Use
0014   20 Signed       2 MRQMISC (0)    Alignment
0014   20 Bitstring    1 *              Reserved for Future IBM Use
0015   21 Bitstring    1 MRQPARM        Parameter Field
          00000001       MRQANY         X'01' MRQANY Lock anywhere
          00000002       MRQBELOW       X'02' MRQBELOW Lock below 2G
0016   22 Signed       2 MRQRC          Request Return Code
          00000000       MRQROK         X'0000' MRQROK Request Completed
                                        OK
          00000001       MRQR1          X'0001' MRQR1 Reserved for Future
                                        IBM Use
          00000002       MRQRINVA       X'0002' MRQRINVA Invalid Guest
                                        ABS Address
          00000003       MRQRLOCK       X'0003' MRQRLOCK Page already
                                        Locked or Unlocked by a previous
                                        DIAG 98
          00000004       MRQRNOMV       X'0004' MRQRNOMV Page cannot be
                                        moved to lock
          00000005       MRQR5          X'0005' MRQR5 Reserved for Future
                                        IBM Use
          00000006       MRQR6          X'0006' MRQR6 Reserved for Future
                                        IBM Use
          00000007       MRQR7          X'0007' MRQR7 Reserved for Future
                                        IBM Use
          00000008       MRQRPERR       X'0008' MRQRPERR Paging Error
          00000009       MRQRNSHR       X'0009' MRQRNSHR Release of
                                        Shared Readable or or Exclusive
                                        Readable pages is not allowed
          0000000A       MRQRBDPM       X'000A' MRQRBDPM Invalid PARM
                                        value
          0000000B       MRQRNODS       X'000B' MRQRNODS Backing storage
                                        could not could not be
                                        disassociated
0018   24 Bitstring    1 MRQ$EN2 (0)    The end of Lock/Unlock Request
      Notes      : The following assembler equates are defined and can be
            used but do not appear in the control block expansion
            because they are in the PLX section and PRINT OFF,
            NOGEN is in effect.
      Global Return Code Equates
          .... ....      MRQGOK         X'0000' All Requests Completed OK
          .... ...1      MRQGWNG        X'0001' Some Requests Failed
          .... ..1.      MRQGNREQ       X'0002' Subfuntion Not Required
          .... ..11      MRQGAM24       X'0003' VM is in AMODE 24
          .... .1..      MRQG370        X'0004' VM is in 370 Mode
          .... .1.1      MRQGIID        X'0005' Invalid ID Field Value
          .... .11.      MRQGIFCN       X'0006' Invalid FCN Field Value
          .... .111      MRQGILEN       X'0007' Invalid LENGTH Field
                                        Value

          
*** MRQBK - Diagnose 98 Multiple Request Block
*
*     +-------------+------+------+-------------+-------------+
*   0 |   MRQID     |MRQFCN|//////|/////////////|   MRQLEN    |
*     +-------------+------+------+-------------+-------------+
*   8 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*
*** MRQBK - Diagnose 98 Multiple Request Block
          
*** MRQFCNLK - Diagnose 98 Multiple Request Block
*
*     +---------------------------+---------------------------+
*   0 |///////////////////////////|         MRQGAB31          |
*     +---------------------------+---------------------------+
*   8 |///////////////////////////|         MRQHAB31          |
*     +---------------------------+------+------+-------------+
*  10 |///////////////////////////|//////|:PARM |   MRQRC     |
*     +---------------------------+------+------+-------------+
*
*** MRQFCNLK - Diagnose 98 Multiple Request Block

 
Symbol         Dspl Value
-------------- ---- -----
MRQ$END        0010
MRQ$EN2        0018
MRQANY         0015 00000001
MRQBELOW       0015 00000002
MRQFCN         0002
MRQFH          0000
MRQGABS        0000
MRQGAB31       0004
MRQGAM24       0018 03
MRQGIFCN       0018 06
MRQGIID        0018 05
MRQGILEN       0018 07
MRQGNREQ       0018 02
MRQGOK         0018 00
MRQGWNG        0018 01
MRQG370        0018 04
MRQHABS        0008
MRQHAB31       000C
MRQHILEN       0006 00MRQLEN
MRQID          0000
MRQLCK         0002 00000000
MRQLEN         0006
MRQLFCN        0002 00000004
MRQLOWLN       0006 28
MRQMISC        0014
MRQPARM        0015
MRQRBDPM       0016 0000000A
MRQRC          0016
MRQRELLK       0002 00000020
MRQREQ04       0000
MRQRINVA       0016 00000002
MRQRLOCK       0016 00000003
MRQRNODS       0016 0000000B
MRQRNOMV       0016 00000004
MRQRNSHR       0016 00000009
MRQROK         0016 00000000
MRQRPERR       0016 00000008
MRQR1          0016 00000001
MRQR5          0016 00000005
MRQR6          0016 00000006
MRQR7          0016 00000007
MRQSREQ        0008 00000010
MRQULCK        0002 00000004
MRQ98ID        0000 00000098