Re: newbie prototype question...

I have never had any luck passing numeric parameters from the command 
line.  I always have to create another RPG program that calls the program 
with the desired values.  I'm guessing this is a conflict in parameter 
passing protocols between the command line and RPG.  Maybe the command 
interpreter passes parameters by value?

Hope this helps,
Adam





"Jake M" <jakeroc@xxxxxxxxx> 
Sent by: rpg400-l-bounces+aglauser=erbgroup.com@xxxxxxxxxxxx
28/03/2006 11:46 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
newbie prototype question...






I am trying to execute a simple prototype program but I keep getting an
error(it compiles fine). I am calling the program as follows:

CALL PGM(MYLIB/PROTO) PARM(1 2)

There might be a very simple mistake I am doing..I am also looking for a
very simple example on a subroutine program and a program which uses 
/COPY.
Any help in this matter will be greatly appreciated.

     D addnums         PR                  EXTPGM('PROTO')
     D  num1                          1  0
     D  num2                          1  0

     D addnums         PI
     D  num1                          1  0
     D  num2                          1  0


     D  num3           S              1  0

      /free
         num3 = num1 + num2;
         dsply num3;
         dsply 'DONE';
         *inlr = *on;
      /end-free

Error:

D
Pointer or parameter error (C G D F).

Thanks in advance,

Jake.