Re: Free form, calling another program to get a value

I'd create a prototype on the Definiton specifications and use OPTIONS(*NOPASS)

John McKay
www.rpglanguage.com

----- Original Message ----- From: "Booth Martin" <booth@xxxxxxxxxxxx>
To: "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, February 04, 2010 6:37 AM
Subject: Free form, calling another program to get a value

Free form, calling another program to get a value.

This must be simpler than I am making it. It has to be.

PROGA calls PROGB.

Sometimes there will be one parm sent, and one 20A value expected to be
returned.
Sometimes there will be _no_ parm sent, and no value expected to be
returned.
In fixed format I would have:

....
c call 'PROGB'
c parm Field20A
c else
c call 'PROGB'
c endif
-----------------------------------------

I have found several ways that don't work, and one klunky way that does
work. There has to be a better way.
--
This is the RPG programming on the IBM i / System i (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.