It is helpful to the list if you share your resolution to the issue, what worked or didn't.
If the solution was outside the suggestions, comments or questions on the thread, someone else could benefit. (Even you, two years from now when you come across the same thing, lost track of your solution, and have the same issue).
If someone suggested a solution, we get the same effect.
Even if it's some stupid typo or a head-slapping "How did I miss that?!", a good chance we all have done it. The only perfect first-time every-time coders are not on this list. (Or any others)
--Alan
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of CRPence
Sent: Friday, November 08, 2013 12:10 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: [possible spam] Re: Sending Escape messages
Importance: Low
On 08-Nov-2013 06:57 -0800, RPGLIST wrote:
<<SNIP>>
0066.01 *** Escape Message Prototype Declaration
0066.02 D SendEscMsg pr extpgm('QMHSNDPM')
0066.03 D MsgId 7 const
0066.04 D MsgFile 20 const
0066.05 D MsgDta 80 const
0066.06 D MsgDtaLen 10i 0 const
0066.07 D MsgType 10 const
0066.08 D MsgQ 10 const
0066.09 D MsgQNbr 10i 0 const
0066.10 D MsgKey 4 const
0066.11 D ErrorDs 16 const
I realize the issue was resolved already, as noted in a reply; though with no explanation of what was changed. Regardless, FWiW...
From the docs, the last two (8th and 9th) parameters are:
8 Message key Output Char(4)
9 Error code I/O Char(*)
Thus the /const/ specification on each, seems amiss.
<<SNIP>>
--
Regards, Chuck
--
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:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--------------------------------------------------------------------------------
Confidentiality Notice: This email may contain confidential information or information covered under the Privacy Act, 5 USC 552(a), and/or the Health Insurance Portability and Accountability Act (PL 104-191) and its various implementing regulations and must be protected in accordance with those provisions. It contains information that is legally privileged, confidential or otherwise protected from use or disclosure. This e-mail message, including any attachments, is for the sole use of the intended recipient(s). Any unauthorized review, use, disclosure or distribution is prohibited. You, the recipient, are obligated to maintain it in a safe, secure and confidential manner. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. Thank you.
--------------------------------------------------------------------------------
midrange.com
