QSTRUP (Was: Passing numeric fields to COBOL program)

Gary Lehman <Gary_Lehman@mail.mchcp.org> wrote:

>Hello,
>
>This may be delving deep into the system, but has anyone ever edited the
>QSTRUP program in QGPL library?  It's the system start up and I had to
>modify it to call our START program so as to start TCP/IP and do STRHOSTSVR
>whenever we bring it down.  However, lately it seems like after it comes
>back up TCP/IP comes up but the Host servers do not.  Consequently, I have
>to start the servers manually.  Does anyone know where the messages go for
>QSTRUP so I can look at them?  I'd like to see if I could find out if its
>actually hitting certain parts of the CL.

The QSTRUP-program is INTENDED to be changed (Rather make a RTVCLSRC to a new
source in YOUR system's production-program-lib) and change it + the systemvalue

pointing to it.
I've never worked on an AS/400 where is was NOT changed, though you also can do
your start-up process via autostartjobs in the SBS's.

The log probably is somewhere in the joblog outq under a Q* name. I don't want 
to use half an hour to find it (doing an IPL), but change your new QSTRUP to 
end with an OVRPRTF to a known outq and then a DSPJOB *PRINT *JOBLOG. Also
change
the job to LOGCLPGM(*YES). That should give you the needed control.


Regards

Henrik Krebs

------------------------------------------------------------
Henrik Krebs
IT Consultant (IBM AS/400)
Phone +45 31 57 83 23
Mobile +45 40 88 83 23
Email: Henrik.Krebs@Scout.Net
Web: http://users.cybercity.dk/~dko3534
Snailmail: Amagerbrogade 62, 3-24, DK-2300 Copenhagen
------------------------------------------------------------
+---
| 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
+---