CALL ISPLINK('LMPRINT ',DDVAR,' ',' ','NO '); OR
BUFFER = 'LMPRINT DATAID(&DDVAR) FORMAT(NO)';
CALL ISPEXEC (BUFLEN, BUFFER);