these structures look about the right size, I have these structures in both DB2
and MQ dumps
but no macro ???
2
---------- Original Message ----------
From: Ron hesketh <[email protected]>
To: [email protected]
Subject: Re: Need Help Idenifying Control Blocks
Date: Mon, 18 Jul 2016 12:23:00 +0800
Hi ,
Have a look in member DSNWCBDS in your DB2 SDSNSAMP dataset, the
definition is in there.
Its not a macro, but a description of the fields eg
CCB : COMPOSITE CAPABILITY BLOCK
OFFSET OFFSET
DECIMAL HEX TYPE LENGTH NAME (DIM)
======== ======== ================== ==============
0 (0) STRUCTURE 1152 CCB
0 (0) BIT(16) 2 CCBCODE
2 (2) SIGNED 2 CCBTLEN
4 (4) UNSIGNED 1 CCBRMID
5 (5) UNSIGNED 1 CCBFCOD
6 (6) UNSIGNED 1 CCBWTNG
7 (7) BIT(8) 1 CCBFLGS
8 (8) CHARACTER 8 CCBUSER
16 (10) CHARACTER 8 CCBRESNM
24 (18) CHARACTER 16 CCBNID
40 (28) UNSIGNED 8 CCBUOWSEQ
48 (30) ADDRESS 8 CCBWWFR
56 (38) CHARACTER 6 *
62 (3E) BIT(8) 1 CCBFLGS2
EB : EXECUTION BLOCK
OFFSET OFFSET
DECIMAL HEX TYPE LENGTH NAME (DIM)
======== ======== ================== ==============
0 (0) STRUCTURE 504 EB
0 (0) SIGNED 2 EBCODE
2 (2) SIGNED 2 EBTLEN
4 (4) ADDRESS 4 EBCHA
8 (8) ADDRESS 4 EBEXU
12 (C) ADDRESS 4 EBROB
16 (10) CHARACTER 8 EBSUSPDW
16 (10) ADDRESS 4 EBSUSPROB
16 (10) ADDRESS 4 EBTSRB
16 (10) BIT(32) 4 *
16 (10) BIT(29) 4 *
20 (14) UNSIGNED 4 EBSUSPSEQ
24 (18) ADDRESS 4 EBSROB
:
It also has an ACE, but its different from the one you want :
ACE : AGENT CONTROL ELEMENT
OFFSET OFFSET
DECIMAL HEX TYPE LENGTH NAME (DIM)
======== ======== ================== ==============
0 (0) STRUCTURE 696 ACE
0 (0) SIGNED 2 ACECODE
2 (2) SIGNED 2 ACETLEN
4 (4) ADDRESS 4 ACECHNA
8 (8) ADDRESS 4 ACEEBA
8 (8) CHARACTER 1 *
12 (C) ADDRESS 4 ACEASE
12 (C) CHARACTER 1 *
16 (10) ADDRESS 4 ACERALE
20 (14) ADDRESS 4 ACE_NOUSE
24 (18) ADDRESS 4 ACECROB
28 (1C) CHARACTER 24 ACESTAT
28 (1C) CHARACTER 4 ACEFLAG
Regards,
Ron
_______________________________________________________________________________
Unencrypted electronic mail is not secure and may not be authentic.
If you have any doubts as to the contents please telephone to confirm.
This electronic transmission including any attachments is intended only
for those to whom it is addressed. It may contain copyright material or
information that is confidential, privileged or exempt from disclosure by law.
Any claim to privilege is not waived or lost by reason of mistaken transmission
of this information. If you are not the intended recipient you must not
distribute or copy this transmission and should please notify the sender.
Your costs for doing this will be reimbursed by the sender.
We do not accept liability in connection with computer virus, data corruption,
delay, interruption, unauthorised access or unauthorised amendment.
_______________________________________________________________________________
______________________________________________________________________
This email has been scanned by the Symantec Email Security.cloud service.
For more information please visit http://www.symanteccloud.com
______________________________________________________________________
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
