RE: Procedure failing

Mark,
Overrides are normally scoped to the activation group - in fact, that's the
whole idea of AG's: to have more granular control of overrides.  If you
don't want this behaviour, change your overrides to OVRSCOPE(*JOB).  I would
be very cautious about this, because ACTGRP(*NEW) costs as much as creating
a new job does. 

When it comes to your problem with the service program, I guess we'd need to
start at the beginning.  How'd you  bind the service program to OEC690C?
What's OEC690C doing at statement 5912?  What's the call stack look like?
Does this program delete and re-create objects on the fly?  What's the AG of
the caller and the service program?  Which object is being flagged at
destroyed?

Buck Calabro
Aptis; Albany, NY

> -----Original Message-----
> From: Mark Walter 
> Sent: Tuesday, December 07, 1999 3:14 PM
> To:   RPG400-L@midrange.com
> Subject:      Re: Procedure failing
> 
> When I create a program with activation group *new, I seem to loose access
> to any shared access paths and overrides. Am I doing something wrong.
> 
        -----Original Message-----
        From: Mark Walter [mailto:mwalter@netrax.net]
        Sent: Tuesday, December 07, 1999 11:47 AM
        To: RPG400-L@midrange.com
        Subject: Procedure failing
        
        
        I have an ILE RPG program that contains a service program which
retrieves master file data. When I run this program for the first time
within an interactive job, the program works file. However, every subsequent
run will fail. Here are the messages I am receiving.
         
        Tried to refer to all or part of an object that no longer exists.

             Call stack entry not found.

             Exception recursion detected.

             Application error.  *N unmonitored by *N at statement *N,
instruction      
               X'4000'.

         Function check. CEE9901 unmonitored by OEC690C at statement 5912,

               instruction X'01E4'.

             CEE9901 received by OEC690C at 5912. (C D I R)

             CEE9901 received by OEC690C at 5912. (C D I R)     

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