//CEEOPTS DD *
TRAP(OFF,NOSPIE),TRMTHDCT(UADUMP,,96)
//*

Or on the EXEC statement use PARM='CobolPgmParm/TRAP(OFF,NOSPIE),etc.'

Check the spelling of the TRMTH... parameter in the LE Programmer's Guide under 
Runtime Options, not sure I remembered that one accurately or not.

HTH

Peter

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Greg Boyd
Sent: Friday, February 10, 2017 4:35 PM
To: [email protected]
Subject: Where's my dump?

I'm trying to debug a COBOL program that is getting a S0C4, but I'm not getting 
a dump when it abends.

I'm pretty sure this is a simple issue.  I'm not a COBOL programmer, but I can 
copy and paste from samples.  I've put together some code to make an ICSF API 
call and it compiles and binds just fine.  When it executes it displays some 
variables and then gets the abend on the API call:

CEE3204S The system detected a protection exception (System Completion 
Code=0C4).                                     
         From compile unit HMACPANP at entry point HMACPANP at compile unit 
offset +0000051E at entry offset +0000051E
          at address 33D0051E.                                                  
                                      

I'm using Enteprise COBOL for z/OS V6.1 and the vanilla IGYWCLG PROC.  So the 
JCL has DD cards for CEEDUMP, SYSUDUMP and SYSABEND, but I don't get a dump of 
the abend.  I'm guessing this is related to LE, because of the CEE3204S 
message.  (The last time I wrote a COBOL program was well before LE was 
introduced and I was getting dumps back then.)
                  
I also added a "CALL 'CEE3DMP' USING ..." to the code and I do get that dump, 
but not the dump for the abend.

I have another ICSF API call before this one that executes cleanly, so it's not 
a problem accessing ICSF.

I'm guessing that I need to provide some additional parms, probably at compile 
time?  Or maybe provide another library/module to the binder via SYSLIB?  How 
do capture the dump?  Pointers to doc, greatly appreciated.
Thanks!
Greg
Mainframe Crypto
www.mainframecrypto.com

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to