Hp3000MpexXeqSearch < TWiki

PARM FILESET, FOR

##  SEARCH - USES MPEX 'PRINT' COMMAND TO SEARCH FILESET
##  TIM ERICSON

IF ( NUMERIC ("!FILESET") ) &
OR ( LFT ("!FILESET", 1) = "O" AND &
     NUMERIC ( RHT ("!FILESET", LEN ("!FILESET")-1) ) ) THEN
  RUN MAIN.PUB.VESOFT, MPEX; NOCB; PARM=1; PRI=ES; INFO= &
    "PRINT O!FILESET.OUT.HPSPOOL; SEARCH=CL '!FOR'; NUM"
  RETURN
ENDIF
RUN MAIN.PUB.VESOFT, MPEX; NOCB; PARM=1; PRI=ES; INFO= &
  "PRINT !FILESET; SEARCH=CL '!FOR'; KEEPAMDATES; NUM"

-- ChrisBartram - 09 Jun 2006

Topic Hp3000MpexXeqSearch . { Edit | Attach | Backlinks: Web All webs | Printable | History: r1 More }

Parents: WebHome > Hp3000CommandFiles > Hp3000MpexXeqs

Copyright © by the contributing authors. All material on this collaboration platform is the property of the contributing authors.
Ideas, requests, problems regarding TWiki? Send feedback
Note: Please contribute updates to this topic on TWiki.org at TWiki:TWiki.Hp3000MpexXeqSearch

	TWiki > TWiki > Hp3000CommandFiles > Hp3000MpexXeqs > Hp3000MpexXeqSearch	TWiki webs: Main \| TWiki \| Sandbox
	TWiki . { Welcome \| Register \| Changes \| Topics \| Index \| Search \| Go }