Call invocation

CALL ISPLINK('LMMREP  ',DDVAR,'MYPROG ');
OR
 
Set the program variable BUFFER to contain:
BUFFER = 'LMMREP DATAID(&DDVAR) MEMBER(MYPROG)';
Set the program variable BUFLEN to the length of the variable BUFFER. Issue the command:
CALL ISPEXEC (BUFLEN, BUFFER);