IDTPL

Prolog  

Control Block Contents  
   IDTPL DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

IDTPL Prolog

 NAME       : HCPIDTPL
 DESCRIPTION: *IDENT internal routine parameter list
 DSECT      : IDTPL
 FUNCTION   : This DSECT maps the input and output data for
              the interface to internal *IDENT routines.
 LOCATED BY : Dependent on the function; registers in
              HCPIDS
 CREATED BY : HCPEXD when setting up for a local send
 DELETED BY : HCPEXD when handling a message complete
              interruption
              HCPEXD when cleaning up after a failed send
 SERIALIZED : Task ownership
 COMMENTS   : None

IDTPL Control Block Content

IDTPL DSECT

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      IDTPL          *IDENT internal routine parameter
                                        list
0000    0 Address      4 IDTIRCBK       Address of the IRCBK, the *IDENT
                                        resource communication block.
0004    4 Signed       4 IDTPATH        Path id of the path to the target
                                        resource.
0008    8 Signed       2 IDTINST        Instance count of the target
                                        resource
000A   10 Signed       2 *              Reserved for IBM use
     Virtual address of the routine to get control on a message complete
     after HCPIDSMC has done its work. The code refers to this as "caller's
     IRA".
000C   12 Address      4 IDTCLIRA       Address of entry point
0010   16 Signed       4 IDTCLINF       Fullword of function-specific
                                        information that the caller
                                        wishes to have passed back to it
                                        when the routine whose address is
                                        in IDTCLIRA gets control.
0014   20 Character    8 IDTRESID       Resource id of the target
                                        resource for the SEND
001C   28 Signed       4 IDTMSGID       Copy of the IPMSGID field
                                        returned on a successful SEND.
0020   32 Signed       4 IDTSRCLS       Copy of the IPSRCCLS field
                                        returned on a successful SEND.
0024   36 Bitstring    1 IDTRCODE       Copy of the IPRCODE field
                                        returned on a failed IUCV SEND.
0025   37 Bitstring    3 *              Reserved for IBM use
0028   40 Bitstring    4 IDTAUDIT (0)   Copy of the IPAUDIT field
                                        returned on the message complete.
                                        This field contains error
                                        indications for an unsuccessful
                                        reply.
0028   40 Bitstring    1 IDTAUDB0       Byte zero of the IDTAUDIT field.
          1... ....      IPADRPLE       X'80' REPLY TOO LONG FOR BUFFER
          .1.. ....      IPADSNPX       X'40' PROTECTION EXCEPTION ON
                                        SEND BUFF
          ..1. ....      IPADSNAX       X'20' ADDRESSING EXCEPTION ON
                                        SEND BUFF
          ...1 ....      IPADANPX       X'10' PROTECTION EXCEPTION ANSWER
                                        BUFF
          .... 1...      IPADANAX       X'08' ADDRESSING EXCEPTION ANSWER
                                        BUFF
          .... .1..      IPADRJCT       X'04' MESSAGE WAS R ED
          .... ..1.      IPADPRMD       X'02' REPLY SENT IN PARAMETER
                                        LIST
          .... ...1      IPADPGNR       X'01' MESSAGE PURGED ON SEND OR
                                        RECEIVE QUEUE
          .111 1...      IPADMSK1       IPADSNPX+IPADSNAX+IPADANPX+IPADAN
                                        AX APPC MASK
0029   41 Bitstring    1 IDTAUDB1       Byte one of the IDTAUDIT field.
          1... ....      IPADRCPX       X'80' PROTECTION EXCEPTION
                                        RECEIVE BUFF
          .1.. ....      IPADRCAX       X'40' ADDRESSING EXCEPTION
                                        RECEIVE BUFF
          ..1. ....      IPADRPPX       X'20' PROTECTION EXCEPTION REPLY
                                        BUFF
          ...1 ....      IPADRPAX       X'10' ADDRESSING EXCEPTION REPLY
                                        BUFF
          .... 1...      IPADSVRD       X'08' PATH WAS SEVERED
          .... .1..      IPADRLST       X'04' INVALID RECEIVE/REPLY LIST
          1111 .1..      IPADMSK2       IPADRCPX+IPADRCAX+IPADRPPX+IPADRP
                                        AX+IPADRLST APPC MASK MASK OF
                                        VALID APPC AUDIT FLAGS
