Rich Holloway wrote:
>
> Does anyone know of a product and/or have a process that will
> do a mass select of PowerHouse source files and compile them?
> I looked through the archives and could not find anything.  I
> know about naming, file equates, and all that, but if we could
> just hit most of them it would be a great help to our project.

Here's a snipped from out QDESIGN.COMPILE file, which was created
from a LISTF @.SOURCEQ,6.  This method also works for QUIZ and QTP
files, but not with interdependencies (like when a QTP pass uses
a subfile created by a QUIZ pass):

----------------------------------------------------------------

:print quick.compile

;***********************************************
; THIS FILE COMPILES ALL QUICK SCREENS.        *
; USE AS FOLLOWS:                              *
;                                              *
; :QDESIGN < QUICK.COMPILE > QUICKERR.TEMP     *
;                                              *
; :SEARCH QUICKERR.TEMP "ERRORS"               *
; :SEARCH QUICKERR.TEMP "*E*"                  *
;***********************************************

SET DICT PHD.DICT

USE SCHASHG.SOURCES NOLIST
USE SCHCALEN.SOURCES NOLIST
USE SCHCALON.SOURCES NOLIST
USE SCHEXCPT.SOURCES NOLIST
USE SCHMENU.SOURCES NOLIST
USE SCHMESGS.SOURCES NOLIST
USE SCHMNUC.SOURCES NOLIST
USE SCHMNUS.SOURCES NOLIST
USE SCHONCAL.SOURCES NOLIST
USE SCHTEMPL.SOURCES NOLIST
USE SCHTYPES.SOURCES NOLIST
USE SCHVACAT.SOURCES NOLIST
USE SCHWKDAY.SOURCES NOLIST

:
:help search
USER DEFINED COMMAND FILE:  SEARCH.XEQ.SYS

PARM FILESET, FOR
##  SEARCH - USES MPEX 'PRINT' COMMAND TO SEARCH FILESET
##  TIM ERICSON
IF NUMERIC ("!FILESET")
  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"

  +------------------------------------------------------------------+
   My mind is my own, as are my ideas and opinions.
   My heart, body, and soul, however, all belong to others.      Tim.
  +------------------------------------------------------------------+
   Tim Ericson            tericson     DenKor Dental Management Corp.
   Sr. Programmer/Analyst   at denkor    503-526-4440 (direct number)
     (& Systems Manager)      dot com        http://www.denkor.com
   Programming HP3000s since 1983!
  +------------------------------------------------------------------+