Re: PGMA calls PGMB calls PGMC question

[Chuck Morehead <cbmorehead@xxxxxxxxxx>]

Neeraj,

Why not have the called programs return a return code?  That way the calling
program can take whatever action is appropriate, e.g. ending.

Chuck

----- Original Message -----
From: <Neeraj.Verma@smed.com>
To: <MIDRANGE-L@midrange.com>
Sent: Tuesday, July 31, 2001 10:33 AM


>
> Hi,
>
> I have a very strange requirement and am not sure if there is any
solution.
> Problem is as follows:
>
> I have a call tree like PGMA-->PGMB-->PGMC. These programs can be a
mixture
> of OPM and ILE.
>
> I have created a menu and an interactive call to PGMA is attached as a
menu
> option. PGMA can be called either from Menu or Command line. During my
call
> to PGMA,  suppose PGMC has some error. I want to trap the error, show user
> a relevant message, kill all the call stack programs(PGMA, PGMB & PGMC)
> with no further processing and come back to same starting place(Menu or
> Command line). Is this possible? Is there a command or API to kill the
call
> within the job and return to same starting place? ENDRQS kills the call
> level but does not return to same starting place.
>
> Please let me know your suggestions.
>
> Thanks
> Neeraj
>
>
>
>
>
>
>
>
> --------------------------------------------------------------------------
-----
> This message and any included attachments are from Siemens Medical
Solutions
> Health Services Corporation and are intended only for the addressee(s).
> The information contained herein may include trade secrets or privileged
or
> otherwise confidential information.  Unauthorized review, forwarding,
printing,
> copying, distributing, or using such information is strictly prohibited
and may
> be unlawful.  If you received this message in error, or have reason to
believe
> you are not authorized to receive it, please promptly delete this message
and
> notify the sender by e-mail with a copy to CSOffice@smed.com.  Thank you
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---
>

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---