Re: Program won't let go of QRPLOBJ

[Jon Paris <jon.paris@xxxxxxxxxxxxxx>]

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?