ABEND-Handling under LE - Examples?

All righty, then... for those who missed the last installment of 'As the
Captain Codes' I had a utility program that was blowing up.  The guts of
it were:

MOVE CORR REC-A TO REC-B

... and if there were bad numerics in REC-A the program would blow up and
dump with a S0C7.

Folks have stated that there are facets of the Language Environment which
will 'trap' a statement which would normally cause an ABEND and allow
processing to be resumed... this is something with which I am totally
unfamiliar.

Being (echo chamber on) CCCAAAAPPPTTAAAIIIINNN... COBOL... OBOl... OBol...
Obol... Iiiiii... leeeearrrrnnnn... (echo chamber off) I learn best from
reading code.  Is there someplace that someone might point me towards
where I can find simple code, along the lines of:

WORKING-STORAGE SECTION.
01  STUFF.
05  FILLER                               PIC XX VALUE SPACES.
01  FILLER REDEFINES STUFF.
05 FLDA                                  PIC 9.
05 FLDB                                  PIC 9.

PROCEDURE DIVISION.

SUBTRACT FLDB FROM FLDA.
DISPLAY ' MADE IT THROUGH, NYAH NYAH NYAH!'.

... and say 'In order to execute the DISPLAY you'll have to...'?

Thanks much.

DD

For DD - or anyone else interested in an "intro to LE condition handlers" - 
may
I suggest STARTING at:

http://ew.share.org/proceedingmod/a...bstract_id=5804

which is the "proceedings" from the last share for a session called,

8234 - Writing User Condition Handler Routines for Language Environment

***

I don't know if it will give you exactly what you are looking for, but it wo
uld
certainly be a good (IMHO) place to start.

You might (also) want to look at:
http://publibz.boulder.ibm.com/cgi-...eea2140/3.6.6.4

which shows how to handle a "divide-by-zero" condition - not what you are af
ter,
but some what similar.

--
Bill Klein
wmklein <at> ix.netcom.com
<docdwarf@panix.com> wrote in message news:c807pb$i3$1@panix5.panix.com...
>
> All righty, then... for those who missed the last installment of 'As the
> Captain Codes' I had a utility program that was blowing up.  The guts of
> it were:
>
> MOVE CORR REC-A TO REC-B
>
> ... and if there were bad numerics in REC-A the program would blow up and
> dump with a S0C7.
>
> Folks have stated that there are facets of the Language Environment which
> will 'trap' a statement which would normally cause an ABEND and allow
> processing to be resumed... this is something with which I am totally
> unfamiliar.
>
> Being (echo chamber on) CCCAAAAPPPTTAAAIIIINNN... COBOL... OBOl... OBol...
> Obol... Iiiiii... leeeearrrrnnnn... (echo chamber off) I learn best from
> reading code.  Is there someplace that someone might point me towards
> where I can find simple code, along the lines of:
>
> WORKING-STORAGE SECTION.
> 01  STUFF.
>     05  FILLER                               PIC XX VALUE SPACES.
> 01  FILLER REDEFINES STUFF.
>     05 FLDA                                  PIC 9.
>     05 FLDB                                  PIC 9.
>
> PROCEDURE DIVISION.
>
>     SUBTRACT FLDB FROM FLDA.
>     DISPLAY ' MADE IT THROUGH, NYAH NYAH NYAH!'.
>
> ... and say 'In order to execute the DISPLAY you'll have to...'?
>
> Thanks much.
>
> DD
>

In article <UFQoc.19035$Hs1.18600@newsread2.news.pas.earthlink.net>,
William M. Klein <wmklein@nospam.netcom.com> wrote:
>For DD - or anyone else interested in an "intro to LE condition handlers" -
 may
>I suggest STARTING at:
>
>  http://ew.share.org/proceedingmod/a...bstract_id=5804

How curious... a PowerPoint presentation which appears to actually contain
something of value!  Greatly appreciated, Mr Klein; I'll give it a whack
and see what comes of it.

[snip]

>You might (also) want to look at:
>  [url]http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea2140/3.6.6.4[/ur
l]
>
>which shows how to handle a "divide-by-zero" condition - not what you are a
fter,
>but some what similar.

Ahhhhh, the IBM-sample coding-style with which I'm familiar... it should
be interesting to see how the COPY statements resolve, or don't.

Thanks greatly, Mr Klein... and it is interesting that there's such a
paucity of response on this matter.

DD

In message <c807pb$i3$1@panix5.panix.com>, docdwarf@panix.com writes
>
>Being (echo chamber on) CCCAAAAPPPTTAAAIIIINNN... COBOL... OBOl... OBol...
>Obol... Iiiiii... leeeearrrrnnnn... (echo chamber off)
>
>Thanks much.
>
>DD
>

