add extra checks to prevent disabled but mistakenly "in progress"

services from getting run

diff --git a/dcm/dcm.pc b/dcm/dcm.pc
index 4520e9afaf5a150786cc125c2c3d92907be2727f..cda5f7aad2cee0c5cabfb7f2ed1b28fe99b7ec40 100644 (file)
--- a/dcm/dcm.pc
+++ b/dcm/dcm.pc
@@ -314,7 +314,7 @@ void do_hosts(char *service)
       EXEC SQL DECLARE csr_hst2 CURSOR FOR
        SELECT m.name, m.mach_id FROM machine m, serverhosts sh
        WHERE sh.service = UPPER(:service) AND sh.inprogress = 1
-       AND sh.mach_id = m.mach_id;
+       AND sh.enable = 1 AND sh.hosterror = 0 AND sh.mach_id = m.mach_id;
       EXEC SQL OPEN csr_hst2;
       sq = sq_create();