If you do an IPCSDATA ACTIVE subcommand under IPCS, you should find in there
DATA STRUCTURE(Tcb) FIND(BLSSTCB) FORMAT(IEATCBF) SCAN(BLSVTCB)
EXIT CBSTAT(TCB) EP(BLSAFLG)
EXIT CBSTAT(TCB) EP(IEAVTRCA)
EXIT CBSTAT(TCB) EP(IEAVG701)
EXIT CBSTAT(TCB) EP(BPXGMCBS)
EXIT FORMAT(TCB) EP(IECDAFMT)
EXIT FORMAT(TCB) EP(IECIOFMT)
EXIT FORMAT(TCB) EP(IEAVTFMT)
EXIT FORMAT(TCB) EP(IEAVD30)
EXIT FORMAT(TCB) EP(IEAVXD01)
EXIT FORMAT(TCB) EP(ICHIXTCB)
It is the EXIT FORMAT(TCB) EP(IECDAFMT) that drives this data management
formatting.
Here is a sample from z/OS 2.5:
DATA MANAGEMENT CONTROL BLOCKS FOR OPEN DATA SETS
---DEB 1 AT LOCATION 8AAD84, DDNAME=SYS00021 DSNAME=O.MCEVS4.DMP00065, INPUT
------------------------------------------
-24 AVT: EOEA 00FF47EC SIOA 80CD5500 PCIA 00FF47EC CEA 00FF47EC
XCEA 00FF47EC 06:09:56.57 2023/03/21
-10 PREFIX: 00000000 00000120 DEBX 008AB070 LENGTH 11 AMTYPE 20
TBLOF 0012 (TIME AND DATE OPENED)
+0 NMSUB 05 TCB 8B11E0 AMLNG 10 DEBB 000000 IRBAD 68000000
PATB 00001100
+10 NMEXT 01 USRPB 000000 ECBAD FD000000 DCBAD 8F0AEA40 EXSCL 04
APPB 8AAD60
+20 DVMOD 58 UCBA FB23B8 00 TRKHI 00 START 03160009 END 00000001
NMTRK 2000
+30 ACC.METH: VOLSQ 0001 VOLNM 0001 DSNM 0000000000000000
BLKSI 0000 LRECL 1040
+40 SUBROUTINES: VU V7 BK BA BB
+4A 00000000 00000000 00000000 00000000 00000000 00000000 0000
***DCB AT LOCATION 0AEA40 (BSAM)
DASD,RECFM=FBS
+0 DCBE 000AED40 KEYCN 00 FDAD 000000 00000009 8B DVTBA
E76026
+10 KEYLE 00 DEVT 2F TRBAL 7FFF BUFCB 00000001 BUFL 0000 DSORG 4000
IOBAD 00000001
+20 EODAD 86000001 RECFM 98 EXLST 0AEC7C TIOT 0418 MACRF 2400
IFLGS 00 DEBA 8AAD84
+30 OFLGS 12 D6C978 OPTCD 00 BCD808 IOBL 0A SYNA
090DA8 CIND 0000 BLKSI 6180
+40 WCPO 30013030 IOBA 000C955C NCP 14 EOBRA CBD098 EOBW
80CBD098 DIRCT 0000 LRECL 1040
+54 POINT 00D68188
EXIT LIST: 870AEC90
**DCBE AT LOCATION 000AED40
+0 ID C4C3C2C5 LEN 0038 0000 DCB 000AEA40 RELA 00000000
+10 FLG1 C080 NSTR 0001 FLG3 A0000000 BLKSI8
0000000000000000
+20 XSIZ 0000000000000000 EODA 00000000 SYNA 00000000
000000000000 MULTACC 00 MULTSDN 0A
IOBS ARE NUMBERED IN PHYSICAL ORDER.
***IOB 16 AT LOCATION 0C95B4 (SAM, BPAM - NORMAL SCHEDULING)
CE DE
-10 VIDAN 00000000 LENRD 00000000 NIOBA 000C95FC NECB 7F000000
+0 FLAG1 0200 SENS 0000 ECBPT 7F0D6EA4 CSW 000C95E4
0C000000
+10 START 000C95DC DCBPT 000AEA40 RESTR 00000000 INCAM 00000000
SEEK 000000000000098A
+28 060B7000 00006180 00000000 00000000 00000000 00000000
0D6EA4 DECB: ECB 7F000000 FLAGS 000D3000 DCB 1D551F04 AREA C9C5C1E5
STATUS E7C3C6C5
***IOB 17 AT LOCATION 0C9604 (SAM, BPAM - NORMAL SCHEDULING)
CE DE
-10 VIDAN 00000000 LENRD 00000000 NIOBA 000C964C NECB 7F000000
+0 FLAG1 0200 SENS 0000 ECBPT 7F0D6EA4 CSW 000C9634
0C000000
+10 START 000C962C DCBPT 000AEA40 RESTR 00000000 INCAM 00000000
SEEK 000000000000098A
+28 060B7000 00006180 00000000 00000000 00000000 00000000
0D6EA4 DECB: ECB 7F000000 FLAGS 000D3000 DCB 1D551F04 AREA C9C5C1E5
STATUS E7C3C6C5
***IOB 18 AT LOCATION 0C9654 (SAM, BPAM - NORMAL SCHEDULING)
CE DE
-10 VIDAN 00000000 LENRD 00000000 NIOBA 000C969C NECB 7F000000
+0 FLAG1 0200 SENS 0000 ECBPT 7F0D6EA4 CSW 000C9684
0C000000
+10 START 000C967C DCBPT 000AEA40 RESTR 00000000 INCAM 00000000
SEEK 000000000000098A
+28 060B7000 00006180 00000000 00000000 00000000 00000000
0D6EA4 DECB: ECB 7F000000 FLAGS 000D3000 DCB 1D551F04 AREA C9C5C1E5
STATUS E7C3C6C5
***IOB 19 AT LOCATION 0C96A4 (SAM, BPAM - NORMAL SCHEDULING)
CE DE
-10 VIDAN 00000000 LENRD 00000000 NIOBA 000C96EC NECB 7F000000
+0 FLAG1 0200 SENS 0000 ECBPT 7F0D6EA4 CSW 000C96D4
0C000000
+10 START 000C96CC DCBPT 000AEA40 RESTR 00000000 INCAM 00000000
SEEK 000000000000098A
+28 060B7000 00006180 00000000 00000000 00000000 00000000
0D6EA4 DECB: ECB 7F000000 FLAGS 000D3000 DCB 1D551F04 AREA C9C5C1E5
STATUS E7C3C6C5
***IOB 20 AT LOCATION 0C96F4 (SAM, BPAM - NORMAL SCHEDULING)
CE DE
-10 VIDAN 00000000 LENRD 00000000 NIOBA 000C90FC NECB 7F000000
+0 FLAG1 0200 SENS 0000 ECBPT 7F0D6EA4 CSW 000C9724
0C000000
+10 START 000C971C DCBPT 000AEA40 RESTR 00000000 INCAM 00000000
SEEK 000000000000098A
+28 060B7000 00006180 00000000 00000000 00000000 00000000
0D6EA4 DECB: ECB 7F000000 FLAGS 000D3000 DCB 1D551F04 AREA C9C5C1E5
STATUS E7C3C6C5
***IOB 1 AT LOCATION 0C9104 (SAM, BPAM - NORMAL SCHEDULING)
CE DE
-10 VIDAN 00000000 LENRD 00000000 NIOBA 010C914C NECB 7F000000
+0 FLAG1 0200 SENS 0000 ECBPT 7F0D6EA4 CSW 000C9134
0C000000
+10 START 000C912C DCBPT 000AEA40 RESTR 00000000 INCAM 00000000
SEEK 000000000000098A
+28 060B7000 00006180 00000000 00000000 00000000 00000000
0D6EA4 DECB: ECB 7F000000 FLAGS 000D3000 DCB 1D551F04 AREA C9C5C1E5
STATUS E7C3C6C5
Jim Mulder
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
Seymour J Metz
Sent: Thursday, April 27, 2023 2:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IPCS formatting of I/O control blocks
I see TIOT (does that include XTIOT?) but not DCB, DECB or IOB, and I would
have expected any new support for them to be via VERBEXIT.
Do you have a sample output? Thanks.
________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Jim
Mulder <d10j...@us.ibm.com>
Sent: Thursday, April 27, 2023 2:41 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IPCS formatting of I/O control blocks
Yes, Wayne Rhoten enhanced that a while back. I don't remember which release
of z/OS, but I have gotten accustomed to seeing it in the output from the
SUMMARY FORMAT subcommand.
Jim Mulder
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
Seymour J Metz
Sent: Thursday, April 27, 2023 8:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IPCS formatting of I/O control blocks
The last time I looked, IPCS did not format, e.g., DCB, DECB, IOB. Has that
changed?
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
