We had a similar issue when we upgraded from v7r1 to v7r3. Our issue was as others stated in v7r3 the call stack changed and we were using a fixed number for call stack entry(3) in the QMSHSNDPM so when we upgraded to v7r3 we had to change our applications using QMHSNDPM with the fixed number.

callp QMHSNDPM(' ':'QCPFMSG QSYS ':
'Message Data':65:'*INFO ':'* ': 3:MsgKey:vApiErrDS);

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Soucy, Michael
Sent: Thursday, August 02, 2018 9:53 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: caller-id program

What's strange about all of this is that it works fine on the LPAR that is still running V7R1, but on the LPAR that is running V7R3 it doesn't return the correct answer. Is the fact that I turned it into an external procedure the problem? The program uses the APIs QMHSNDPM and QMHRCVPM. I was thinking that one of the APIs must of changed in V7R3 which is causing my problem. I think I'll try the API QWVRCSTK like Buck suggested.

Mike

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
Sent: Thursday, August 02, 2018 9:29 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: caller-id program

IIRC....

The call stack has changed, so if the caller-id program was for instance looking back a fixed number of entries expecting a user program, it would now be seeing an IBM program/procedure there.

You'd probably want to modify it to look for first program that doesn't start with Q (and/or isn't in a Q-library)

Charles

On Wed, Aug 1, 2018 at 2:36 PM Soucy, Michael <MSoucy@xxxxxxxxxxx> wrote:

I seem to recall not too long ago someone posted a question regarding
the program called "caller-id" written by Lloyd Deviney from NEWS/400.
It was stated that there is an issue with this program working on
V7R3. I forgot to print off the solution to the problem. I've tried
searching the archives, but I can't find the answer. Is the issue
related to the APIs that are being called in this program? When I
Google "caller-id" I came across a question I had posted on the RPG
Café. One of the replies references a link to the original article
which doesn't seem to exist any more. Can someone please post a link to the solution to fixing this?

Michael Soucy
Sr. Programmer / Analyst
Community Health and Counseling Services
(207) 922-4837

****** CONFIDENTIALITY NOTICE ******

The documents accompanying this email contain confidential information
that may be legally privileged and protected by federal and state law.
This information is intended for use only by the entity or individual
to whom it is addressed. The authorized recipient is obligated to
maintain the information in a safe, secure, and confidential manner.
The authorized recipient is prohibited from using this information for
purposes other than intended, prohibited from disclosing this
information to any other party unless required to do so by law or
regulation, and is required to destroy the information after its stated need has been fulfilled.

If you are in possession of this protected health information, and are
not the intended recipient, you are hereby notified that any improper
disclosure, copying, or distribution of the contents of this
information is strictly prohibited. Please notify the owner of this
information immediately and arrange for its return or destruction. Thank You.
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

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

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD

This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2019 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].