Re: Calling a program with more parameters than are defined

On 11/8/2017 2:18 PM, Justin Taylor wrote:

Overloading means you have multiple procedures with the same name, but different number and/or types of parameters. Which procedure you get depends on the parameters you specify on the call.

That's exactly how I handle Dan's situation.

Day 1: CREATE PROCEDURE MYPROC (parm1, parm2) external 'lib/mypgm'
Executing the SQL statement CALL MYPROC (:p1, :p2); invokes RPG
program MYPGM which has 2 parameters.

Day 9: CREATE PROCEDURE MYPROC (parm1, parm2, parm3) external 'lib/mypgm3'
Executing the SQL statement CALL MYPROC (:p1, :p2); invokes RPG
program MYPGM which has 2 parameters.
Executing the SQL statement CALL MYPROC (:p1, :p2, :p3); invokes RPG
program MYPGM3 which has 3 parameters.

Existing callers don't change, and new callers don't know they are
running a new program. Transplant the guts out of MYPGM and put them
into MYPGM3 and all you leave in MYPGM is a 3 parameter call to MYPGM3.
Which leaves the actual program logic in one place, with MYPGM as a
shell left behind for compatibility purposes.

I suspect if Dan could have done that, he wouldn't have been asking
about parameter lists, so I reckon his web team are using JT400 or
similar to directly CALL the RPG programs rather than use an SQL stored
procedure as the framework.