Call invocation

CALL ISPLINK('LMMOVE  ',DDVAR,'MYPROG ',DDVAR2,' ','REPLACE ');
OR
 

Set the program variable BUFFER to contain:

BUFFER = 'LMMOVE FROMID(&DDVAR) FROMMEM(MYPROG)
                 TODATAID(&DDVAR2) REPLACE';

Set the program variable BUFLEN to the length of the variable BUFFER. Issue the command:

CALL ISPEXEC (BUFLEN, BUFFER);