I have done this in programs I wrote long ago:

     01  DUMP-PARMS                PIC X(12) VALUE 'D-pgmname'.


Scott Lindstrom
Unix and AS/400 Technical Support

             <mrosinger@cciws.                                          To 
             com>                      cobol400-l@xxxxxxxxxxxx             
             Sent by:                                                   cc 
             s@xxxxxxxxxxxx                                        Subject 
                                       [COBOL400-L] the preferred way to   
                                       force a program abend on iSeries?   
             12/14/2006 10:40                                              
             Please respond to                                             
             COBOL Programming                                             
                  on the                                                   


Another newbie question. In the mainframe world, if your application
detects a condition that it cannot handle it (usually) will force an abend.

There are many ways to do this. One common method for doing this is to call

a non-existent program with a self-documenting name like "DUMPME" or
"ABORT". In the iSeries world, I understand that if your application calls
program that it can't find, it will display a message on the operator
console that requires a response.

What is the preferred way to handle a program-induced abend?

Can I/should I avoid/suppress an operator response?

Is there an API that can be called from COBOL to force an abnormal end (and

get a full dump) but won't require an operator response?

Your suggestions and thoughts on this. As always TIA!


Michael Rosinger

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2022 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.