RE: Returning values with a procedure

I would probably recommend making that into two procedures. CanadianDuty and CanadianTariff. They are clearly distinct functions in their own right. However, I imagine that this is a question of code efficiency, and that you prefer to derive both values in a single pass.

Returning a DS containing multiple values *might* be ok, except that this adds complexity and overhead to your logic, requiring you to decode the individual values.

Easiest of all is to simply add two out parms to your PR and not make use of the return value features...
c callp CanadianDuty(parm1: parm2: parm3:
outCanDuty :outCanTariff)

hth,
Eric DeLong

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Booth Martin
Sent: Wednesday, May 21, 2008 10:12 AM
To: Midrange Systems Technical Discussion
Subject: Returning values with a procedure


Returning values with a procedure.

This is probably simple but I have never done it and can't find an
example of how to do it. I have an application that looks to me like it
should use procedures that will return values. Here is an example of
what I'd like to do:

c eval Duty = CanadianDuty(parm1: parm2: parm3)

and the procedure CanadianDuty would have 3 parameters as input and
return the value of the duty.

I believe I can do that process, but I *know* I have no idea how to do
the same thing where I need to return 2 values, say "Duty" and
"Tariff". I am sure this solution would be wrong! :)

c eval Duty = CanadianDuty(parm1: parm2: parm3)
c eval Tariff = CanadianDuty(parm1: parm2: parm3)

and this would also be wrong:

c eval Duty:Tariff = CanadianDuty(parm1: parm2: parm3)

Any pointers would be appreciated. Thanks.