CALL ISPLINK('LMMDISP ', DDVAR ,'FREE '); OR
BUFFER = 'LMMDISP DATAID(&DDVAR) OPTION(FREE)';
CALL ISPEXEC (BUFLEN,BUFFER);