Re: NetServer startup during V4R3 IPL

[Diana Hicks <DianaH@xxxxxxxxxxxxx>]

Neil, thanks for your suggestion.  It was best since it simplified my
startup program.  I made the change this weekend and it worked perfectly.

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

Date: Tue, 13 Jul 1999 11:27:28 -0400
From: "Neil Palmer" <neilp@dpslink.com>
Subject: Re: NetServer startup during V4R3 IPL

As an alternative method to start TCP/IP (and supposedly the way IBM is
going to use as a default in future).

On your V4R3 system you will find an IBM supplied JOBD called QTOCSTRTCP.
Add an autostart job entry to QSYSWRK:
     ADDAJE SBSD(QSYSWRK) JOB(STRUPTCPIP) JOBD(QSYS/QTOCSTRTCP)

In the startup program, QSYSWRK starts when another subsystem is started.
Usually the QSTRUP had QSPL as first subsystem started.  You still need to
leave a delay for TCP/IP to start before starting QSERVER subsystem (which
includes the NetServer job):
     PGM
     DCL VAR(&STRWTRS) TYPE(*CHAR) LEN(1)
     DCL VAR(&CTLSBSD) TYPE(*CHAR) LEN(20)
     DCL VAR(&CPYR) TYPE(*CHAR) LEN(90) VALUE('5769-SS1 (C) COPYRIGHT-
          IBM CORP 1980, 1997. LICENSED MATERIAL - PROGRAM PROPERTY OF
IBM')

     MONMSG MSGID(CPF0000)

     CHGJOB     LOG(4 0 *SECLVL) LOGCLPGM(*YES)

     QSYS/STRSBS SBSD(QSPL)
     DLYJOB     DLY(60) /* Allow QSYSWRK subsystem & it's +
                    auto-start jobs (like TCP/IP - using JOBD +
                    QTOCSTRTCP) to start before QSERVER. */
     QSYS/STRSBS SBSD(QSERVER)
     ...

Neil Palmer         DPS Data Processing Services Canada Ltd.
                                             AS/400~~~~~
Markham,  Ontario,   Canada    ___________          ___  ~
Phone: (905) 474-4890  x303   |OOOOOOOOOO| ________  o|__||=
Cell.: (416) 565-1682  x303   |__________|_|______|_|______)
Fax:   (905) 474-4898          oo      oo   oo  oo   OOOo=o\
mailto:NeilP@DPSlink.com    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
http://www.DPSlink.com        AS/400  The Ultimate Business Server








Diana Hicks
Town of Jupiter
dianah@jupiter.fl.us


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---