RE: tomcat

Here's something I did so that it would be relatively easy to run multiple
Tomcat instances.  I created a library called TOMCAT and a job description
called TOMCAT in that library (to support all my lovely job characteristics)
and then the following command:


STRTOMCAT:  CMD        PROMPT('Start Tomcat Server')
            PARM       KWD(VERSION) TYPE(*CHAR) LEN(6) DFT('4.0.3') +
                         PROMPT('Tomcat Version')
            PARM       KWD(FLRPFX) TYPE(*CHAR) LEN(80) DFT(*STD) +
                         PROMPT('Folder Prefix')
            PARM       KWD(JOBD) TYPE(Q1) PROMPT('Job Description')
Q1:         QUAL       TYPE(*NAME) LEN(10) DFT(TOMCAT)
            QUAL       TYPE(*NAME) LEN(10) DFT(TOMCAT) +
                         PROMPT('Library')


 STRTOMCATC: PGM        (&version &prefix &jobd)
             dcl &version *char 6
             dcl &prefix  *char 80
             dcl &jobd    *char 20

             dcl &tomcat  *char 80
             dcl &cmd     *char 512
             dcl &jobdn   *char 10
             dcl &jobdl   *char 10

             if  (&prefix = '*STD') chgvar &prefix '/jakarta-tomcat-'
             chgvar &tomcat (&prefix *tcat &version *tcat '/')

             chgvar &jobdn %sst(&jobd 01 10)
             chgvar &jobdl %sst(&jobd 11 10)
             chgvar &cmd (&tomcat *tcat 'bin/catalina400.sh')

             SBMJOB     CMD(QSH CMD(&CMD)) JOB(STRTOMCAT) +
                          JOBD(&JOBDL/&JOBDN)

             endpgm

I created the comand to use STRTOMCATC as its CPP.  The default is to use
the default installation name of "/jakarta-tomcat-n.n.n", where n.n.n is the
version.  I then defaulted the version in the command.  You can create
another command to ENDTOMCAT.

Joe