RE: SQL wrapper around service program -- RPG400-L

Hi All

Just a heads up on this subject. As I told you I reported a case at IBM. It took me some time to make them understand where the actual problem was and some time for them to find the answer, but in the end it all makes sense. The computer - once again - did exactly what it was told to do 😊

<quote>
Took some time but we have finally found that the issue is actually with your service programs.

PWSS_HSH is created with STGMDL(*INHERIT). Somewhere along the way the SQL invocation is requesting teraspace storage. Since has inherit, it allows it and proceeds. The issue occurs when it attempts to invoke the secondary service program. Both PCTS_HSH and PCTS_STR were created with STGMDL(*SNGLVL). They cannot run in the teraspace storage model and that is where the error occurs.

The error is happening at such a low level that it is not able to effectively percolate to the top under the current design. Resulting in a not found SQL error.

Changing the service programs with CHGSRVPGM STGMDL(*INHERIT) resolved the issue in our local recreate. In general, if one service program has inherit, all subsequent service programs should have inherit as well to prevent these types of activation errors.
</quote>

Thanks again for thinking with me and maybe somewhere someone runs into this problem and finds this answer in this invaluable archive.

Happy holidays to all of you!

Kind regards

Martijn van Breden
lead software architect

E-mail disclaimer

-----Oorspronkelijk bericht-----
Van: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> Namens Martijn van Breden
Verzonden: woensdag 23 november 2022 16:46
Aan: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Onderwerp: RE: SQL wrapper around service program

CAUTION: This email originated from outside of the organization. Do not click links or open attachments unless you recognize the sender and know the content is safe.

Hi Buck,

I agree with you that it has become quite a puzzle. I just entered a case for IBM. They tend to be able to look deeper into the system than us mere mortals.

Thanks again for thinking along with me. I will keep you updated on the solution

Kind regards,

Martijn van Breden
lead software architect
--

Pantheon Automatisering B.V.
T. 0513 657 357
M. 06 2075 2931

E-mail disclaimer

-----Oorspronkelijk bericht-----
Van: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> Namens Buck Calabro
Verzonden: woensdag 23 november 2022 12:39
Aan: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Onderwerp: Re: SQL wrapper around service program

CAUTION: This email originated from outside of the organization. Do not click links or open attachments unless you recognize the sender and know the content is safe.

On Wed, 23 Nov 2022 at 04:23, Martijn van Breden <m.vanbreden@xxxxxxxxxxxxxxxxxxxxxxxxxx> wrote:

What I've come to think as a result of your question is that the subprocedure in the service program is reading and updating some fields from a file that contains an encrypted value as well. It isn't touching the encrypted field but still. Could that cause behavior like this?

I don't have any encrypted columns, so no direct experience. But if the service program needs to call other subprocedures or programs in order to decrypt, or implement a trigger, or... anything - maybe it is one of these subsequent calls that is returning the 'not found'?

The ACS script runs under a server prestart job which has a job user of QUSER, and does a profile switch to your user. The 5250 job runs its entire life as your user. This is the only difference that I can think of between the two. If anything in the called code stack tests the user profile, it needs to make sure it uses the appropriate one.

You have quite a puzzle there, Martijn!
--buck
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com