CALL ISPLINK('LMMDISP ', DDVAR,
'ADD ',
'NEWMEMB ',
' ',
' ',
' ',
' ',
' ',
'*NEWMEMB');
OR
BUFFER = 'LMMDISP DATAID(&DDVAR)
OPTION(ADD)
MEMBER(NEWMEMB)
ZLUDATA(*NEWMEMB)';
CALL ISPEXEC (BUFLEN,BUFFER);