× 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.



Hi Paul,

>>My guess is that it is either Activation Groups, a PTF issue or something
in 
>>the code that we are not seeing :-)

This was my first idea. That's why we recompiled the RPGIV and RPGIII
programs.
After recompiling we started a new session to get an "empty" environment.
But no success!

>>Since it looks like you are working on converted RPG III programs my guess
is 
>>that you are compiling with DFTACTGRP(*YES) but, just in case, which AG is
the 
>>RPG IV program running in? Was DFTACTGRP(*YES) specified on the CRTBNDRPG
or 
>>was it DFTACTGRP(*NO) with ACTGRP(*CALLER)? MCH3601 usually crops up when
AGs 
>>are reclaimed or some such and MCH3601 will occur if you have a "true" ILE

>>program running in the default AG and do a RCLRSC.

I think we'd less problems if we would only use the default activation group
and no ILE.
But we use named activation groups for our programs (Activation group =
Program name)
We only have a few RPGIV programs. Only what we call from menu or 
command line or submit are programs. The rest is embedded in service
programs.
Most service programs run in the activation group *CALLER.
Some service programs that contain procedures that are called by almost
every program, 
have named activation groups.
We have a compile tool that determines the activation groups, creates
programs and service programs,
Adds service programs into binding directories, generates binding language
sources  
and other things depending on our naming conventions. 

I think our problem is, that we have about 30% of our application highly
modularized in ILE mode,
About 20% in OPM RPGIV with a few procedure calls.
And the rest is not yet converted. "Never change a running system!".
For us converting means redesigning. 

With the programmers it's the same thing, some of them can think modular, 
some others less and some others never will learn it.

I'll say thanks for help to everybody!
This week-end I'll test some different situations, may be I can find out
what happened.

Birgitta


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.