Re: Program won't let go of QRPLOBJ -- MIDRANGE-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

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?

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.