Call invocation

CALL ISPLINK('LMMDISP ',
              DDVAR,
              'DISPLAY '
              'ISR* ',
              'YES     ',
              ' ',
              'ZCMD    ',
              ' ',
              ' ',
              ' ',
              'S       ',
              1);
OR

Set the program variable BUFFER to contain:

BUFFER = 'LMMDISP DATAID(&DDVAR)
          OPTION(DISPLAY)
          MEMBER(ISR*)
          STATS(YES)
          CURSOR(ZCMD)
          COMMANDS(S)
          FIELD(1)';

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

CALL ISPEXEC (BUFLEN,BUFFER);