Re: prototype with different type

What you are talking about is polymorphism. You write a routine for each
type and the compiler figures out which procedure to call based on the type
of parameter but RPG does not do polymorphism or at least I have never
heard of it.

The only way I could think of doing it to always pass as a string and
classify in the procedure.

A question. Why are you passing parameters as fixed length field?

dcl-proc writeb;
dcl-pi *N;
InDesc VarChar(50) Options(*Trim) Value;
In Val VarChar(250) Options(*Trim) Value;
end-pi;

Why process the entire field when you might only be using a few characters
of the string?

On Wed, Jan 24, 2018 at 11:26 AM, tim <iseriesstuff@xxxxxxxxx> wrote:

I use the following:

P writeb b
d writeb pi
d desc 50 const
d val 250 const

/free
write arec;
/end-free

P e

is it possible to define this so that it take any "type" as a second parm.
Then within the routine, determine what that parm type is and proceed as
needed.

writeb('desc1' : 'this is a string');
writeb('desc2' : 123.24);

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