CALL ISPLINK('LMQUERY ',DDVAR,'PRJV ','GRP1V ','GRP2V ',
'GRP3V ','GRP4V ','TYPEV ');
OR
BUFFER = 'LMQUERY DATAID(&DDVAR) PROJECT(PRJV) GROUP1(GRP1V)
GROUP2(GRP2V) GROUP3(GRP3V) GROUP4(GRP4V)
TYPE(TYPEV)';
CALL ISPEXEC (BUFLEN, BUFFER);