Anmelden

View Full Version : AutoStart ApplicationServer



Flappes
07-04-05, 15:54
Hallo Forum

Wie bekomme ich unter V5R2 beim Starten des HTTP-Servers hin, das er auch den zugehörigen Application Server starten ..
Unter V5R3 gibt es da eine Einstellung in der HTTP-Konfiguration.


gruss

tm1104
08-04-05, 07:24
Hallo,

anbei ein kleines CL, welches diese Aufgabe erledigt.

PGM

DCL VAR(&SERVER) TYPE(*CHAR) LEN(5) VALUE('WAS_1')

DCL VAR(&CMDBASE) TYPE(*CHAR) +
VALUE('/QIBM/ProdData/WebASE/ASE5/bin/Start+
Server -instance ')

DCL VAR(&CMD) TYPE(*CHAR) LEN(200)

CHGVAR VAR(&CMD) VALUE(&CMDBASE *CAT &SERVER *CAT ' +
' *CAT &SERVER)

STRSBS SBSD(QASE5/QASE5)
MONMSG MSGID(CPF0000)

DLYJOB DLY(30)
MONMSG MSGID(CPF0000)

QSH CMD(&CMD)
MONMSG MSGID(CPF0000)

STRTCPSVR SERVER(*HTTP) HTTPSVR(WAS_1)
MONMSG MSGID(CPF0000)

ENDPGM

So funktioniert das bei mir, wobei sowohl der HTTP-Server als auch der Application Server WAS_1 heissen.

Schöne Grüße

Thomas

Flappes
08-04-05, 08:41
Hallo Thomas

es funzt ... danke ...


gruss christian