Call invocation

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