Ed,
Thank you for the suggestion. We do not have (E)JES, but I looked it up.
Thanks again , Dave
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Ed Jaffe
Sent: Wednesday, September 11, 2013 11:50 AM
To: [email protected]
Subject: Re: How to display JES2 fields from the PDDB
On 9/11/2013 9:01 AM, Hansen, Dave L - Eagan, MN wrote:
> Dear Group,
>
> I am debugging a JES2 EXIT40. I was asked what do the fields PDBDNODE,
> PDBDRMT and PDBUSER contain. I am told PDBDRMT may not contain a non-zero
> value. There is no command which will give me this information. I am told I
> can set a slip trap on entry to the exit and take a dump at that point.
>
> Q). Is there a good book on taking a dump from an Exit? Does anyone have an
> example of a slip trap to help me debug our PDDB (REG 2 is $PDDB, offset
> x'14' for 12 bytes is the routing info)?
If you are an (E)JES customer, you can issue the DU (dump) line command against
the job to browse a comprehensive dump of all its SPOOL-resident control
blocks. The part you are interested in looks like this:
*********************************************************************
* I O T (ALLOCATION)
*********************************************************************
SPOOL ADDRESS: 02.023C55
COMMON SECTION:
0000 0068 C9D6E340 E2D4C6C4 E4D4D740 0002AFB6 *IOT SMFDUMP ..®¶*
0010 0078 CBF2AA52 00000000 10000800 02023C55 *ô2¡ê...........í*
0020 0088 00000000 00000000 00000000 00000000 *................*
0030 0098 00000145 000066BC 00020000 00000000 *...á..ï........*
0040 00A8 00000000 00001000 00000280 00000000 *...........Ø....*
0050 00B8 00000000 00000000 00000000 00000000 *................*
===> Data at relative offset 00C8 through 00D7 is same as above <===
TGAE SECTION:
0070 0000 02000023 C5000000 00000000 00000000 *....E...........*
0080 0010 00000000 00000000 00000000 00000000 *................*
===> Data at relative offset 0020 through 013F is same as above <===
PDDB ENTRY:
01B0 0000 68800050 02023C53 00000000 00000001 *ÇØ.&...ë........*
01C0 0010 0180E201 00000000 00000000 00000000 *.ØS.............*
01D0 0020 00000800 00000002 00000000 0000007E *...............=*
01E0 0030 E2E3C440 40404040 5C5C5C5C 5C5C5C5C *STD *********
01F0 0040 40404040 40404040 00000000 00000000 * ........*
0200 0050 5C5C5C5C 5C5C5C5C 5C5C5C5C 5C5C5C5C ******************
0210 0060 5C5C5C5C 5C5C5C5C FF000000 00000000 *********........*
0220 0070 0000FFFF FFFF0800 00000000 00000000 *................*
0230 0080 00000000 CBF2AA52 00000000 00000000 *....ô2¡ê........*
0240 0090 00000000 00000000 00000000 40404040 *............ *
0250 00A0 40404040 40404040 40404040 D1C5E2D1 * JESJ*
0260 00B0 C3D3C9D5 40404040 40404040 5001A051 *CLIN &.µé*
0270 00C0 55551555 55555555 55555555 829DB29D *íí.íííííííííb¸¥¸*
0280 00D0 8DA71515 B7819315 15151515 829DB29D *ýx..¼al.....b¸¥¸*
0290 00E0 8DA71515 55555555 55555555 B7B6969C *ýx..íííííííí¼¶oæ*
02A0 00F0 808C918C 55555555 55555555 B7819315 *Øðjðíííííííí¼al.*
02B0 0100 15151515 B7BDB7A4 15151515 E2D4C640 *....¼]¼u....SMF *
02C0 0110 40404040 00000000 00000000 00008000 * ..........Ø.*
02D0 0120 00020402 00000000 00000000 00000000 *................*
02E0 0130 00000000 00000000 00000000 00000000 *................*
02F0 0140 02000000 00000000 00000000 00000000 *................*
0300 0150 00000000 E2D4C64B E2D4C6C4 E4D4D74B *....SMF.SMFDUMP.*
0310 0160 E2F0F1F7 F6F0F5F4 4BC4F0F0 F0F0F0F0 *S0176054.D000000*
0320 0170 F14BD1C5 E2D1C3D3 C9D54040 40404040 *1.JESJCLIN *
etc...
--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
http://www.phoenixsoftware.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
