Friday, September 18, 2009

Using free-form RPG program to call another RPG program

If you get RNF3751 'External procedure on prototype for main procedure is not the same as actual external name' when trying to call an RPG using free format, check you procedure interface. Your PR and your PI need to match!

eg

For program myrpg01

d myrpg01 pr
d parm 1A

d myrpg01 pi
d parm 1A

then to call

either CALLP myrpg01('MYPARM');

or just

myrpg01('MYPARM');

No comments:

Post a Comment