Hi Chris,
This is indeed the issue I guess... the IBM API is sending info to program Y, which is no longer accessible when it returns to X.
I now changed program Y to use the receive message API since it is RPGLE (instead of X which was CLLE) and this works fine.
Kind regards,
Paul
________________________________________
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxx> on behalf of Hiebert, Chris <chris.hiebert@xxxxxxxxxxxxxx>
Sent: Monday, January 23, 2017 16:44
To: Midrange Systems Technical Discussion
Subject: RE: RCVMSG
Make sure you are sending messages to the proper call stack, usually the one that needs them is the one that will process them.
If procedure Y sends messages to its own call stack, they only show up in the job log while that procedure is active.
Once it is no longer active you won't be able to receive the messages.
Where is Y sending the messages?
Does Y call another sub procedure before it actually gets around to running the IBM API?
If Y sends messages to itself, you probably won't be able to receive them.
You may need to have Y send all its messages to X, then X can receive them by referencing itself in the API.
If Y is the procedure running the QMHSNDPM API, then you can use "*" as the call stack entry and 1 as the count. Which should send the message to X, assuming X calls Y.
Then X just needs to get the messages for the "*" call stack.
There are other values you could pass as the call stack entry when sending the messages.
You could also use CEE4FCB API to get a count of call stack entries back to a control boundary, which may help in determining how far up the stack from the caller (of the API) the message needs to be sent.
Chris Hiebert
Senior Programmer/Analyst
Disclaimer: Any views or opinions presented are solely those of the author and do not necessarily represent those of the company.
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Paul Nicolay
Sent: Monday, January 23, 2017 6:31 AM
To: midrange-l@xxxxxxxxxxxx
Subject: RCVMSG
Hi,
I just can't get it to work :-(
I have program Z which has two modules X (the PEP in CLLE) and Y (in RPGLE).
So, when calling Z it enters X which does a CALLPRC Y, which calls an IBM API that writes messages to the joblog.
Upon returning from Y, I'm trying to receive these messages in X... but I can't seem to find the right parameters to make it work.
Any tips ?
Thanks,
Paul
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/midrange-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
midrange.com
