You can trap cancels with ESTAE(X) but interfacing back to LE is not for the 
feint-hearted. Sx22's are "unrecoverable" (note the quotes -- you can do it, 
but it's not for the feint-hearted).

Charles

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Sam Siegel
Sent: Thursday, August 27, 2015 7:50 AM
To: [email protected]
Subject: Re: LE Condition Handler

On Thu, Aug 27, 2015 at 6:02 AM, Scott Ford <[email protected]> wrote:

> All:
>
> I need a sanity check on a design I am wanting to do. We have a Cobol 
> STC running with a Assembler Operator Interface, single thread.
> I understand I could redo in Assembler and multi-task, redo in C or 
> C++ and thread, but this isnt what I am looking for. Inside the STC we 
> maintain a secondary index of data items. If the Operator issues a 'P 
> ......'  or  'C ........' we will loose the secondary index. My idea 
> is to write a Cobol condition handler with TRAP(ON) in LE to capture 
> the S222 and at that time read the secondary index and write to disk. 
> I am just not sure of the steps in the Cobol.
>

Scott - Sorry to have to deliver the bad news.  LE condition handlers do not 
intercept Sx22 abends, even with TRAP(ON).  See the LE Programming guide 
(SA22-7561) chapter 15: TRAP Effects on the Condition Handling Process.

Sam



> I could write the condition handler in Assembler or C I dont care. My 
> object is not to loose this data..
>
> Any ideas,opinions are welcome and appreciated.
>
> Scott Ford
> www.idmworks.com
>
> ----------------------------------------------------------------------
> 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

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to