%META:TOPICINFO{author="ChrisBartram" date="1149893700" format="1.1" version="1.1"}%
%META:TOPICPARENT{name="Hp3000MpexXeqs"}%
<pre>
PARM FILESET, FROMSTRING, TOSTRING, INCLUDING=" "

##  EDITQUAD - RUNS QUAD ON A FILESET - REQUIRES MPEX
##  TIM ERICSON

IF "!INCLUDING" = " "
  RUN MAIN.PUB.VESOFT,MPEX;NOCB;PARM=1;PRI=DS;&
    INFO="EDITQUAD !FILESET(FCONTAINS('!FROMSTRING'));&
          C'!FROMSTRING''!TOSTRING'A S"
ELSE
  RUN MAIN.PUB.VESOFT,MPEX;NOCB;PARM=1;PRI=DS;&
    INFO="EDITQUAD !FILESET(FCONTAINS('!INCLUDING'));&
          C'!FROMSTRING''!TOSTRING'A I'!INCLUDING' S"
ENDIF
</pre>



-- Main.ChrisBartram - 09 Jun 2006