CALL ISPLINK('LMMREP ',DDVAR,'MYPROG '); OR
BUFFER = 'LMMREP DATAID(&DDVAR) MEMBER(MYPROG)';
CALL ISPEXEC (BUFLEN, BUFFER);