Call invocation

CALL ISPLINK('LMPRINT ',DDVAR,' ',' ','NO      ');

OR
 

Set the program variable BUFFER to contain:

BUFFER = 'LMPRINT DATAID(&DDVAR) FORMAT(NO)';

Set the program variable BUFLEN to the length of the variable BUFFER. Issue the command:

CALL ISPEXEC (BUFLEN, BUFFER);