002A   42 Bitstring    1 IDTAUDB2       Byte two of the IDTAUDIT field.
          1... ....      IPADBLEN       X'80' BAD LENGTH IN SEND BUFFER
                                        LIST
          .1.. ....      IPADALEN       X'40' INVALID SEND / ANSWER
                                        BUFFERLIST SUCH AS BAD ADDRESS OR
                                        LENGTH
          ..1. ....      IPADBTOT       X'20' INVALID TOTAL SEND BUFFER
                                        LENGTH
          ...1 ....      IPADATOT       X'10' INVALID TOTAL SEND ANSWER
                                        LENGTH
          .... 1...      IPADTINV       X'08' PARTNER=INV. LOG. REC.
                                        DATALENG
          .... .1..      IPADIINV       X'04' INVALID LOGICAL RECORD IN
                                        DATASTR
          .... ..1.      IPADTTRN       X'02' PARTNER HAS STARTED A SEND
                                        BUT TRIED TO GO INTO RECEIVE
                                        STATE BEFORE SEND IS FINISHED
          .... ...1      IPADITRN       X'01' RECEIVE STATE ATTEMPTED
                                        BEFORE SEND IS FINISHED
          1111 1111      IPADMSK3       IPADBLEN+IPADALEN+IPADBTOT+IPADAT
                                        OT+IPADTINV+IPADIINV+IP
                                        ADTTRN+IPADITRN MASK OF VALID
                                        APPC AUDIT FLAGS
002B   43 Bitstring    1 IDTAUDB3       Byte three of the IDTAUDIT field.
          ..11 1.11      IPGDSINV       IPRCIGDS INVLD GDS ID WITHIN PIP
                                        VARIABLE
          ..11 11..      IPGDSLEN       IPRCGDSL LENGTHS INVALID FOR PIP
                                        VARIABLE SUBFIELD LENGTH OR SUM
                                        OF SUBFIELD
          .1.1 1.11      IPMCSNDA       IPRMCSDA MACHINE CHECK IN SEND
                                        DATA AREA
          .1.1 11..      IPMCRECA       IPRMCRDA MACHINE CHECK IN RECEIVE
                                        AREA
          .1.1 11.1      IPMCANSA       IPRMCADA MACHINE CHECK IN ANSWER
                                        DATA AREA
          .1.1 111.      IPMCRPYA       IPRMCRPA MACHINE CHECK IN REPLY
                                        DATA AREA
          1111 1111      IPADMSK4       X'FF' 255 ASYNCHRONOUS CODES
                                        ALLOWED
002C   44 Signed       4 IDTFLN2F       Copy of the IPBFLN2F field
                                        returned on the message complete.
                                        This field contains a length, the
                                        value of which is dependent on
                                        the relationship between the send
                                        buffer length and the reply
                                        buffer length.
     Length of the block
          00000006       IDTSIZE        (*-IDTPL+7)/8 IDTPL size in
                                        doublewords
          00000030       IDTBSIZE       *-IDTPL IDTPL size in bytes

IDTPL Storage Layout

          
*** IDTPL - *IDENT internal routine parameter list
*
*     +---------------------------+---------------------------+
*   0 |         IDTIRCBK          |         IDTPATH           |
*     +-------------+-------------+---------------------------+
*   8 |  IDTINST    |/////////////|         IDTCLIRA          |
*     +-------------+-------------+---------------------------+
*  10 |         IDTCLINF          |        IDTRESID-          |
*     +---------------------------+---------------------------+
*  18 |          -(014)           |         IDTMSGID          |
*     +---------------------------+------+--------------------+
*  20 |         IDTSRCLS          |:RCODE|////////////////////|
*     +------+------+------+------+------+--------------------+
*  28 |:AUDB0|:AUDB1|:AUDB2|:AUDB3|         IDTFLN2F          |
*     +------+------+------+------+---------------------------+
*  30
*
*** IDTPL - *IDENT internal routine parameter list

IDTPL Cross Reference

Symbol         Dspl Value
-------------- ---- -----
IDTAUDB0       0028
IDTAUDB1       0029
IDTAUDB2       002A
IDTAUDB3       002B
IDTAUDIT       0028
IDTBSIZE       002C 00000030
IDTCLINF       0010
IDTCLIRA       000C
IDTFLN2F       002C
IDTINST        0008
IDTIRCBK       0000
IDTMSGID       001C
IDTPATH        0004
IDTRCODE       0024
IDTRESID       0014
IDTSIZE        002C 00000006
IDTSRCLS       0020
IPADALEN       002A 40
IPADANAX       0028 08
IPADANPX       0028 10
IPADATOT       002A 10
IPADBLEN       002A 80
IPADBTOT       002A 20
IPADIINV       002A 04
IPADITRN       002A 01
IPADMSK1       0028 78
IPADMSK2       0029 F4
IPADMSK3       002A FF
IPADMSK4       002B FF
IPADPGNR       0028 01
IPADPRMD       0028 02
IPADRCAX       0029 40
IPADRCPX       0029 80
IPADRJCT       0028 04
IPADRLST       0029 04
IPADRPAX       0029 10
IPADRPLE       0028 80
IPADRPPX       0029 20
IPADSNAX       0028 20
IPADSNPX       0028 40
IPADSVRD       0029 08
IPADTINV       002A 08
IPADTTRN       002A 02
IPGDSINV       002B 3B
IPGDSLEN       002B 3C
IPMCANSA       002B 5D
IPMCRECA       002B 5C
IPMCRPYA       002B 5E
IPMCSNDA       002B 5B