Re: Program won't let go of QRPLOBJ

[Vern Hamberg <vhamberg@xxxxxxxxxxx>]

Nice to know, Jon - so David should ignore my reply just now! 
Thunderbird threading can get weird sometimes - it's all about timing, 
as they say.

Vern

On 1/12/2011 7:49 AM, Jon Paris wrote:
> Yes.
>
> The pointer setting logic I described earlier is slightly different when a variable is used for the program name. In that case a test is made against the stored copy of the name and if it has changed the program is re-resolved. SO had the xyz program existed, the technique would work if you did a dummy call to the xyz version immediately followed by reinstating your MyPgm and doing the real call. You would then be connected to the "real" version.
>
> Jon Paris
>
> www.Partner400.com
> www.SystemiDeveloper.com
>
>
>
> On Jan 12, 2011, at 8:34 AM, midrange-l-request@xxxxxxxxxxxx wrote:
>
> > Ok I'm calling the program like this :
> >
> >
> > MYPGM = 'MyPgm';
> > CALL MYPGM
> >
> >
> > Program crashes and I replace 'MyPgm'. This has no effect as the job knows it must now use the version in QRPLOBJ.
> >
> > So, I debugged and did EVAL MYPGM ='xyz'
> > The program crashes because xyz does not exist.
> >
> > I change MYPGM back to 'MyPgm' hoping the pointer to MyPgm would be reresolved. Would this have worked if the program xyz had existed?