[Default] On 18 Nov 2020 15:56:00 -0800, in bit.listserv.ibm-main
[email protected] (Sri h Kolusu) wrote:

>> Thank you, I had read this. I expect that doing this will return me
>> to the CEEDUMP behavior I had the other sort product. I was hoping
>> for an option where the DFSORT termination would continue on to the
>> LE termination. That was my specific question. Will, or can I get the
>CEEDUMP?

The normal setup for SYNCSORT used to the if invoked by JCL the SORT
would abend upon error while if invoked by a program it would quit
with a return code of 16 (in COBOL the code would be in SORT-RETURN. I
am fairly certain given the COBOL manual the same is true for DFSORT.
One simple way to see what would happen is to set up a simple COBOL
program to sort a file on a signed packed decimal field and have
invalid data in the test file.  The program should test SORT-RETURN
for 16 and abend if found.

Clark Morris
>
>Dave,
>
>Generally if you have an error in COBOL , then Language environment  SPIE
>takes over and generates the CEEDUMP.  So if your shop has IBM-supplied
>default  TRAP(ON,SPIE) , you would get CEEDUMP.
>
>> I still think I am better off setting ESTAE=NO as a default. I would
>> rather my programmers can fix the error from the first run, rather
>> than needing another failing run with debug options.
>
>If you intend to go with turning of ESTAE , then make sure that you only do
>it for ICEAM2 environment so that only program invoked sorts have their
>ESTAE disabled. Please do not turn it off for ICEAM1 environment.
>
>Thanks,
>Kolusu
>DFSORT Development
>IBM Corporation
>
>
>
>----------------------------------------------------------------------
>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

Reply via email to