From 27736587f956f5d006b5b44ad66268e0d54a3501 Mon Sep 17 00:00:00 2001
From: mar <mar>
Date: Tue, 1 Oct 1991 12:14:15 +0000
Subject: [PATCH] don't range limit users_id's when assigning new ones

---
 regtape/employee.dc | 9 +++++----
 regtape/students.dc | 9 +++++----
 2 files changed, 10 insertions(+), 8 deletions(-)

diff --git a/regtape/employee.dc b/regtape/employee.dc
index 78e129b5..e0f7c906 100644
--- a/regtape/employee.dc
+++ b/regtape/employee.dc
@@ -371,8 +371,8 @@ struct entry *e;
     strncpy(dept, e->dept, 12);
     dept[12] = 0;
     
-    id = set_next_object_id("users_id");
-    uid = set_next_object_id("uid");
+    id = set_next_object_id("users_id", 0);
+    uid = set_next_object_id("uid", 1);
     sprintf(login, "#%d", uid);
     last = e->last;
     first = e->first;
@@ -421,8 +421,9 @@ struct entry *e;
 ##}
 
 
-set_next_object_id(object)
+set_next_object_id(object, limit)
     char *object;
+    int limit;
 ##{
 ##  char *name;
 ##  int rowcount, exists, value;
@@ -444,7 +445,7 @@ set_next_object_id(object)
     }
     while (exists) {
 	value++;
-	if (value > MAX_ID_VALUE)
+	if (limit && value > MAX_ID_VALUE)
 	    value = MIN_ID_VALUE;
 ##	retrieve (exists = any(users.name where users.name = value))
     }
diff --git a/regtape/students.dc b/regtape/students.dc
index 9dd9a510..26a9289c 100644
--- a/regtape/students.dc
+++ b/regtape/students.dc
@@ -437,8 +437,8 @@ struct entry *e;
     strncpy(ophone, buf, 12);
     strncpy(dept, e->course, 12);
     
-    id = set_next_object_id("users_id");
-    uid = set_next_object_id("uid");
+    id = set_next_object_id("users_id", 0);
+    uid = set_next_object_id("uid", 1);
     sprintf(login, "#%d", uid);
     last = e->last;
     first = e->first;
@@ -487,8 +487,9 @@ struct entry *e;
 ##}
 
 
-set_next_object_id(object)
+set_next_object_id(object, limit)
     char *object;
+    int limit;
 ##{
 ##  char *name;
 ##  int rowcount, exists, value;
@@ -510,7 +511,7 @@ set_next_object_id(object)
     }
     while (exists) {
 	value++;
-	if (value > MAX_ID_VALUE)
+	if (limit && value > MAX_ID_VALUE)
 	    value = MIN_ID_VALUE;
 ##	retrieve (exists = any(users.name where users.name = value))
     }
-- 
2.45.2