Can someone explain why you wouldn't use the built-in restart capability?



-----Original Message-----
From: Raul Jager [mailto:raul@xxxxxxxxxx]
Sent: Wednesday, February 13, 2019 2:32 PM
To: midrange-l@xxxxxxxxxxxxxxxxxx
Subject: Re: ENDTCPSVR SERVER(*HTTP) HTTPSVR(BRCWEBLIVE) issue - instance jobs not ending

CL program segment to end qinter, you can change it to end (and restart
http)  After a delay I try to end the subsystem again, if it did not end yet I get a CPF 1055 and go back to wait.  tcpsvr very likely gives some other message that you need to monitor.

             SNDMSG     MSG('Dentro de 30 segundos la pantalla se +
                          desconectará por unos minutos') +
                          TOUSR(*ALLACT)                           
                                                                   
             ENDSBS     SBS(QINTER) DELAY(30)
 ESPERA:     DLYJOB     DLY(35)                                    
                                                                   
             ENDSBS     SBS(QINTER) DELAY(30)
             MONMSG     MSGID(CPF1055 CPF1056) EXEC(GOTO +
                          CMDLBL(ESPERA))
             MONMSG     MSGID(CPF1054)                             


This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact [javascript protected email address].