Did you try...
Specifies an external procedure that is written in ILE CL, or an RPG
procedure to be called by ILE CL. Use *CL if your program uses return
values with data types that CL handles differently from RPG. For
example, use *CL when prototyping an RPG procedure that is to be
called by a CL procedure when the return value is 1A.
on your RPG entry parm?
On Fri, Aug 8, 2008 at 1:07 PM, <GKern@xxxxxxxxxxxxxxxx> wrote:
I'm trying to call a procedure in a *SRVPGM that receives a one byte alpha
parameter. The procedure works when tested using RPGLE. But when I try to
use it with CALLPRC, in debug I can see the parameter received is hex FF.
The procedure doesn't return a value. I've coded the parameter in the CLLE
first as one byte and then as two bytes and tried multiple ways of
formatting it for the call but it's always received as one byte (hex FF).
I've also tried specifying *BYREF on the call. I'm current with PTF's at
What am I missing?
Gerald Kern - MIS Project Leader
Lotus Notes/Domino Administrator
IBM Certified RPG IV Developer
The Toledo Clinic, Inc.
4235 Secor Road
Toledo, OH 43623-4299
This e-mail message, including any attachments, is for the sole use of the
intended recipient(s) and may contain confidential and privileged
information. Any unauthorized use, disclosure or distribution is
prohibited. If you are not the intended recipient, please inform the
sender by reply e-mail and destroy this and all copies of this message.
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
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