Good day.
I need help, I have a task to modify an old RPG program.
The modification means , that I need to adapt this to the call programm with other input parameters.
I have a problem.
In the first case, the program is called with 1 parameter in the form of a DS with 10 fields.
In the second case, the program is called with 10 other parameters, in the form of 10 variables.
When I call a program with DS, the parameters are passed correctly.
When the call is made with 10 parameters, the program does not work correctly.
I need help, I have a task to modify an old RPG program.
The modification means , that I need to adapt this to the call programm with other input parameters.
I have a problem.
In the first case, the program is called with 1 parameter in the form of a DS with 10 fields.
In the second case, the program is called with 10 other parameters, in the form of 10 variables.
Code:
DCPLYCPUFR2 PI D pDsInp_Output Options(*Omit:*NoPass) D likeds(DsInp_Output) D inName_From Options (*NoPass) like(CMDFRM) D inName_To Options(*NoPass) like(CMDTO) D inDate Options(*NoPass) like(CMDDTE) D inSQN Options(*NoPass) like(CMDSQN) D inCommand_Code Options(*NoPass) like(CMDCOD) D ioAnswer 1A Options(*NoPass) D ioResult 1A Options(*NoPass) D ioError Options(*NoPass) like(CMDERR) D ioChild_FROM 3A Options(*NoPass) D ioChild_Date 7S 0 Options(*NoPass) D ioChild_SQN 10P 0 Options(*NoPass)
When the call is made with 10 parameters, the program does not work correctly.
Comment