From dae7c89e3e35a94fb2f6772f6d7f9379e76b57bb Mon Sep 17 00:00:00 2001
From: danw <danw>
Date: Wed, 15 Apr 1998 02:58:58 +0000
Subject: [PATCH] fix bugs in previous commit

---
 dcm/dcm.pc | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/dcm/dcm.pc b/dcm/dcm.pc
index 4a1018d3..3024a1ca 100644
--- a/dcm/dcm.pc
+++ b/dcm/dcm.pc
@@ -241,13 +241,13 @@ gen_cleanup:
 void do_hosts(char *service)
 {
   EXEC SQL BEGIN DECLARE SECTION;
-  char type[SERVERS_TYPE_SIZE], host[MACHINE_NAME_SIZE];
+  char type[SERVERS_TYPE_SIZE], host[MACHINE_NAME_SIZE], *name;
   char target[SERVERS_TARGET_FILE_SIZE], script[SERVERS_SCRIPT_SIZE];
   const char *errmsg;
   int status = 0, dfgen, replicated, mid;
   time_t now;
   EXEC SQL END DECLARE SECTION;
-  struct save_queue sq;
+  struct save_queue *sq;
 
   time(&now);
   mr_init();
@@ -293,11 +293,11 @@ void do_hosts(char *service)
 	  errmsg = error_message(status);
 	  EXEC SQL UPDATE serverhosts SET hosterrmsg = :errmsg,
 	    inprogress = 0, success = 0, ltt = :now
-	    WHERE service = UPPER(:service) AND mach_id = :mach_id;
+	    WHERE service = UPPER(:service) AND mach_id = :mid;
 	  if (!SOFT_FAIL(status))
 	    {
 	      EXEC SQL UPDATE serverhosts SET hosterror = :status
-		WHERE CURRENT OF csr_hst1;
+		WHERE service = UPPER(:service) AND mach_id = :mid;
 	      critical_alert("DCM", "DCM updating %s:%s: %s",
 			     service, name, errmsg);
 	    }
-- 
2.45.2