RE: Handling errors in CLLE programs

I think you might want to do the libl handling outside of your cl program.
Have a CL that changes the LIBL and calls your program and then resets the libl when the called program returns.
If you need the libl reset conditionally, have the called program set a parameter to a value that indicates the called cl program has executed successfully or not.


-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of smith5646midrange@xxxxxxxxx
Sent: Tuesday, September 13, 2022 12:37 PM
To: 'Midrange Systems Technical Discussion' <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: Handling errors in CLLE programs

I have a program that modifies the libl and then does processing. If the program errors, I want it to pop the message, wait for the response, and then if the program is "C"ancelled, I want the libl reset back to the original before it exits.



Is there something that I can put in the CL that will ALWAYS execute this "library reset" no matter how the program ends? I know I can MONMSG CPF0000 at the top of the CL but that seems to intercept the original error. I can probably retrieve the message and its text inside of the CPF0000 block and reissue it after the libl reset (I need the program to abend so it halts the job's flow) but I was just wondering if there was an easier way that I don't know about.



Thoughts?

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com