Re: EXTPGM() in PR/PI

On 6/28/2013 11:22 AM, Booth Martin wrote:

That is exactly what I am trying to do. Although I Used "TargetProgram"
instead of "ThisProgram."

Where I have gone astray is that the program won't compile if there are
PI lines of code. If I comment them out, it compiles and runs just fine.

I am trying to call any one of dozens of different programs and get data
back. The application has a standard set of 10 parameters that are used
almost universally in the application as caller, as callee, and as both.

How about putting the parameters in a copy file like I suggested in a post a few minutes ago. Then, in the program that calls the other programs by variable, code this prototype:

D genericCall pr extpgm(targetProgram)
/copy STDPARMS

D targetProgram s 21a

I think that gives you the most protection against future programmer error.

We could argue about whether you should copy in the STDPARMS copy file for the PI's. I guess it would depend on how often you change the parameters, and how much other change would be required in each program when you did change the parameters.