Home > Archive > Cobol > June 2004 > exception handling in cobol /bs2000
You are viewing an archived Text-only version of the thread.
To view this thread in it's original format and/or if you want to reply to
this thread please [click here]
| Author |
exception handling in cobol /bs2000
|
|
| j?rg brehe 2004-06-17, 3:55 pm |
| Is there a possibility to write an exception handling routine in cobol
on bs2000 like on IBM/390 with the language environment classes "CEE*"
For example: I use a couple of functions like "CEEHDLR" or "CEEHDLU"
I will implement an exception handling routine to fetch the abends
and use my own handling routine.
thanks foreward
jörg
| |
| Karl Kiesel 2004-06-18, 3:55 pm |
| j?rg brehe schrieb:
>
> Is there a possibility to write an exception handling routine in cobol
> on bs2000 like on IBM/390 with the language environment classes "CEE*"
>
> For example: I use a couple of functions like "CEEHDLR" or "CEEHDLU"
> I will implement an exception handling routine to fetch the abends
> and use my own handling routine.
>
For COBOL2000 in BS2000/OSD, at present there is no trivial possibility
for user written exection routines to handle any system interrupts. For
detailed help, more information concerning the interrupts of intrest and
possible actions would be helpful - may be ILCS offers some useful
interfaces.
Karl Kiesel
Fujitsu Siemens Computers
| |
| j?rg brehe 2004-06-25, 6:50 pm |
| Binyamin Dissen <postingid@dissensoftware.com> wrote in message news:<7dvdd099f4b877i5e6lr0ma2pj2c2dafvm@4ax.com>...
> On 21 Jun 2004 03:39:30 -0700 Joerg.Brehe@set-software.de (j?rg brehe) wrote:
>
> :>> For COBOL2000 in BS2000/OSD, at present there is no trivial possibility
> :>> for user written exection routines to handle any system interrupts. For
> :>> detailed help, more information concerning the interrupts of intrest and
> :>> possible actions would be helpful - may be ILCS offers some useful
> :>> interfaces.
>
> :>I will catch the 0C1 ...0C7 ... 0CB abends. Divide by zero, Data
> :>exception and s.o. Perhaps i can use an assembler routine. However i
> :>have not found the right Macro.
>
> Macros?
>
> You want macros?
>
> You can't handle macros!
>
> Look at (E)SPIE and (E)STAE
>
On IBM that's right. However i can only use ESTAE on IBM, because LE.
LE uses ESPIE as Default.
At first I have written an assembler programm which catch some
exceptions. But then I found there is an easier way in cobol, if I
call "CEEHDLR" and register my Exceptionhandler-routine. I can set a
recoverypoint with "CEESRP", call a dump with "CEE3DMP" ... call a
cobol programm which displays some values. It's the cobol
Display-programm, why i shall catch the exception.
On BS2000 there are the Macros STXIT, @STXEN und @STXDI. It seems
they work in the same way as ESTAE. I have found this yesterday.
The best is a class like the Condition Handling Callable Services on
OS390.
However i can't find such functions on BS2000/siemens.
jörg
|
|
|
|
|