Information about direct cobol abort codes

hi

i need to use direct abort codes in cobol for aborting my job..
i.e if i have soem fields with non-numeric values then i need to set an
abort code and stop the pgm there itself and return the abort codes..
this should not be done with SOC7 or return codes..
i heard that there are direct abort codes in cobol through which one
can implement this..
if anyone knows about this pls help me..

regards
rahul

In article <1165905127.212909.106290@n67g2000cwd.googlegroups.com>,
E-mailID: <ajai.47@gmail.com> wrote:
>hi
>
>i need to use direct abort codes in cobol for aborting my job.

Please do your own homework.

DD

> i need to use direct abort codes in cobol for aborting my job..
> i.e if i have soem fields with non-numeric values then i need to set an
> abort code and stop the pgm there itself and return the abort codes..
> this should not be done with SOC7 or return codes..

Um, if you don't use the return code, how do you plan on 'returning'
anything?

In article <V4yfh.11258$wc5.454@newssvr25.news.prodigy.net>,
Michael Mattias <mmattias@talsystems.com> wrote: 
>
>Um, if you don't use the return code, how do you plan on 'returning'
>anything?

Maybe the same way everyone else does after the Holiday Season... stand on
a long line and don't forget your receipt.

DD

"Michael Mattias" <mmattias@talsystems.com> wrote: 
>
>Um, if you don't use the return code, how do you plan on 'returning'
>anything?

He's looking for a user abend, it seems.  This is a very
obscure thing; it's not defined in the COBOL language spec.
For IBM COBOL, the magic word is ILBOABN0 (the program you
need to call to issue a user abend).  I'm not sure how many
dialects this works for.

--
Ron
(user ron
in domain spamblocked.com)

Ron wrote:

> "Michael Mattias" <mmattias@talsystems.com> wrote:
> 
>
>
>   He's looking for a user abend, it seems.  This is a very
> obscure thing; it's not defined in the COBOL language spec.
> For IBM COBOL, the magic word is ILBOABN0 (the program you
> need to call to issue a user abend).  I'm not sure how many
> dialects this works for.
>

ILBOABN0 is obsolete.  It was part of the OS/VS COBOL runtime library.
There is a version in LE for compatibility, but I prefer to use
CEE3ABD instead.  I believe it works the same as CEE3ABC in Howard
Brazee's example.  But in my shop the standard for User Abend codes is
they must be in the range of 3000 to 3999.

If clean-up is set to zero, you don't get a storage dump, but you
still get the abend with user abend code.  That will stop the batch job.

CEE3ABD and CEE3ABC should be documented in you Language Environment
manual.


--
http://arnold.trembley.home.att.net/