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



Lim,

You might use work fields in SndMsgQ to 1) make the message variable length,
based on what is passed, 2) make up defaults to pass to SndMsg, and/or 3)
check for passed parameters and have several calls to SndMsg with different
*OMITS.

I think you are going to need to perform some extra work to make a call to
SndMsg work.  What is in SndMsg that makes it difficult to duplicate the
entire functionality into SndMsgQ?  It's probably just op-desc checking and
a call to the send program message API (right)?

When there is as much work involved in calling another function as there is
in the original function (big assumption here), then it probably needs to
just be duplicated. 

Thank you,
Matt Tyler
WinCo Foods, LLC
mattt@xxxxxxxxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Lim Hock-Chai
Sent: Tuesday, July 26, 2005 10:41 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: creating a new procedure that call an existing procedure
withone additional parm

In SndMsgQ, if I turn around and do callp SndMsg(MsgInId :MsgInData
:MsgInType :MsgFile :MsgLib :MsgInQueue), I will encounter the following 2
problems:
1) SndMsg uses CEEDOD (BTW: Reason for opdesc) to determine the actual
length of MsgInData.  In this case, it will always get a result of 32766
because that is what declared in SndMsgQ.
2) If caller only passes the first two required parms, the rest of the parm
fields may or may not be *null, which could cause problem in SndMsg.





-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of rob@xxxxxxxxx
Sent: Tuesday, July 26, 2005 11:19 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: creating a new procedure that call an existing procedure
withone additional parm


Yes, just have SndMsgQ do a 
SndMsg(..... and rearrange the parameters)
Or am I overlooking something?  (I've never used opdesc.)

Rob Berendt

As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.