Hi all. I am trying to learn /FREE, but i have a roadblock:
In most of our programs, we call a program that emulates a window and shows stuff from an iseries table. The code is like this:
Fine, MOVE isn't supported, i can work around that, but i can't call the program UTPD12 from free, i get an error. I have read that for every program, i must declare a prototype or something, but really don't understand how to do so.
Could someone explain me, how can i call a program with parameters and without parameters from /free? I just wanted to do something like:
Thanks in advance.
In most of our programs, we call a program that emulates a window and shows stuff from an iseries table. The code is like this:
Code:
C MOVE '00114' PARM1 5 C MOVE *BLANKS PARM2 15 C MOVE *BLANKS PARM3 50 C CALL 'UTPD12' C PARM PARM1 C PARM PARM2 C PARM PARM3 C MOVE PARM2 CODPAR C MOVEL PARM3 DESPAR C ELSE C MOVE *BLANKS ACTIAR C MOVE *BLANKS ACARGU C Z-ADD 114 ACTIAR C MOVE CODPAR ACARGU 1 C KEYTAB CHAIN CTRALTAB 13 C N13 MOVEL ACFUNC DESPAR C 13 MOVE *BLANKS CODPAR
Could someone explain me, how can i call a program with parameters and without parameters from /free? I just wanted to do something like:
Code:
parm1=114; parm2=*BLANKS; parm3=*BLANKS; call utpd12(parm1:parm2:parm3); codpar=parm2; despar=parm3;
Comment