Are you planning on relinquishing the Doc Dwarf moniker now, Captain
Cobol? Or should we refer to you as 'Captain Cobol formerly known as Doc
Dwarf?'

--
Alistair Maclean

When women plan, God laughs.

In article <R$j7M7DWMPpAFwCM@ld50macca.demon.co.uk>,
Alistair Maclean  <alistair@ld50macca.demon.co.uk> wrote:
>In message <c807pb$i3$1@panix5.panix.com>, docdwarf@panix.com writes 
>
>Are you planning on relinquishing the Doc Dwarf moniker now, Captain
>Cobol? Or should we refer to you as 'Captain Cobol formerly known as Doc
>Dwarf?'

Many of heroes of long ago, whose virtues youngsters were encouraged to
emulate ('Eat your string-beans, dear... Superman *always* eats his
string-beans!') had alter-egos; maybe it is time to reinvigorate the
tradition.

DD

On 14 May 2004 12:49:36 -0400, docdwarf@panix.com wrote:

>Many of heroes of long ago, whose virtues youngsters were encouraged to
>emulate ('Eat your string-beans, dear... Superman *always* eats his
>string-beans!') had alter-egos; maybe it is time to reinvigorate the
>tradition.

How tellin' and à propos, old chad!

http://www.axisoflogic.com/artman/p...icle_6409.shtml
The Congress of the United States is supposed to make and preserve
Laws for the betterment of their constituents and all Americans. In
the year 2004, the majority of Congress is high-jacked by
ultra-radicals, working like busy bees for the Oligarchs/Elites - the
Military/Industrial Complex - and every kind of Corporate Interest
that will throw them a few crumbs. Corruption is normal – integrity is
abnormal. They are poltroons and prostitutes selling out the
Constitution and the People at every turn.

(Are coders under some kind of professionals ethical standards? Are
you member of such an association? Are votin' machines coders jes
makin' a buck even though evidence point to rogue, evil, traitorous
practices?)

The minority party is subservient and spineless. When a genuine server
of the people and Democratic Ideals appears in the Congress – they are
shunted aside and despised. Sometimes they die in mysterious accidents
like what happened to Paul Wellstone and his family. At the time of
his convenient death, Wellstone’s one vote differentiated between
sanity and insanity. Insanity won. How could it get this far?
 ========================================
=================
Many believe that by hyper specializing the division of labor, folks
would take refuge in e'er self-centered clubs with matching tee
shirts, caps, mugs and berets festooned with colorful pins.

Even when some folks' electoral system is being stolen under their
very close-set eyes, by shadow coders, not a peep is heard in the
Cobalt crowd.

'Off Topic', FAQ repost and cold-shoulderin' is all one can detect
from these amorphic, blind as bat, groupies.

I can see Yer Suffisance, along with fellow travellers o' yore,
peering to passing babes over Yer famous pink shades.

Playin' the vet, all lookin' sullen like the Malborough man,
exchanging Cobalt tips on them Days in May.

Awful realllly, Messir Draft!

Heis Berg

In message <c82tb0$3lg$1@panix5.panix.com>, docdwarf@panix.com writes
>In article <R$j7M7DWMPpAFwCM@ld50macca.demon.co.uk>,
>Alistair Maclean  <alistair@ld50macca.demon.co.uk> wrote: 
>
>Many of heroes of long ago, whose virtues youngsters were encouraged to
>emulate ('Eat your string-beans, dear... Superman *always* eats his
>string-beans!') had alter-egos; maybe it is time to reinvigorate the
>tradition.
>
>DD
>

Many Japanese warriors of times past frequently changed their names. I'm
not sure whether that was because they were beaten by worthier folks and
could not stand the shame or.....you were recently out-Coboled by Bill
K., were you not?

--
Alistair Maclean

When women plan, God laughs.

Xref: 127.0.0.1 comp.lang.cobol:5836

In article <yxXTP+EHeQpAFw3R@ld50macca.demon.co.uk>,
Alistair Maclean  <alistair@ld50macca.demon.co.uk> wrote:
>In message <c82tb0$3lg$1@panix5.panix.com>, docdwarf@panix.com writes 
>
>Many Japanese warriors of times past frequently changed their names. I'm
>not sure whether that was because they were beaten by worthier folks and
>could not stand the shame or.....you were recently out-Coboled by Bill
>K., were you not?

What has happened in public has happened in public; what has happened in
other places... hasn't, maybe.

DD