Call invocation

CALL ISPLINK('LMOPEN  ',DDVAR,'INPUT   ',
                      'DLVAR ','RFVAR ',
                      'ORGVAR ');
OR
Set the program variable BUFFER to contain:
BUFFER = 'LMOPEN DATAID(&DDVAR) OPTION(INPUT)
                LRECL(DLVAR)   RECFM(RFVAR)
                ORG(ORGVAR)';
Set the program variable BUFLEN to the length of the variable BUFFER. Issue the command:
CALL ISPEXEC (BUFLEN, BUFFER);