From: mar <mar>
Date: Wed, 10 Mar 1993 15:26:44 +0000 (+0000)
Subject: put in better error checking and commit's between actions
X-Git-Tag: release77~201
X-Git-Url: http://andersk.mit.edu/gitweb/moira.git/commitdiff_plain/53308ec2dbdc0e3a83257d779c75c8a78d681533

put in better error checking and commit's between actions
---

diff --git a/regtape/sign.dc b/regtape/sign.dc
index e4fa5bd5..887a9370 100644
--- a/regtape/sign.dc
+++ b/regtape/sign.dc
@@ -57,6 +57,10 @@ char **argv;
      }
 
      EXEC SQL CONNECT moira;
+     if (sqlca.sqlcode != 0) {
+	 com_err(program, 0, "ingres error %d", sqlca.sqlcode);
+	 exit(1);
+     }
 
      sms = 0;
      EXEC SQL SELECT string_id INTO :sms FROM strings 
@@ -73,7 +77,15 @@ char **argv;
      EXEC SQL DECLARE c CURSOR FOR
        SELECT users_id, login, clearid
        FROM users WHERE signature = '';
+     if (sqlca.sqlcode != 0) {
+	 com_err(program, 0, "ingres error %d", sqlca.sqlcode);
+	 exit(1);
+     }
      EXEC SQL OPEN c;
+     if (sqlca.sqlcode != 0) {
+	 com_err(program, 0, "ingres error %d", sqlca.sqlcode);
+	 exit(1);
+     }
      while (1) {
 	 EXEC SQL FETCH c INTO :id, :login, :mid;
 	 if (sqlca.sqlcode != 0) break;
@@ -83,7 +95,8 @@ char **argv;
 	 sq_save_data(sq, strsave(buf));
 	 found++;
      }
-
+     EXEC SQL CLOSE c;
+     EXEC SQL COMMIT WORK;
      printf("Found %d users to sign.\n", found);
 
      si.rawsig = (unsigned char *) &rawsig[0];
@@ -117,6 +130,11 @@ char **argv;
 	 EXEC SQL REPEATED UPDATE users 
 	   SET signature = :rawsig, sigwho = :sms, sigdate = :timestamp
 	   WHERE users_id = :id;
+	 if (sqlca.sqlcode != 0) {
+	     com_err(program, 0, "ingres error %d", sqlca.sqlcode);
+	     exit(1);
+	 }
+	 EXEC SQL COMMIT WORK;
 	 if (wait) {
 	     printf("Next");
 	     fflush(stdout);