]> andersk Git - moira.git/blobdiff - server/queries2.c
Allow hostname to start with a digit in hostname_check, but disallow it
[moira.git] / server / queries2.c
index 315578f6290abb40f17d3f4e8da96812d9866cff..a71f7a7a5fbb9647baf6ed25eaa090ee33d7560f 100644 (file)
-/* This file defines the query dispatch table for version 2 of the protocol
+/* $Id$
  *
- * $Header$
+ * This file defines the query dispatch table for version 2 of the protocol
  *
- * Copyright 1987, 1988 by the Massachusetts Institute of Technology.
+ * Copyright (C) 1987-1998 by the Massachusetts Institute of Technology.
  * For copying and distribution information, please see the file
  * <mit-copyright.h>.
  */
 
 #include <mit-copyright.h>
+#include "mr_server.h"
 #include "query.h"
-#include "mr_et.h"
-
-/* Specialized Support Query Routines */
-
-/* Special Access Check Routines */
-int access_user();
-int access_login();
-int access_list();
-int access_visible_list();
-int access_vis_list_by_name();
-int access_member();
-int access_qgli();
-int access_service();
-int access_filesys();
-int access_host();
-int access_ahal();
-
-/* Query Setup Routines */
-int prefetch_value();
-int prefetch_filesys();
-int setup_ausr();
-int setup_dusr();
-int setup_spop();
-int setup_dpob();
-int setup_dmac();
-int setup_dsnet();
-int setup_dclu();
-int setup_alis();
-int setup_dlis();
-int setup_dsin();
-int setup_dshi();
-int setup_afil();
-int setup_ufil();
-int setup_dfil();
-int setup_aftg();
-int setup_dnfp();
-int setup_dqot();
-int setup_sshi();
-int setup_akum();
-int setup_dsnt();
-int setup_ahst();
-int setup_ahal();
-
-/* Query Followup Routines */
-int followup_fix_modby();
-int followup_ausr();
-int followup_gpob();
-int followup_glin();
-int followup_aqot();
-int followup_dqot();
-int followup_gzcl();
-int followup_gsha();
-int followup_gqot();
-int followup_gpce();
-int followup_guax();
-int followup_uuac();
-int followup_gsnt();
-int followup_ghst();
-
-int set_modtime();
-int set_modtime_by_id();
-int set_finger_modtime();
-int set_pobox_modtime();
-int set_uppercase_modtime();
-int set_mach_modtime_by_id();
-int set_cluster_modtime_by_id();
-int set_serverhost_modtime();
-int set_nfsphys_modtime();
-int set_filesys_modtime();
-int set_zephyr_modtime();
-
-/* Special Queries */
-int set_pobox();
-int get_list_info();
-int add_member_to_list();
-int delete_member_from_list();
-int get_ace_use();
-int qualified_get_lists();
-int get_members_of_list();
-int get_end_members_of_list();
-int qualified_get_server();
-int qualified_get_serverhost();
-int trigger_dcm();
-int count_members_of_list();
-int get_lists_of_member();
-int register_user();
-int _sdl_followup();
-
-
-\f
-/* String compression
- * These are commonly used strings in the table, defined here so that
- * they can be shared.
- */
-
-static char ACE_NAME[] = "ace_name";
-static char ACE_TYPE[] = "ace_type";
-static char ADDRESS[] = "address";
-static char ALIAS[] = "alias";
-static char CLASS[] = "class";
-static char CLU_ID[] = "clu_id";
-static char CLUSTER[] = "cluster";
-static char COMMENTS[] = "comments";
-static char DESC[] = "description";
-static char DEVICE[] = "device";
-static char DIR[] = "dir";
-static char FILESYS[] = "filesys";
-static char FILSYS_ID[] = "filsys_id";
-static char FIRST[] = "firstname";
-static char LABEL[] = "label";
-static char LAST[] = "lastname";
-static char LIST[] = "list";
-static char LIST_ID[] = "list_id";
-static char LOCATION[] = "location";
-static char LOGIN[] = "login";
-static char MACH_ID[] = "mach_id";
-static char MACHINE[] = "machine";
-static char MIDDLE[] = "middle";
-static char MIT_ID[] = "clearid";
-static char MOD1[] = "modtime";
-static char MOD2[] = "modby";
-static char MOD3[] = "modwith";
-static char NAME[] = "name";
-static char QUOTA[] = "quota";
-static char QUOTA_TYPE[] = "quota_type";
-static char SECURE[] = "secure";
-static char SERVICE[] = "service";
-static char SHELL[] = "shell";
-static char SIGNATURE[] = "signature";
-static char SNET_ID[] = "snet_id";
-static char SUBNET[] = "subnet";
-static char STATUS[] = "status";
-static char TYPE[] = "type";
-static char USERS[] = "users";
-static char USERS_ID[] = "users_id";
-static char UID[] = "uid";
-
 
+#include "mr_et.h"
 
 /* VALOBJS
  * These are commonly used validation objects, defined here so that they
  * can be shared.
  */
 
-static struct valobj VOsort0[] = {
-  {V_SORT, 0},
-};
-
-static struct valobj VOwild0[] = {
-  {V_WILD, 0},
-};
-
-static struct valobj VOupwild0[] = {
-  {V_UPWILD, 0},
-};
-
-static struct valobj VOwild0sort[] = {
-  {V_WILD, 0},
-  {V_SORT, 0},
-};
-
-static struct valobj VOupwild0sort[] = {
-  {V_UPWILD, 0},
-  {V_SORT, 0},
-};
-
-static struct valobj VOwild01sort0[] = {
-  {V_WILD, 0},
-  {V_WILD, 1},
-  {V_SORT, 0},
-};
-
-static struct valobj VOwild01sort01[] = {
-  {V_WILD, 0},
-  {V_WILD, 1},
-  {V_SORT, 0},
-  {V_SORT, 1}, 
-};
-
-static struct valobj VOwild012sort0[] = {  /* get_alias */
-  {V_WILD, 0},
-  {V_WILD, 1},
-  {V_WILD, 2},
-  {V_SORT, 0},
-};
-
-static struct valobj VOdate1[] = {
-  {V_DATE, 1, 0, 0, 0, MR_DATE},
-};
-
 static struct valobj VOuser0[] = {
-  {V_ID, 0, USERS, LOGIN, USERS_ID, MR_USER},
-};
-
-static struct valobj VOuser0lock[] = {
-  {V_LOCK, 0, USERS, 0, USERS_ID, MR_DEADLOCK},
-  {V_ID, 0, USERS, LOGIN, USERS_ID, MR_USER},
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
 };
 
 static struct valobj VOmach0[] = {
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
+  {V_ID, 0, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
 };
 
 static struct valobj VOclu0[] = {
-  {V_ID, 0, CLUSTER, NAME, CLU_ID, MR_CLUSTER},
-};
-
-static struct valobj VOlist0[] = {
-  {V_ID, 0, LIST, NAME, LIST_ID, MR_LIST},
+  {V_ID, 0, CLUSTERS_TABLE, "name", "clu_id", MR_CLUSTER},
 };
 
-static struct valobj VOfilsys0[] = {
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
+static struct valobj VOsnet0[] = {
+  {V_ID, 0, SUBNET_TABLE, "name", "snet_id", MR_SUBNET},
 };
 
-static struct valobj VOchar0[] = {
-  {V_CHAR, 0},
-};
-
-static struct valobj VOsort01[] = {
-  {V_SORT, 1},
-  {V_SORT, 0},
+static struct valobj VOlist0[] = {
+  {V_ID, 0, LIST_TABLE, "name", "list_id", MR_LIST},
 };
 
-static struct valobj VOuser0sort[] = {
-  {V_ID, 0, USERS, LOGIN, USERS_ID, MR_USER},
-  {V_SORT, 0},
+static struct valobj VOfilesys0[] = {
+  {V_ID, 0, FILESYS_TABLE, "label", "filsys_id", MR_FILESYS},
 };
 
-static struct valobj VOfilsys0user1[] = {
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
-  {V_ID, 1, USERS, LOGIN, USERS_ID, MR_USER},
+static struct valobj VOnum0[] = {
+  {V_NUM, 0},
 };
 
-
 /* Validations
  * Commonly used validation records defined here so that they may
  * be shared.
  */
 
 static struct validate VDmach = { VOmach0, 1 };
-static struct validate VDsort0= { VOsort0, 1 };
-static struct validate VDwild0= { VOwild0, 1 };
-static struct validate VDupwild0= { VOupwild0, 1 };
-static struct validate VDsort2= { VOsort01,2 };
-static struct validate VDwild2sort2 = { VOwild01sort01,4 };
-static struct validate VDwild3sort1 = { VOwild012sort0,4 };
-static struct validate VDsortf = { 
-  VOsort0,
-  1,
-  0,
-  0,
-  0,
-  0,
-  0,
-  0,
-  followup_fix_modby,
-};
-
-static struct validate VDwildsortf = { 
-  VOwild0sort,
-  2,
-  0,
-  0,
-  0,
-  0,
-  0,
-  0,
-  followup_fix_modby,
-};
 
-static struct validate VDwild2sortf = { 
-  VOwild01sort01,
-  4,
+static struct validate VDfix_modby = {
   0,
   0,
   0,
   0,
   0,
   0,
-  followup_fix_modby,
-};
-
-static struct validate VDupwildsortf = { 
-  VOupwild0sort,
-  2,
-  0,
-  0,
-  0,
-  0,
   0,
   0,
   followup_fix_modby,
 };
 
-
-\f
 /* Query data */
 
 static char *galo_fields[] = {
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE,
+  "login", "unix_uid", "shell", "last", "first", "middle",
 };
 
 static char *gual_fields[] = {
-  LOGIN,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS,
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE, MOD1, MOD2, MOD3,
+  "login",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
+  "modtime", "modby", "modwith",
 };
 
 static char *gubl_fields[] = {
-  LOGIN,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, MOD1, MOD2, MOD3,
+  "login",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "modtime", "modby", "modwith",
 };
 
-static struct validate gubl_validate = 
+static struct validate gubl_validate =
 {
-  VOwild0sort,
-  2,
+  0,
+  0,
   0,
   0,
   0,
@@ -339,21 +98,23 @@ static struct validate gubl_validate =
 };
 
 static char *guau_fields[] = {
-  UID,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS,
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE, MOD1, MOD2, MOD3,
+  "unix_uid",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
+  "modtime", "modby", "modwith",
 };
 
 static char *guan_fields[] = {
-  FIRST, LAST,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS,
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE, MOD1, MOD2, MOD3,
+  "first", "last",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
+  "modtime", "modby", "modwith",
 };
 
-static struct validate guan_validate = 
+static struct validate guan_validate =
 {
-  VOwild01sort01,
-  4,
+  0,
+  0,
   0,
   0,
   0,
@@ -364,26 +125,28 @@ static struct validate guan_validate =
 };
 
 static char *guac_fields[] = {
-  CLASS,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS,
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE, MOD1, MOD2, MOD3,
+  "class",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
+  "modtime", "modby", "modwith",
 };
 
 static char *guam_fields[] = {
-  MIT_ID,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS,
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE, MOD1, MOD2, MOD3,
+  "clearid",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
+  "modtime", "modby", "modwith",
 };
 
 static char *gubu_fields[] = {
-  UID,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, MOD1, MOD2, MOD3,
+  "unix_uid",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "modtime", "modby", "modwith",
 };
 
-static struct validate gubu_validate = 
+static struct validate gubu_validate =
 {
-  VOsort0,
+  VOnum0,
   1,
   0,
   0,
@@ -395,15 +158,15 @@ static struct validate gubu_validate =
 };
 
 static char *gubn_fields[] = {
-  FIRST, LAST,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, MOD1, MOD2, MOD3,
+  "first", "last",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "modtime", "modby", "modwith",
 };
 
 static struct validate gubn_validate =
 {
-  VOwild01sort0,
-  3,
+  0,
+  0,
   0,
   0,
   0,
@@ -414,40 +177,43 @@ static struct validate gubn_validate =
 };
 
 static char *gubc_fields[] = {
-  CLASS,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, MOD1, MOD2, MOD3,
+  "class",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "modtime", "modby", "modwith",
 };
 
 static char *gubm_fields[] = {
-  MIT_ID,
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, MOD1, MOD2, MOD3,
+  "clearid",
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "modtime", "modby", "modwith",
 };
 
 static char *auac_fields[] = {
-  LOGIN, UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE,
+  "login", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
 };
 
 static struct valobj auac_valobj[] = {
-  {V_LOCK, 0, USERS, 0, USERS_ID, MR_DEADLOCK},
-  {V_CHAR, 0},
-  {V_CHAR, 3},
-  {V_CHAR, 4},
-  {V_CHAR, 5},
-  {V_CHAR, 7},
-  {V_TYPE, 8, CLASS, 0, 0, MR_BAD_CLASS},
-  {V_ID, 9, "strings", "string", "string_id", MR_NO_MATCH},
+  {V_CHAR, 0, USERS_TABLE, "login"},
+  {V_NUM, 1},
+  {V_CHAR, 2, USERS_TABLE, "shell"},
+  {V_CHAR, 3, USERS_TABLE, "last"},
+  {V_CHAR, 4, USERS_TABLE, "first"},
+  {V_CHAR, 5, USERS_TABLE, "middle"},
+  {V_NUM, 6},
+  {V_CHAR, 7, USERS_TABLE, "clearid"},
+  {V_TYPE, 8, 0, "class", 0, MR_BAD_CLASS},
+  {V_ID, 9, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
+  {V_NUM, 11},
 };
 
 static struct validate auac_validate = {
   auac_valobj,
-  8,
-  LOGIN,
-  "login = LEFT('%s',SIZE(login))",
+  11,
+  "login",
+  "login = '%s'",
   1,
-  USERS_ID,
+  "users_id",
   0,
   setup_ausr,
   followup_ausr,
@@ -455,30 +221,29 @@ static struct validate auac_validate = {
 
 static struct validate ausr_validate = {
   auac_valobj,
-  7,
-  LOGIN,
-  "login = LEFT('%s',SIZE(login))",  
+  9,
+  "login",
+  "login = '%s'",
   1,
-  USERS_ID,
+  "users_id",
   0,
   setup_ausr,
   followup_ausr,
 };
 
 static char *rusr_fields[] = {
-  UID, LOGIN, "fs_type"
-    };
+  "unix_uid", "login", "fs_type"
+};
 
 static struct valobj rusr_valobj[] = {
-  {V_LOCK, 0, USERS, 0, USERS_ID, MR_DEADLOCK},
-  {V_LOCK, 0, LIST, 0, LIST_ID, MR_DEADLOCK},
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_LOCK, 0, "nfsphys", 0, "nfsphys_id", MR_DEADLOCK},
+  {V_NUM, 0},
+  {V_CHAR, 1, USERS_TABLE, "login"},
+  {V_NUM, 2},
 };
 
 static struct validate rusr_validate = {
   rusr_valobj,
-  4,
+  3,
   0,
   0,
   0,
@@ -489,30 +254,33 @@ static struct validate rusr_validate = {
 };
 
 static char *uuac_fields[] = {
-  LOGIN,
-  "newlogin", UID, SHELL, LAST, FIRST, MIDDLE, STATUS, 
-  MIT_ID, CLASS, COMMENTS, SIGNATURE, SECURE,
+  "login",
+  "newlogin", "unix_uid", "shell", "last", "first", "middle", "status",
+  "clearid", "class", "comments", "signature", "secure",
 };
 
 static struct valobj uuac_valobj[] = {
-  {V_LOCK, 0, USERS, 0, USERS_ID, MR_DEADLOCK},
-  {V_ID, 0, USERS, LOGIN, USERS_ID, MR_USER},
-  {V_RENAME, 1, USERS, LOGIN, USERS_ID, MR_NOT_UNIQUE},
-  {V_CHAR, 4},
-  {V_CHAR, 5},
-  {V_CHAR, 6},
-  {V_CHAR, 8},
-  {V_TYPE, 9, CLASS, 0, 0, MR_BAD_CLASS},
-  {V_ID, 10, "strings", "string", "string_id", MR_NO_MATCH},
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_RENAME, 1, USERS_TABLE, "login", "users_id", MR_NOT_UNIQUE},
+  {V_NUM, 2},
+  {V_CHAR, 3, USERS_TABLE, "shell"},
+  {V_CHAR, 4, USERS_TABLE, "first"},
+  {V_CHAR, 5, USERS_TABLE, "last"},
+  {V_CHAR, 6, USERS_TABLE, "middle"},
+  {V_NUM, 7},
+  {V_CHAR, 8, USERS_TABLE, "clearid"},
+  {V_TYPE, 9, 0, "class", 0, MR_BAD_CLASS},
+  {V_ID, 10, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
+  {V_NUM, 12},
 };
 
 static struct validate uuac_validate = {
   uuac_valobj,
-  9,
+  12,
   0,
   0,
   0,
-  USERS_ID,
+  "users_id",
   0,
   setup_ausr,
   followup_uuac,
@@ -520,83 +288,73 @@ static struct validate uuac_validate = {
 
 static struct validate uusr_validate = {
   uuac_valobj,
-  8,
+  11,
   0,
   0,
   0,
-  USERS_ID,
+  "users_id",
   0,
   setup_ausr,
   set_modtime_by_id,
 };
 
 static char *uush_fields[] = {
-  LOGIN,
-  SHELL,
+  "login",
+  "shell",
+};
+
+static struct valobj uush_valobj[] = {
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_CHAR, 1, USERS_TABLE, "shell"},
 };
 
 static struct validate uush_validate = {
-  VOuser0lock,
+  uush_valobj,
   2,
   0,
   0,
   0,
-  USERS_ID,
+  "users_id",
   access_user,
   0,
-  set_modtime_by_id,
+  set_finger_modtime,
 };
 
 static char *uust_fields[] = {
-  LOGIN,
-  STATUS,
+  "login",
+  "status",
 };
 
 static char *uuss_fields[] = {
-  LOGIN,
-  SECURE,
+  "login",
+  "secure",
+};
+
+static struct valobj uust_valobj[] = {
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_NUM, 1},
+  {V_NUM, 2},
 };
 
 static struct validate uust_validate = {
-  VOuser0lock,
+  uust_valobj,
   2,
   0,
   0,
   0,
-  USERS_ID,
+  "users_id",
   0,
   0,
   set_modtime_by_id,
 };
 
 static char *dusr_fields[] = {
-  LOGIN,
+  "login",
 };
 
 static struct validate dusr_validate = {
-  VOuser0lock,
-  2,
-  0,
-  0,
-  0,
-  0,
-  0,
-  setup_dusr,
-  0,
-};
-
-static char *dubu_fields[] = {
-  UID,
-};
-
-static struct valobj dubu_valobj[] = {
-  {V_LOCK, 0, USERS, 0, USERS_ID, MR_DEADLOCK},
-  {V_ID, 0, USERS, UID, USERS_ID, MR_USER}
-};
-
-static struct validate dubu_validate = {
-  dubu_valobj,
-  2,
+  VOuser0,
+  1,
   0,
   0,
   0,
@@ -606,27 +364,27 @@ static struct validate dubu_validate = {
   0,
 };
 
-static char *gkum_fields[] = { LOGIN, "kerberos",
-                                  LOGIN, "kerberos" };
+static char *gkum_fields[] = { "login", "kerberos",
+                                  "login", "kerberos" };
 
-static char *akum_fields[] = { LOGIN, "kerberos" };
+static char *akum_fields[] = { "login", "kerberos" };
 
 static struct valobj akum_valobj[] =
 {
-  {V_ID, 0, USERS, LOGIN, USERS_ID, MR_USER},
-  {V_ID, 1, "strings", "string", "string_id", MR_NO_MATCH},
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_ID, 1, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
 };
 
 static struct validate akum_validate =
 {
   akum_valobj,
-  1,
-  USERS_ID,
+  2,
+  "users_id",
   "users_id = %d or string_id = %d",
   2,
-  USERS_ID,
+  "users_id",
   access_user,
-  setup_akum,
+  0,
   0,
 };
 
@@ -634,20 +392,20 @@ static struct validate dkum_validate =
 {
   akum_valobj,
   2,
-  USERS_ID,
+  "users_id",
   "users_id = %d and string_id = %d",
   2,
-  USERS_ID,
+  "users_id",
   access_user,
   0,
   0,
 };
 
 static char *gfbl_fields[] = {
-  LOGIN,
-  LOGIN, "fullname", "nickname", "home_addr",
-  "home_phone", "office_addr", "office_phone", "department", 
-  "affiliation", MOD1, MOD2, MOD3,
+  "login",
+  "login", "fullname", "nickname", "home_addr",
+  "home_phone", "office_addr", "office_phone", "department",
+  "affiliation", "modtime", "modby", "modwith",
 };
 
 static struct validate gfbl_validate = {
@@ -663,15 +421,27 @@ static struct validate gfbl_validate = {
 };
 
 static char *ufbl_fields[] = {
-  LOGIN,
+  "login",
   "fullname", "nickname", "home_addr",
-  "home_phone", "office_addr", "office_phone", "department", 
+  "home_phone", "office_addr", "office_phone", "department",
   "affiliation",
 };
 
+static struct valobj ufbl_valobj[] = {
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_LEN, 1, USERS_TABLE, "fullname"},
+  {V_LEN, 2, USERS_TABLE, "nickname"},
+  {V_LEN, 3, USERS_TABLE, "home_addr"},
+  {V_LEN, 4, USERS_TABLE, "home_phone"},
+  {V_LEN, 5, USERS_TABLE, "office_addr"},
+  {V_LEN, 6, USERS_TABLE, "office_phone"},
+  {V_LEN, 7, USERS_TABLE, "department"},
+  {V_LEN, 8, USERS_TABLE, "affiliation"},
+};
+
 static struct validate ufbl_validate = {
-  VOuser0lock,
-  2,
+  ufbl_valobj,
+  9,
   0,
   0,
   0,
@@ -682,15 +452,15 @@ static struct validate ufbl_validate = {
 };
 
 static char *gpob_fields[] = {
-  LOGIN,
-  LOGIN, TYPE, "box", MOD1, MOD2, MOD3,
+  "login",
+  "login", "type", "box", "modtime", "modby", "modwith",
 };
 
 static struct validate gpob_validate = {
   VOuser0,
   1,
   "potype",
-  "potype != 'NONE' and users_id=%d",
+  "potype != 'NONE' and users_id = %d",
   1,
   0,
   access_user,
@@ -699,7 +469,7 @@ static struct validate gpob_validate = {
 };
 
 static char *gpox_fields[] = {
-  LOGIN, TYPE, "box",
+  "login", "type", "box",
 };
 
 static struct validate gpox_validate = {
@@ -715,19 +485,18 @@ static struct validate gpox_validate = {
 };
 
 static char *spob_fields[] = {
-  LOGIN, TYPE, "box",
+  "login", "type", "box",
 };
 
 static struct valobj spob_valobj[] = {
-  {V_LOCK, 0, USERS, 0, USERS_ID, MR_DEADLOCK},
-  {V_ID, 0, USERS, LOGIN, USERS_ID, MR_USER},
-  {V_TYPE, 1, "pobox", 0, 0, MR_TYPE},
+  {V_ID, 0, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_TYPE, 1, 0, "pobox", 0, MR_TYPE},
 };
 
 static struct validate spob_validate = /* SET_POBOX */
 {
   spob_valobj,
-  3,
+  2,
   0,
   0,
   0,
@@ -739,8 +508,8 @@ static struct validate spob_validate =      /* SET_POBOX */
 
 static struct validate spop_validate = /* SET_POBOX_POP */
 {
-  VOuser0lock,
-  2,
+  VOuser0,
+  1,
   0,
   0,
   0,
@@ -752,8 +521,8 @@ static struct validate spop_validate =      /* SET_POBOX_POP */
 
 static struct validate dpob_validate = /* DELETE_POBOX */
 {
-  VOuser0lock,
-  2,
+  VOuser0,
+  1,
   0,
   0,
   0,
@@ -764,26 +533,21 @@ static struct validate dpob_validate =    /* DELETE_POBOX */
 };
 
 static char *gmac_fields[] = {
-  NAME,
-  NAME, TYPE, MOD1, MOD2, MOD3,
+  "name",
+  "name", "type", "modtime", "modby", "modwith",
 };
 
 static char *ghst_fields[] = {
-  NAME, ADDRESS, "location", "contact",
-  NAME, "vendor", "model", "os", "location", "contact", "use", "status", "status_change", SUBNET, ADDRESS, ACE_TYPE, ACE_NAME, "admin_comment", "ops_comment", "created", "creator", "inuse", MOD1, MOD2, MOD3,
-};
-
-static struct valobj ghst_valobj[] = {
-  {V_UPWILD, 0},
-  {V_UPWILD, 1},
-  {V_UPWILD, 2},
-  {V_UPWILD, 3},
-  {V_SORT, 0},
+  "name", "address", "location", "network",
+  "name", "vendor", "model", "os", "location", "contact", "use",
+  "status", "status_change", "network", "address", "ace_type",
+  "ace_name", "admin_comment", "ops_comment", "created", "creator",
+  "inuse", "modtime", "modby", "modwith",
 };
 
-static struct validate ghst_validate = { 
-  ghst_valobj,
-  5,
+static struct validate ghst_validate = {
+  0,
+  0,
   0,
   0,
   0,
@@ -794,80 +558,83 @@ static struct validate ghst_validate = {
 };
 
 static char *ahst_fields[] = {
-  NAME, "vendor", "model", "os", "location", "contact", "use", "status", SUBNET, ADDRESS, ACE_TYPE, ACE_NAME, "admin_comment", "ops_comment",
+  "name", "vendor", "model", "os", "location", "contact", "use",
+  "status", "subnet", "address", "ace_type", "ace_name",
+  "admin_comment", "ops_comment",
 };
 
 static struct valobj ahst_valobj[] = {
-  {V_CHAR, 0},
-  {V_CHAR, 1},
-  {V_CHAR, 2},
-  {V_CHAR, 3},
-  {V_CHAR, 4},
-  {V_LOCK, 0, MACHINE, 0, MACH_ID, MR_DEADLOCK},
-  {V_ID, 8, SUBNET, NAME, SNET_ID, MR_SUBNET},
-  {V_TYPE, 10, ACE_TYPE, 0, 0, MR_ACE},
+  {V_CHAR, 0, MACHINE_TABLE, "name"},
+  {V_CHAR, 1, MACHINE_TABLE, "vendor"},
+  {V_CHAR, 2, MACHINE_TABLE, "model"},
+  {V_CHAR, 3, MACHINE_TABLE, "os"},
+  {V_CHAR, 4, MACHINE_TABLE, "location"},
+  {V_CHAR, 5, MACHINE_TABLE, "contact"},
+  {V_NUM, 6},
+  {V_NUM, 7},
+  {V_ID, 8, SUBNET_TABLE, "name", "snet_id", MR_SUBNET},
+  {V_TYPE, 10, 0, "ace_type", 0, MR_ACE},
   {V_TYPEDATA, 11, 0, 0, 0, MR_ACE},
-  {V_ID, 12, "strings", "string", "string_id", MR_NO_MATCH},
-  {V_ID, 13, "strings", "string", "string_id", MR_NO_MATCH},
+  {V_ID, 12, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
+  {V_ID, 13, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
 };
 
 static struct validate ahst_validate = {
   ahst_valobj,
-  11,
-  NAME,
-  "name = uppercase(LEFT('%s',SIZE(name)))",
+  13,
+  "name",
+  "name = UPPER('%s')",
   1,
-  MACH_ID,
+  "mach_id",
   access_host,
   setup_ahst,
   set_uppercase_modtime,
 };
 
 static char *uhst_fields[] = {
-  NAME,
-  "newname", "vendor", "model", "os", "location", "contact", "use", "status", SUBNET, ADDRESS, ACE_TYPE, ACE_NAME, "admin_comment", "ops_comment",
+  "name",
+  "newname", "vendor", "model", "os", "location", "contact", "use",
+  "status", "subnet", "address", "ace_type", "ace_name",
+  "admin_comment", "ops_comment",
 };
 
 static struct valobj uhst_valobj[] = {
-  {V_CHAR, 0},
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_RENAME, 1, MACHINE, NAME, MACH_ID, MR_NOT_UNIQUE},
-  {V_CHAR, 2},
-  {V_CHAR, 3},
-  {V_CHAR, 4},
-  {V_CHAR, 5},
-  {V_LOCK, 0, MACHINE, 0, MACH_ID, MR_DEADLOCK},
-  {V_ID, 9, SUBNET, NAME, SNET_ID, MR_SUBNET},
-  {V_TYPE, 11, ACE_TYPE, 0, 0, MR_ACE},
+  {V_CHAR, 0, MACHINE_TABLE, "name"},
+  {V_ID, 0, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_RENAME, 1, MACHINE_TABLE, "name", "mach_id", MR_NOT_UNIQUE},
+  {V_CHAR, 2, MACHINE_TABLE, "vendor"},
+  {V_CHAR, 3, MACHINE_TABLE, "model"},
+  {V_CHAR, 4, MACHINE_TABLE, "os"},
+  {V_CHAR, 5, MACHINE_TABLE, "location"},
+  {V_CHAR, 6, MACHINE_TABLE, "contact"},
+  {V_NUM, 7},
+  {V_NUM, 8},
+  {V_ID, 9, SUBNET_TABLE, "name", "snet_id", MR_SUBNET},
+  {V_TYPE, 11, 0, "ace_type", 0, MR_ACE},
   {V_TYPEDATA, 12, 0, 0, 0, MR_ACE},
-  {V_ID, 13, "strings", "string", "string_id", MR_NO_MATCH},
-  {V_ID, 14, "strings", "string", "string_id", MR_NO_MATCH},
+  {V_ID, 13, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
+  {V_ID, 14, STRINGS_TABLE, "string", "string_id", MR_NO_MATCH},
 };
 
 static struct validate uhst_validate = {
   uhst_valobj,
-  13,
+  15,
   0,
   0,
   0,
-  MACH_ID,
+  "mach_id",
   access_host,
   setup_ahst,
   set_modtime_by_id,
 };
 
 static char *dhst_fields[] = {
-  NAME,
-};
-
-static struct valobj dhst_valobj[] = {
-  {V_LOCK, 0, MACHINE, 0, MACH_ID, MR_DEADLOCK},
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
+  "name",
 };
 
 static struct validate dhst_validate = {
-  dhst_valobj,
-  2,
+  VOmach0,
+  1,
   0,
   0,
   0,
@@ -878,149 +645,142 @@ static struct validate dhst_validate = {
 };
 
 static char *ghal_fields[] = {
-    ALIAS, "canonical_hostname",
-    ALIAS, "canonical_hostname"
-};
-
-static struct valobj ghal_valobj[] = {
-  {V_UPWILD, 0},
-  {V_UPWILD, 1},
-  {V_SORT, 0},
+  "alias", "canonical_hostname",
+  "alias", "canonical_hostname"
 };
 
 static struct validate ghal_validate = {
-  ghal_valobj,
-  3,
   0,
   0,
   0,
   0,
   0,
   0,
+  access_ahal,
+  0,
   0,
 };
 
 static struct valobj ahal_valobj[] = {
-  {V_CHAR, 0},
-  {V_UPWILD, 0},
-  {V_ID, 1, MACHINE, NAME, MACH_ID, MR_MACHINE},
+  {V_CHAR, 0, HOSTALIAS_TABLE, "name"},
+  {V_ID, 1, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
 };
 
 static struct validate ahal_validate = {
   ahal_valobj,
-  3,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",
+  2,
+  "name",
+  "name = UPPER('%s')",
   1,
-  MACH_ID,
+  "mach_id",
   access_ahal,
   setup_ahal,
   0,
 };
 
 static struct valobj dhal_valobj[] = {
-    {V_UPWILD, 0},
-    {V_LOCK, 0, MACHINE, 0, MACH_ID, MR_DEADLOCK},
-    {V_ID, 1, MACHINE, NAME, MACH_ID, MR_MACHINE},
+  {V_ID, 1, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
 };
 
 static struct validate dhal_validate = {
   dhal_valobj,
-  3,
-  NAME,
-  "name = LEFT('%s',SIZE(name)) AND mach_id = %d",
+  1,
+  "name",
+  "name = UPPER('%s') AND mach_id = %d",
   2,
-  MACH_ID,
+  "mach_id",
   access_ahal,
   0,
   0,
 };
 
 static char *gsnt_fields[] = {
-    NAME,
-    NAME, DESC, ADDRESS, "mask", "low", "high", ACE_TYPE, ACE_NAME,
-    MOD1, MOD2, MOD3
-};
-
-static struct valobj gsnt_valobj[] = {
-  {V_UPWILD, 0},
-  {V_SORT, 0},
+  "name",
+  "name", "description", "address", "mask", "low", "high", "prefix",
+  "ace_type", "ace_name", "modtime", "modby", "modwith"
 };
 
 static struct validate gsnt_validate = {
-  gsnt_valobj,
-  2,
   0,
   0,
   0,
   0,
   0,
   0,
+  access_snt,
+  0,
   followup_gsnt,
 };
 
 static char *asnt_fields[] = {
-    NAME, DESC, ADDRESS, "mask", "low", "high", ACE_TYPE, ACE_NAME,
+  "name", "description", "address", "mask", "low", "high", "prefix",
+  "ace_type", "ace_name",
 };
 
 static struct valobj asnt_valobj[] = {
-  {V_LOCK, 0, SUBNET, 0, SNET_ID, MR_DEADLOCK},
-  {V_CHAR, 0},
-  {V_TYPE, 6, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 7, 0, 0, 0, MR_ACE},
+  {V_CHAR, 0, SUBNET_TABLE, "name"},
+  {V_LEN, 1, SUBNET_TABLE, "description"},
+  {V_NUM, 2},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_NUM, 5},
+  {V_LEN, 6, SUBNET_TABLE, "prefix"},
+  {V_TYPE, 7, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 8, 0, 0, 0, MR_ACE},
 };
 
-static struct validate asnt_validate = 
+static struct validate asnt_validate =
 {
-    asnt_valobj,
-    4,
-    NAME,
-    "name = uppercase(LEFT('%s',SIZE(name))) OR description = '__'+'%s' OR saddr = '%s'",
-    3,
-    SNET_ID,
-    0,
-    prefetch_value,
-    set_uppercase_modtime,
+  asnt_valobj,
+  9,
+  "name",
+  "name = UPPER('%s')",
+  1,
+  "snet_id",
+  0,
+  prefetch_value,
+  set_uppercase_modtime,
 };
 
 static char *usnt_fields[] = {
-    NAME,
-    "newname", DESC, ADDRESS, "mask", "low", "high", ACE_TYPE, ACE_NAME,
+  "name",
+  "newname", "description", "address", "mask", "low", "high", "prefix",
+  "ace_type", "ace_name",
 };
 
 static struct valobj usnt_valobj[] = {
-  {V_LOCK, 0, SUBNET, 0, SNET_ID, MR_DEADLOCK},
-  {V_ID, 0, SUBNET, NAME, SNET_ID, MR_NO_MATCH},
-  {V_RENAME, 1, SUBNET, NAME, SNET_ID, MR_NOT_UNIQUE},
-  {V_TYPE, 7, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 8, 0, 0, 0, MR_ACE},
-};
-
-static struct validate usnt_validate = 
+  {V_ID, 0, SUBNET_TABLE, "name", "snet_id", MR_NO_MATCH},
+  {V_RENAME, 1, SUBNET_TABLE, "name", "snet_id", MR_NOT_UNIQUE},
+  {V_LEN, 2, SUBNET_TABLE, "description"},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_NUM, 5},
+  {V_NUM, 6},
+  {V_LEN, 7, SUBNET_TABLE, "prefix"},
+  {V_TYPE, 8, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 9, 0, 0, 0, MR_ACE},
+};
+
+static struct validate usnt_validate =
 {
-    usnt_valobj,
-    5,
-    NAME,
-    "snet_id = %d OR description = '__'+'%s' OR description = '__'+'%s' OR saddr = '%s'",
-    4,
-    SNET_ID,
-    0,
-    0,
-    set_modtime_by_id,
+  usnt_valobj,
+  10,
+  "name",
+  "snet_id = %d",
+  1,
+  "snet_id",
+  0,
+  0,
+  set_modtime_by_id,
 };
 
 static char *dsnt_fields[] = {
-  NAME,
-};
-
-static struct valobj dsnt_valobj[] = {
-  {V_LOCK, 0, SUBNET, 0, SNET_ID, MR_DEADLOCK},
-  {V_ID, 0, SUBNET, NAME, SNET_ID, MR_SUBNET},
+  "name",
 };
 
 static struct validate dsnt_validate = {
-  dsnt_valobj,
-  2,
+  VOsnet0,
+  1,
   0,
   0,
   0,
@@ -1031,57 +791,59 @@ static struct validate dsnt_validate = {
 };
 
 static char *gclu_fields[] = {
-  NAME,
-  NAME, DESC, LOCATION, MOD1, MOD2, MOD3, 
+  "name",
+  "name", "description", "location", "modtime", "modby", "modwith",
 };
 
 static char *aclu_fields[] = {
-  NAME, DESC, LOCATION,
+  "name", "description", "location",
 };
 
 static struct valobj aclu_valobj[] = {
-  {V_LOCK, 0, CLUSTER, 0, CLU_ID, MR_DEADLOCK},
-  {V_CHAR, 0}
+  {V_CHAR, 0, CLUSTERS_TABLE, "name"},
+  {V_LEN, 1, CLUSTERS_TABLE, "description"},
+  {V_LEN, 2, CLUSTERS_TABLE, "location"},
 };
 
-static struct validate aclu_validate = 
+static struct validate aclu_validate =
 {
   aclu_valobj,
-  2,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",
+  3,
+  "name",
+  "name = '%s'",
   1,
-  CLU_ID,
+  "clu_id",
   0,
   prefetch_value,
   set_modtime,
 };
 
 static char *uclu_fields[] = {
-  NAME,
-  "newname", DESC, LOCATION,
+  "name",
+  "newname", "description", "location",
 };
 
 static struct valobj uclu_valobj[] = {
-  {V_LOCK, 0, CLUSTER, 0, CLU_ID, MR_DEADLOCK},
-  {V_ID, 0, CLUSTER, NAME, CLU_ID, MR_CLUSTER},
-  {V_RENAME, 1, CLUSTER, NAME, CLU_ID, MR_NOT_UNIQUE},
+  {V_ID, 0, CLUSTERS_TABLE, "name", "clu_id", MR_CLUSTER},
+  {V_RENAME, 1, CLUSTERS_TABLE, "name", "clu_id", MR_NOT_UNIQUE},
+  {V_LEN, 2, CLUSTERS_TABLE, "description"},
+  {V_LEN, 3, CLUSTERS_TABLE, "location"},
 };
 
 static struct validate uclu_validate = {
   uclu_valobj,
-  3,
+  4,
   0,
   0,
   0,
-  CLU_ID,
+  "clu_id",
   0,
   0,
   set_modtime_by_id,
 };
 
 static char *dclu_fields[] = {
-  NAME,
+  "name",
 };
 
 static struct validate dclu_validate = {
@@ -1097,31 +859,21 @@ static struct validate dclu_validate = {
 };
 
 static char *gmcm_fields[] = {
-  MACHINE, CLUSTER,
-  MACHINE, CLUSTER,
-};
-
-static struct valobj gmcm_valobj[] =
-{
-  {V_UPWILD, 0},
-  {V_WILD, 1},
-  {V_SORT, 0},
-  {V_SORT, 1},
+  "machine", "cluster",
+  "machine", "cluster",
 };
 
-static struct validate gmcm_validate = { gmcm_valobj, 4 };
-
 static struct valobj amtc_valobj[] =   /* ADD_MACHINE_TO_CLUSTER */
 {                                      /* DELETE_MACHINE_FROM_CLUSTER */
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_ID, 1, CLUSTER, NAME, CLU_ID, MR_CLUSTER},
+  {V_ID, 0, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_ID, 1, CLUSTERS_TABLE, "name", "clu_id", MR_CLUSTER},
 };
 
 static struct validate amtc_validate = /* for amtc and dmfc */
 {
   amtc_valobj,
   2,
-  MACH_ID,
+  "mach_id",
   "mach_id = %d and clu_id = %d",
   2,
   0,
@@ -1131,27 +883,27 @@ static struct validate amtc_validate = /* for amtc and dmfc */
 };
 
 static char *gcld_fields[] = {
-  CLUSTER, "serv_label",
-  CLUSTER, "serv_label", "serv_cluster",
+  "cluster", "serv_label",
+  "cluster", "serv_label", "serv_cluster",
 };
 
 static char *acld_fields[] = {
-  CLUSTER, "serv_label", "serv_cluster",
+  "cluster", "serv_label", "serv_cluster",
 };
 
 static struct valobj acld_valobj[] =
 {
-  {V_ID, 0, CLUSTER, NAME, CLU_ID, MR_CLUSTER},
-  {V_CHAR, 1},
-  {V_CHAR, 2},
+  {V_ID, 0, CLUSTERS_TABLE, "name", "clu_id", MR_CLUSTER},
+  {V_CHAR, 1, SVC_TABLE, "serv_label"},
+  {V_CHAR, 2, SVC_TABLE, "serv_cluster"}
 };
 
-static struct validate acld_validate = 
-{                                      
+static struct validate acld_validate =
+{
   acld_valobj,
   3,
-  CLU_ID,
-  "clu_id = %d AND serv_label = '%s' AND serv_cluster = LEFT('%s',SIZE(serv_cluster))",
+  "clu_id",
+  "clu_id = %d AND serv_label = '%s' AND serv_cluster = '%s'",
   3,
   0,
   0,
@@ -1159,17 +911,11 @@ static struct validate acld_validate =
   set_cluster_modtime_by_id,
 };
 
-static struct valobj dcld_valobj[] =
+static struct validate dcld_validate =
 {
-  {V_ID, 0, CLUSTER, NAME, CLU_ID, MR_CLUSTER},
-  {V_CHAR, 2},
-};
-
-static struct validate dcld_validate = 
-{                                      
-  dcld_valobj,
-  2,
-  CLU_ID,
+  VOclu0,
+  1,
+  "clu_id",
   "clu_id = %d AND serv_label = '%s' AND serv_cluster = '%s'",
   3,
   0,
@@ -1178,976 +924,966 @@ static struct validate dcld_validate =
   set_cluster_modtime_by_id,
 };
 
-static char *gsin_fields[] = {
-  SERVICE,
-  SERVICE, "update_int", "target_file", "script", "dfgen", "dfcheck",
-  TYPE, "enable", "inprogress", "harderror", "errmsg",
-  ACE_TYPE, ACE_NAME, MOD1, MOD2, MOD3,
-};
-
-static struct valobj gsin_valobj[] =
-{
-  { V_UPWILD, 0 },
+static char *glin_fields[] = {
+  "name",
+  "name", "active", "publicflg", "hidden", "maillist", "grouplist", "gid",
+  "ace_type", "ace_name", "description", "modtime", "modby", "modwith",
 };
 
-static struct validate gsin_validate = 
-{
-  gsin_valobj,
-  1,
+static struct validate glin_validate = {
   0,
   0,
   0,
   0,
-  access_service,
+  0,
+  0,
+  access_vis_list_by_name,
   0,
   followup_glin,
 };
 
-static char *qgsv_fields[] = {
-  "enable", "inprogress", "harderror",
-  "service",
+static char *alis_fields[] = {
+  "name", "active", "publicflg", "hidden", "maillist", "grouplist", "gid",
+  "ace_type", "ace_name", "description",
 };
 
-static struct valobj qgsv_valobj[] = {
-  {V_TYPE, 0, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 1, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 2, "boolean", 0, 0, MR_TYPE},
+static struct valobj alis_valobj[] = {
+  {V_CHAR, 0, LIST_TABLE, "name"},
+  {V_NUM, 1},
+  {V_NUM, 2},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_NUM, 5},
+  {V_NUM, 6},
+  {V_TYPE, 7, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 8, 0, 0, "list_id", MR_ACE},
+  {V_LEN, 9, LIST_TABLE, "description"},
 };
 
-static struct validate qgsv_validate = {
-  qgsv_valobj,
-  3,
-  0,
-  0,
-  0,
-  0,
-  0,
+static struct validate alis_validate = {
+  alis_valobj,
+  10,
+  "name",
+  "name = '%s'",
+  1,
+  "list_id",
   0,
-  qualified_get_server,
+  setup_alis,
+  set_modtime,
 };
 
-static char *asin_fields[] = {
-  SERVICE, "update_int", "target_file", "script", TYPE, "enable",
-  ACE_TYPE, ACE_NAME,
+static char *ulis_fields[] = {
+  "name",
+  "newname", "active", "publicflg", "hidden", "maillist", "grouplist", "gid",
+  "ace_type", "ace_name", "description",
 };
 
-static struct valobj asin_valobj[] = {
-  {V_LOCK, 0, MACHINE, 0, MACH_ID, MR_DEADLOCK},
-  {V_CHAR, 0},
-  {V_TYPE, 4, "service", 0, 0, MR_TYPE},
-  {V_TYPE, 6, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 7, 0, 0, 0, MR_ACE},
+static struct valobj ulis_valobj[] = {
+  {V_ID, 0, LIST_TABLE, "name", "list_id", MR_LIST},
+  {V_RENAME, 1, LIST_TABLE, "name", "list_id", MR_NOT_UNIQUE},
+  {V_NUM, 2},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_NUM, 5},
+  {V_NUM, 6},
+  {V_NUM, 7},
+  {V_TYPE, 8, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 9, 0, 0, "list_id", MR_ACE},
+  {V_LEN, 10, LIST_TABLE, "description"},
 };
 
-static struct validate asin_validate = /* for asin, usin */
-{
-  asin_valobj,
-  5,
-  NAME,
-  "name = uppercase(LEFT('%s',SIZE(name)))",
+static struct validate ulis_validate = {
+  ulis_valobj,
+  11,
+  "name",
+  "list_id = %d",
   1,
-  0,
-  0,
-  0,
-  set_uppercase_modtime,
+  "list_id",
+  access_list,
+  setup_alis,
+  set_modtime_by_id,
 };
 
-static struct validate rsve_validate = {
-  asin_valobj,
+static char *dlis_fields[] = {
+  "name",
+};
+
+static struct validate dlis_validate = {
+  VOlist0,
   1,
-  NAME,
-  "name = uppercase('%s')",
+  "name",
+  "list_id = %d",
   1,
   0,
-  access_service,
+  access_list,
+  setup_dlis,
   0,
-  set_uppercase_modtime,
 };
 
-static char *ssif_fields[] = {
-  SERVICE, "dfgen", "dfcheck", "inprogress", "harderror", "errmsg",
+static char *amtl_fields[] = {
+  "list_name", "member_type", "member_name",
 };
 
-static struct validate ssif_validate = {
-  asin_valobj,
-  1,
-  NAME,
-  "name = uppercase('%s')",
-  1,
+static struct valobj amtl_valobj[] = {
+  {V_ID, 0, LIST_TABLE, "name", "list_id", MR_LIST},
+  {V_TYPE, 1, 0, "member", 0, MR_TYPE},
+  {V_TYPEDATA, 2, 0, 0, 0, MR_NO_MATCH},
+};
+
+static struct validate amtl_validate =
+{
+  amtl_valobj,
+  3,
   0,
   0,
   0,
   0,
+  access_list,
+  0,
+  add_member_to_list,
 };
 
-static char *dsin_fields[] = {
-  SERVICE,
-};
-
-static struct validate dsin_validate = {
-  asin_valobj,
-  1,
-  NAME,
-  "name = uppercase('%s')",
-  1,
+static struct validate dmfl_validate =
+{
+  amtl_valobj,
+  3,
   0,
   0,
-  setup_dsin,
   0,
+  0,
+  access_list,
+  0,
+  delete_member_from_list,
 };
 
-static char *gshi_fields[] = {
-  SERVICE, MACHINE,
-  SERVICE, MACHINE, "enable", "override", "success", "inprogress",
-  "hosterror", "hosterrormsg", "ltt", "lts", "value1", "value2",
-  "value3", MOD1, MOD2, MOD3, 
+static char *gaus_fields[] = {
+  "ace_type", "ace_name",
+  "use_type", "use_name",
 };
 
-static struct valobj gshi_valobj[] = {
-  { V_UPWILD, 0 },
-  { V_UPWILD, 1 },
+static struct valobj gaus_valobj[] = {
+  {V_TYPE, 0, 0, "gaus", 0, MR_TYPE},
+  {V_TYPEDATA, 1, 0, 0, 0, MR_NO_MATCH},
 };
 
-static struct validate gshi_validate = {
-  gshi_valobj,
+static struct validate gaus_validate = {
+  gaus_valobj,
   2,
   0,
   0,
   0,
   0,
-  access_service,
+  access_member,
   0,
-  followup_fix_modby,
+  get_ace_use,
 };
 
-static char *qgsh_fields[] = {
-  "service", "enable", "override", "success", "inprogress", "hosterror",
-  "service", MACHINE,
+static char *qgli_fields[] = {
+  "active", "publicflg", "hidden", "maillist", "grouplist",
+  "list",
 };
 
-static struct valobj qgsh_valobj[] = {
-  {V_TYPE, 1, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 2, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 3, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 4, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 5, "boolean", 0, 0, MR_TYPE},
+static struct valobj qgli_valobj[] = {
+  {V_TYPE, 0, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 1, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 2, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 3, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 4, 0, "boolean", 0, MR_TYPE},
 };
 
-static struct validate qgsh_validate = {
-  qgsh_valobj,
+static struct validate qgli_validate = {
+  qgli_valobj,
   5,
   0,
   0,
   0,
   0,
+  access_qgli,
   0,
-  0,
-  qualified_get_serverhost,
-};
-
-static char *ashi_fields[] = {
-  SERVICE, MACHINE, "enable", "value1", "value2", "value3",
+  qualified_get_lists,
 };
 
-static struct valobj ashi_valobj[] = {
-  {V_LOCK, 0, MACHINE, 0, MACH_ID, MR_DEADLOCK},
-  {V_NAME, 0, "servers", NAME, 0, MR_SERVICE},
-  {V_ID, 1, MACHINE, NAME, MACH_ID, MR_MACHINE},
+static char *gmol_fields[] = {
+  "list_name",
+  "member_type", "member_name",
 };
 
-static struct validate ashi_validate = /* ashi & ushi */
-{
-  ashi_valobj,
-  3,
-  SERVICE,
-  "service = uppercase(LEFT('%s',SIZE(service))) AND mach_id = %d",
-  2,
+static struct validate gmol_validate = {
+  VOlist0,
+  1,
   0,
-  access_service,
   0,
-  set_serverhost_modtime,
-};
-
-static struct validate rshe_validate = 
-{
-  ashi_valobj,
-  3,
-  SERVICE,
-  "service = uppercase('%s') AND mach_id = %d",
-  2,
   0,
-  access_service,
   0,
-  set_serverhost_modtime,
+  access_visible_list,
+  0,
+  get_members_of_list,
 };
 
-static struct validate ssho_validate = 
-{
-  ashi_valobj,
-  3,
-  SERVICE,
-  "service = uppercase('%s') AND mach_id = %d",
-  2,
+static struct validate geml_validate = {
+  VOlist0,
+  1,
   0,
-  access_service,
   0,
-  trigger_dcm,
+  0,
+  0,
+  access_visible_list,
+  0,
+  get_end_members_of_list,
 };
 
-static char *sshi_fields[] = {
-  "service", MACHINE, "override", "success", "inprogress",
-  "hosterror", "errmsg", "ltt", "lts",
+static char *glom_fields[] = {
+  "member_type", "member_name",
+  "list_name", "active", "publicflg", "hidden", "maillist", "grouplist",
 };
 
-static struct valobj sshi_valobj[] = {
-  {V_NAME, 0, "servers", NAME, 0, MR_SERVICE},
-  {V_ID, 1, MACHINE, NAME, MACH_ID, MR_MACHINE},  /** Was this ok to add? */
+static struct valobj glom_valobj[] = {
+  {V_TYPE, 0, 0, "rmember", 0, MR_TYPE},
+  {V_TYPEDATA, 1, 0, 0, 0, MR_NO_MATCH},
 };
 
-static struct validate sshi_validate = 
-{
-  sshi_valobj,
+static struct validate glom_validate = {
+  glom_valobj,
   2,
   0,
   0,
   0,
   0,
+  access_member,
   0,
-  setup_sshi,
-  0,
-};
-
-static char *dshi_fields[] = {
-  SERVICE, MACHINE,
-};
-
-static struct validate dshi_validate = 
-{
-  ashi_valobj,
-  3,
-  SERVICE,
-  "service = uppercase('%s') AND mach_id = %d",
-  2,
-  0,
-  access_service,
-  setup_dshi,
-  0,
+  get_lists_of_member,
 };
 
-static char *gsha_fields[] = {
-  MACHINE,
-  MACHINE, ACE_TYPE, ACE_NAME, MOD1, MOD2, MOD3,
+static char *cmol_fields[] = {
+  "list_name",
+  "count",
 };
 
-static struct validate gsha_validate = 
-{
-  VOupwild0,
+static struct validate cmol_validate = {
+  VOlist0,
   1,
   0,
   0,
   0,
   0,
+  access_visible_list,
   0,
-  0,
-  followup_gsha,
-};
-
-static char *asha_fields[] = {
-  MACHINE, ACE_TYPE, ACE_NAME,
+  count_members_of_list,
 };
 
-static struct valobj asha_valobj[] = {
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_TYPE, 1, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 2, 0, 0, 0, MR_ACE},
+static char *gsin_fields[] = {
+  "service",
+  "service", "update_int", "target_file", "script", "dfgen", "dfcheck",
+  "type", "enable", "inprogress", "harderror", "errmsg",
+  "ace_type", "ace_name", "modtime", "modby", "modwith",
 };
 
-static struct validate asha_validate = 
+static struct validate gsin_validate =
 {
-  asha_valobj,
-  3,
-  MACH_ID,
-  "mach_id = %d",
-  1,
-  MACH_ID,
-  0,
   0,
-  set_modtime_by_id,
-};
-
-static char *gslo_fields[] = {
-  "server",
-  "server", MACHINE,
-};
-
-static char *gfsl_fields[] = {
-  LABEL,
-  LABEL, TYPE, MACHINE, NAME, "mount", "access", COMMENTS, "owner", "owners",
-  "create", "lockertype", MOD1, MOD2, MOD3,
-};
-
-static char *gfsm_fields[] = {
-  MACHINE,
-  LABEL, TYPE, MACHINE, NAME, "mount", "access", COMMENTS, "owner", "owners",
-  "create", "lockertype", MOD1, MOD2, MOD3,
-};
-
-static struct validate gfsm_validate = {
-  VOmach0,
-  1,
   0,
   0,
   0,
   0,
   0,
+  access_service,
   0,
-  followup_fix_modby,
+  followup_glin,
 };
 
-static char *gfsn_fields[] = {
-  MACHINE, "parition",
-  LABEL, TYPE, MACHINE, NAME, "mount", "access", COMMENTS, "owner", "owners",
-  "create", "lockertype", MOD1, MOD2, MOD3,
+static char *qgsv_fields[] = {
+  "enable", "inprogress", "harderror",
+  "service",
 };
 
-static struct valobj gfsn_valobj[] =
-{
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_WILD, 1},
+static struct valobj qgsv_valobj[] = {
+  {V_TYPE, 0, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 1, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 2, 0, "boolean", 0, MR_TYPE},
 };
 
-static struct validate gfsn_validate = {
-  gfsn_valobj,
-  2,
+static struct validate qgsv_validate = {
+  qgsv_valobj,
+  3,
   0,
   0,
   0,
   0,
   0,
   0,
-  followup_fix_modby,
+  qualified_get_server,
 };
 
-static char *gfsp_fields[] = {
-  "path",
-  LABEL, TYPE, MACHINE, NAME, "mount", "access", COMMENTS, "owner", "owners",
-  "create", "lockertype", MOD1, MOD2, MOD3,
+static char *asin_fields[] = {
+  "service", "update_int", "target_file", "script", "type", "enable",
+  "ace_type", "ace_name",
 };
 
-static char *gfsg_fields[] = {
-  LIST,
-  LABEL, TYPE, MACHINE, NAME, "mount", "access", COMMENTS, "owner", "owners",
-  "create", "lockertype", MOD1, MOD2, MOD3,
+static struct valobj asin_valobj[] = {
+  {V_CHAR, 0, SERVERS_TABLE, "name"},
+  {V_NUM, 1},
+  {V_LEN, 2, SERVERS_TABLE, "target_file"},
+  {V_LEN, 3, SERVERS_TABLE, "script"},
+  {V_TYPE, 4, 0, "service", 0, MR_TYPE},
+  {V_NUM, 5},
+  {V_TYPE, 6, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 7, 0, 0, 0, MR_ACE},
 };
 
-static struct validate gfsg_validate = {
-  VOlist0,
+static struct validate asin_validate = /* for asin, usin */
+{
+  asin_valobj,
+  8,
+  "name",
+  "name = UPPER('%s')",
   1,
   0,
   0,
   0,
-  0,
-  access_list,
-  0,
-  followup_fix_modby,
-};
-
-static char *afil_fields[] = {
-  LABEL, TYPE, MACHINE, NAME, "mount", "access", COMMENTS, "owner", "owners",
-  "create", "lockertype",
-};
-
-static struct valobj afil_valobj[] = {
-  {V_CHAR, 0},
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_TYPE, 1, FILESYS, 0, 0, MR_FSTYPE},
-  {V_ID, 2, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_CHAR, 3},
-  {V_ID, 7, USERS, LOGIN, USERS_ID, MR_USER},
-  {V_ID, 8, LIST, NAME, LIST_ID, MR_LIST},
-  {V_TYPE, 10, "lockertype", 0, 0, MR_TYPE}
+  set_uppercase_modtime,
 };
 
-static struct validate afil_validate = {
-  afil_valobj,
-  8,
-  LABEL,
-  "label = LEFT('%s',SIZE(label))",
+static struct validate rsve_validate = {
+  asin_valobj,
+  1,
+  "name",
+  "name = UPPER('%s')",
   1,
-  FILSYS_ID,
   0,
-  setup_afil,
-  set_filesys_modtime,
+  access_service,
+  0,
+  set_uppercase_modtime,
 };
 
-static char *ufil_fields[] = {
-  LABEL, "newlabel", TYPE, MACHINE, NAME, "mount", "access", COMMENTS,
-  "owner", "owners", "create", "lockertype",
+static char *ssif_fields[] = {
+  "service", "dfgen", "dfcheck", "inprogress", "harderror", "errmsg",
 };
 
-static struct valobj ufil_valobj[] = {
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
-  {V_RENAME, 1, FILESYS, LABEL, FILSYS_ID, MR_NOT_UNIQUE},
-  {V_TYPE, 2, FILESYS, 0, 0, MR_FSTYPE},
-  {V_ID, 3, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_CHAR, 4},
-  {V_ID, 8, USERS, LOGIN, USERS_ID, MR_USER},
-  {V_ID, 9, LIST, NAME, LIST_ID, MR_LIST},
-  {V_TYPE, 11, "lockertype", 0, 0, MR_TYPE}
+static struct valobj ssif_valobj[] = {
+  {V_NAME, 0, SERVERS_TABLE, "name", 0, MR_SERVICE},
+  {V_NUM, 1},
+  {V_NUM, 2},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_LEN, 5, SERVERS_TABLE, "errmsg"},
 };
 
-static struct validate ufil_validate = {
-  ufil_valobj,
-  9,
-  LABEL,
-  "filsys_id = %d",
+static struct validate ssif_validate = {
+  ssif_valobj,
+  6,
+  "name",
+  "name = UPPER('%s')",
   1,
-  FILSYS_ID,
   0,
-  setup_ufil,
-  set_filesys_modtime,
-};
-
-static char *dfil_fields[] = {
-  LABEL,
+  0,
+  0,
+  0,
 };
 
-static struct valobj dfil_valobj[] = {
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
+static char *dsin_fields[] = {
+  "service",
 };
 
-static struct validate dfil_validate = {
-  dfil_valobj,
-  2,
-  "label",
-  "filsys_id = %d",
+static struct validate dsin_validate = {
+  asin_valobj,
+  1,
+  "name",
+  "name = UPPER('%s')",
   1,
   0,
   0,
-  setup_dfil,
+  setup_dsin,
   0,
 };
 
-static char *gfgm_fields[] = {
-  "fsgroup", FILESYS, "sortkey"
-    };
-
-static struct valobj gfgm_valobj[] = {
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
-  {V_SORT, 1},
-  {V_SORT, 0},
+static char *gshi_fields[] = {
+  "service", "machine",
+  "service", "machine", "enable", "override", "success", "inprogress",
+  "hosterror", "hosterrormsg", "ltt", "lts", "value1", "value2",
+  "value3", "modtime", "modby", "modwith",
 };
 
-static struct validate gfgm_validate = {
-  gfgm_valobj,
-  3,
+static struct validate gshi_validate = {
   0,
   0,
   0,
   0,
   0,
   0,
+  access_service,
   0,
+  followup_fix_modby,
 };
 
-static struct valobj aftg_valobj[] = {
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
-  {V_ID, 1, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
+static char *qgsh_fields[] = {
+  "service", "enable", "override", "success", "inprogress", "hosterror",
+  "service", "machine",
 };
 
-static struct validate aftg_validate = {
-  aftg_valobj,
-  3,
-  "group_id",
-  "group_id = %d and filsys_id = %d",
-  2,
+static struct valobj qgsh_valobj[] = {
+  {V_TYPE, 1, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 2, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 3, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 4, 0, "boolean", 0, MR_TYPE},
+  {V_TYPE, 5, 0, "boolean", 0, MR_TYPE},
+};
+
+static struct validate qgsh_validate = {
+  qgsh_valobj,
+  5,
   0,
   0,
   0,
   0,
+  0,
+  0,
+  qualified_get_serverhost,
 };
 
-static char *ganf_fields[] = {
-  MACHINE, DIR, DEVICE, STATUS, "allocated", "size", MOD1, MOD2, MOD3,
-};
-
-static char *gnfp_fields[] = {
-  MACHINE, DIR,
-  MACHINE, DIR, DEVICE, STATUS, "allocated", "size", MOD1, MOD2, MOD3,
+static char *ashi_fields[] = {
+  "service", "machine", "enable", "value1", "value2", "value3",
 };
 
-static struct valobj gnfp_valobj[] = {
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_WILD, 1},
+static struct valobj ashi_valobj[] = {
+  {V_NAME, 0, SERVERS_TABLE, "name", 0, MR_SERVICE},
+  {V_ID, 1, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_NUM, 2},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_LEN, 5, SERVERHOSTS_TABLE, "value3"},
 };
 
-static struct validate gnfp_validate = {
-  gnfp_valobj,
+static struct validate ashi_validate = /* ashi & ushi */
+{
+  ashi_valobj,
+  6,
+  "service",
+  "service = UPPER('%s') AND mach_id = %d",
   2,
   0,
+  access_service,
   0,
-  0,
-  0,
-  0,
-  0,
-  followup_fix_modby,
-};
-
-static struct valobj anfp_valobj[] = {
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_CHAR, 1},
+  set_serverhost_modtime,
 };
 
-static struct validate anfp_validate = {
-  anfp_valobj,
+static struct validate rshe_validate =
+{
+  ashi_valobj,
   2,
-  DIR,
-  "mach_id = %d and dir = LEFT('%s',SIZE(dir))",
+  "service",
+  "service = UPPER('%s') AND mach_id = %d",
   2,
-  "nfsphys_id",
   0,
-  prefetch_value,
-  set_nfsphys_modtime,
+  access_service,
+  0,
+  set_serverhost_modtime,
 };
 
-static struct validate unfp_validate = {
-  anfp_valobj,
+static struct validate ssho_validate =
+{
+  ashi_valobj,
   2,
-  DIR,
-  "mach_id = %d and dir = '%s'",
+  "service",
+  "service = UPPER('%s') AND mach_id = %d",
   2,
-  "nfsphys_id",
   0,
+  access_service,
   0,
-  set_nfsphys_modtime,
+  trigger_dcm,
 };
 
-static char *ajnf_fields[] = {
-  MACHINE, DIR, "adjustment",
+static char *sshi_fields[] = {
+  "service", "machine", "override", "success", "inprogress",
+  "hosterror", "errmsg", "ltt", "lts",
 };
 
-static char *dnfp_fields[] = {
-  MACHINE, DIR,
+static struct valobj sshi_valobj[] = {
+  {V_NAME, 0, SERVERS_TABLE, "name", 0, MR_SERVICE},
+  {V_ID, 1, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_NUM, 2},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_NUM, 5},
+  {V_LEN, 6, SERVERHOSTS_TABLE, "hosterrmsg"},
+  {V_NUM, 7},
+  {V_NUM, 8},
+};
+
+static struct validate sshi_validate =
+{
+  sshi_valobj,
+  9,
+  0,
+  0,
+  0,
+  0,
+  0,
+  0,
+  0,
 };
 
-static struct validate dnfp_validate = {
-  VOmach0,
-  1,
-  DIR,
-  "mach_id = %d and dir = '%s'",
+static char *dshi_fields[] = {
+  "service", "machine",
+};
+
+static struct validate dshi_validate =
+{
+  ashi_valobj,
+  2,
+  "service",
+  "service = UPPER('%s') AND mach_id = %d",
   2,
-  "nfsphys_id",
   0,
-  setup_dnfp,
-  set_nfsphys_modtime,
+  access_service,
+  setup_dshi,
+  0,
 };
 
-static char *gqot_fields[] = {
-  FILESYS, TYPE, NAME,
-  FILESYS, TYPE, NAME, QUOTA, DIR, MACHINE, MOD1, MOD2, MOD3,
+static char *gslo_fields[] = {
+  "server",
+  "server", "machine",
 };
 
-static struct valobj gqot_valobj[] = {
-  {V_WILD, 0},
-  {V_TYPE, 1, QUOTA_TYPE, 0, 0, MR_TYPE},
-  {V_TYPEDATA, 2, 0, 0, 0, MR_ACE},
-  {V_SORT, 0, 0, 0, 0, 0},
+static char *gfsl_fields[] = {
+  "label",
+  "label", "type", "machine", "name", "mount", "access", "comments",
+  "owner", "owners", "create", "lockertype", "modtime", "modby", "modwith",
 };
 
-static struct validate gqot_validate = {
-  gqot_valobj,
-  4,
+static char *gfsm_fields[] = {
+  "machine",
+  "label", "type", "machine", "name", "mount", "access", "comments",
+  "owner", "owners", "create", "lockertype", "modtime", "modby", "modwith",
+};
+
+static struct validate gfsm_validate = {
+  VOmach0,
+  1,
   0,
   0,
   0,
   0,
   0,
   0,
-  followup_gqot,
+  followup_fix_modby,
 };
 
-static char *gqbf_fields[] = {
-  FILESYS,
-  FILESYS, TYPE, NAME, QUOTA, DIR, MACHINE, MOD1, MOD2, MOD3,
+static char *gfsn_fields[] = {
+  "machine", "parition",
+  "label", "type", "machine", "name", "mount", "access", "comments",
+  "owner", "owners", "create", "lockertype", "modtime", "modby", "modwith",
 };
 
-static struct validate gqbf_validate = {
-  VOwild0sort,
-  2,
+static struct validate gfsn_validate = {
+  VOmach0,
+  1,
   0,
   0,
   0,
   0,
-  access_filesys,
   0,
-  followup_gqot,
+  0,
+  followup_fix_modby,
 };
 
-static char *aqot_fields[] = {
-  FILESYS, TYPE, NAME, QUOTA,
+static char *gfsp_fields[] = {
+  "path",
+  "label", "type", "machine", "name", "mount", "access", "comments",
+  "owner", "owners", "create", "lockertype", "modtime", "modby", "modwith",
 };
 
-static struct valobj aqot_valobj[] = {
-  {V_LOCK, 0, FILESYS, 0, FILSYS_ID, MR_DEADLOCK},
-  {V_ID, 0, FILESYS, LABEL, FILSYS_ID, MR_FILESYS},
-  {V_TYPE, 1, QUOTA_TYPE, 0, 0, MR_TYPE},
-  {V_TYPEDATA, 2, 0, 0, 0, MR_ACE},
+static char *gfsg_fields[] = {
+  "list",
+  "label", "type", "machine", "name", "mount", "access", "comments",
+  "owner", "owners", "create", "lockertype", "modtime", "modby", "modwith",
 };
 
-static struct validate aqot_validate = {
-  aqot_valobj,
-  4,
-  FILSYS_ID,
-  "filsys_id = %d and type = '%s' and entity_id = %d",
-  3,
+static struct validate gfsg_validate = {
+  VOlist0,
+  1,
   0,
   0,
-  prefetch_filesys,
-  followup_aqot,
-};
-
-static struct validate uqot_validate = {
-  aqot_valobj,
-  4,
-  FILSYS_ID,
-  "filsys_id = %d AND type = '%s' AND entity_id = %d",
-  3,
   0,
   0,
-  setup_dqot,
-  followup_aqot,
-};
-
-static struct validate dqot_validate = {
-  aqot_valobj,
-  4,
-  FILSYS_ID,
-  "filsys_id = %d AND type = '%s' AND entity_id = %d",
-  3,
-  0,
+  access_list,
   0,
-  setup_dqot,
-  followup_dqot,
+  followup_fix_modby,
 };
 
-static char *gnfq_fields[] = {
-  FILESYS, LOGIN,
-  FILESYS, LOGIN, QUOTA, DIR, MACHINE, MOD1, MOD2, MOD3,
+static char *afil_fields[] = {
+  "label", "type", "machine", "name", "mount", "access", "comments",
+  "owner", "owners", "create", "lockertype",
 };
 
-static struct validate gnfq_validate = {
-  VOwild0sort,
-  2,
-  0,
-  0,
-  0,
-  0,
-  access_filesys,
-  0,
-  followup_gqot,
+static struct valobj afil_valobj[] = {
+  {V_CHAR, 0, FILESYS_TABLE, "label"},
+  {V_TYPE, 1, 0, "filesys", 0, MR_FSTYPE},
+  {V_ID, 2, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_CHAR, 3, FILESYS_TABLE, "name"},
+  {V_LEN, 4, FILESYS_TABLE, "mount"},
+  {V_LEN, 5, FILESYS_TABLE, "rwaccess"},
+  {V_LEN, 6, FILESYS_TABLE, "comments"},
+  {V_ID, 7, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_ID, 8, LIST_TABLE, "name", "list_id", MR_LIST},
+  {V_NUM, 9},
+  {V_TYPE, 10, 0, "lockertype", 0, MR_TYPE},
 };
 
-static char *gnqp_fields[] = {
-  MACHINE, DIR,
-  FILESYS, LOGIN, QUOTA, DIR, MACHINE, MOD1, MOD2, MOD3,
+static struct validate afil_validate = {
+  afil_valobj,
+  11,
+  "label",
+  "label = '%s'",
+  1,
+  "filsys_id",
+  0,
+  setup_afil,
+  set_filesys_modtime,
 };
 
-static struct valobj gnqp_valobj[] = {
-  {V_ID, 0, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_WILD, 1},
+static char *ufil_fields[] = {
+  "label", "newlabel", "type", "machine", "name", "mount", "access",
+  "comments", "owner", "owners", "create", "lockertype",
 };
 
-static struct validate gnqp_validate = { gnqp_valobj, 2, };
-
-static char *anfq_fields[] = {
-  FILESYS, LOGIN, QUOTA,
+static struct valobj ufil_valobj[] = {
+  {V_ID, 0, FILESYS_TABLE, "label", "filsys_id", MR_FILESYS},
+  {V_RENAME, 1, FILESYS_TABLE, "label", "filsys_id", MR_NOT_UNIQUE},
+  {V_TYPE, 2, 0, "filesys", 0, MR_FSTYPE},
+  {V_ID, 3, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_CHAR, 4, FILESYS_TABLE, "name"},
+  {V_LEN, 5, FILESYS_TABLE, "mount"},
+  {V_LEN, 6, FILESYS_TABLE, "rwaccess"},
+  {V_LEN, 7, FILESYS_TABLE, "comments"},
+  {V_ID, 8, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_ID, 9, LIST_TABLE, "name", "list_id", MR_LIST},
+  {V_NUM, 10},
+  {V_TYPE, 11, 0, "lockertype", 0, MR_TYPE},
 };
 
-static struct validate anfq_validate = {
-  VOfilsys0user1,
-  3,
-  FILSYS_ID,
-  "filsys_id = %d AND type = 'USER' AND entity_id = %d",
-  2,
-  0, /* object ? */
+static struct validate ufil_validate = {
+  ufil_valobj,
+  12,
+  "label",
+  "filsys_id = %d",
+  1,
+  "filsys_id",
   0,
-  prefetch_filesys,
-  followup_aqot,
+  setup_ufil,
+  set_filesys_modtime,
 };
 
-static struct validate unfq_validate = {
-  VOfilsys0user1,
-  3,
-  FILSYS_ID,
-  "filsys_id = %d AND type = 'USER' AND entity_id = %d",
-  2,
-  0,
-  0,
-  setup_dqot,
-  followup_aqot,
+static char *dfil_fields[] = {
+  "label",
 };
 
-static struct validate dnfq_validate = {
-  VOfilsys0user1,
-  3,
-  FILSYS_ID,
-  "filsys_id = %d AND entity_id = %d",
-  2,
+static struct validate dfil_validate = {
+  VOfilesys0,
+  1,
+  "label",
+  "filsys_id = %d",
+  1,
   0,
   0,
-  setup_dqot,
-  followup_dqot,
+  setup_dfil,
+  0,
 };
 
-static char *glin_fields[] = {
-  NAME,
-  NAME, "active", "publicflg", "hidden", "maillist", "grouplist", "gid",
-  ACE_TYPE, ACE_NAME, DESC, MOD1, MOD2, MOD3,
+static char *gfgm_fields[] = {
+  "fsgroup", "filesys", "sortkey"
 };
 
-static struct validate glin_validate = {
+static struct validate gfgm_validate = {
+  VOfilesys0,
+  1,
   0,
   0,
   0,
   0,
   0,
   0,
-  access_vis_list_by_name,
   0,
-  get_list_info,
 };
 
-static char *alis_fields[] = {
-  NAME, "active", "publicflg", "hidden", "maillist", "grouplist", "gid",
-  ACE_TYPE, ACE_NAME, DESC,
-};
-
-static struct valobj alis_valobj[] = {
-  {V_LOCK, 0, LIST, 0, LIST_ID, MR_DEADLOCK},
-  {V_CHAR, 0},
-  {V_TYPE, 7, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 8, 0, 0, LIST_ID, MR_ACE},
+static struct valobj aftg_valobj[] = {
+  {V_ID, 0, FILESYS_TABLE, "label", "filsys_id", MR_FILESYS},
+  {V_ID, 1, FILESYS_TABLE, "label", "filsys_id", MR_FILESYS},
 };
 
-static struct validate alis_validate = {
-  alis_valobj,
-  4,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",
-  1,
-  LIST_ID,
+static struct validate aftg_validate = {
+  aftg_valobj,
+  2,
+  "group_id",
+  "group_id = %d and filsys_id = %d",
+  2,
+  0,
   0,
-  setup_alis,
-  set_modtime,
-};
-
-static char *ulis_fields[] = {
-  NAME,
-  "newname", "active", "publicflg", "hidden", "maillist", "grouplist", "gid",
-  ACE_TYPE, ACE_NAME, DESC,
-};
-
-static struct valobj ulis_valobj[] = {
-  {V_LOCK, 0, LIST, 0, LIST_ID, MR_DEADLOCK},
-  {V_ID, 0, LIST, NAME, LIST_ID, MR_LIST},
-  {V_RENAME, 1, LIST, NAME, LIST_ID, MR_NOT_UNIQUE},
-  {V_TYPE, 8, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 9, 0, 0, LIST_ID, MR_ACE},
-};
-
-static struct validate ulis_validate = {
-  ulis_valobj,
-  5,
-  NAME,
-  "list_id = %d",
-  1,
-  LIST_ID,
-  access_list,
-  setup_alis,
-  set_modtime_by_id,
-};
-
-static char *dlis_fields[] = {
-  NAME,
-};
-
-static struct validate dlis_validate = {
-  VOlist0,
-  1,
-  NAME,
-  "list_id = %d",
-  1,
   0,
-  access_list,
-  setup_dlis,
   0,
 };
 
-static char *amtl_fields[] = {
-  "list_name", "member_type", "member_name",
+static char *ganf_fields[] = {
+  "machine", "dir", "device", "status", "allocated", "size",
+  "modtime", "modby", "modwith",
 };
 
-static struct valobj amtl_valobj[] = {
-  {V_LOCK, 0, LIST, 0, LIST_ID, MR_DEADLOCK},
-  {V_ID, 0, LIST, NAME, LIST_ID, MR_LIST},
-  {V_TYPE, 1, "member", 0, 0, MR_TYPE},
-  {V_TYPEDATA, 2, 0, 0, 0, MR_NO_MATCH},
+static char *gnfp_fields[] = {
+  "machine", "dir",
+  "machine", "dir", "device", "status", "allocated", "size",
+  "modtime", "modby", "modwith",
 };
 
-static struct validate amtl_validate =
-{
-  amtl_valobj,
-  4,
+static struct validate gnfp_validate = {
+  VOmach0,
+  1,
   0,
   0,
   0,
   0,
-  access_list,
   0,
-  add_member_to_list,
+  0,
+  followup_fix_modby,
 };
 
-static struct validate dmfl_validate =
-{
-  amtl_valobj,
-  4,
-  0,
-  0,
+static struct valobj anfp_valobj[] = {
+  {V_ID, 0, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_CHAR, 1, NFSPHYS_TABLE, "dir"},
+  {V_LEN, 2, NFSPHYS_TABLE, "device"},
+  {V_NUM, 3},
+  {V_NUM, 4},
+  {V_NUM, 5},
+};
+
+static struct validate anfp_validate = {
+  anfp_valobj,
+  6,
+  "dir",
+  "mach_id = %d and dir = '%s'",
+  2,
+  "nfsphys_id",
   0,
+  prefetch_value,
+  set_nfsphys_modtime,
+};
+
+static struct validate unfp_validate = {
+  anfp_valobj,
+  6,
+  "dir",
+  "mach_id = %d and dir = '%s'",
+  2,
+  "nfsphys_id",
   0,
-  access_list,
   0,
-  delete_member_from_list,
+  set_nfsphys_modtime,
 };
 
-static char *gaus_fields[] = {
-  ACE_TYPE, ACE_NAME,
-  "use_type", "use_name",
+static char *ajnf_fields[] = {
+  "machine", "dir", "adjustment",
 };
 
-static struct valobj gaus_valobj[] = {
-  {V_TYPE, 0, "gaus", 0, 0, MR_TYPE},
-  {V_TYPEDATA, 1, 0, 0, 0, MR_NO_MATCH},
+static struct valobj ajnf_valobj[] = {
+  {V_ID, 0, MACHINE_TABLE, NAME, "mach_id", MR_MACHINE},
+  {V_CHAR, 1, NFSPHYS_TABLE, "dir"},
+  {V_NUM, 2},
 };
 
-static struct validate gaus_validate = {
-  gaus_valobj,
+static struct validate ajnf_validate = {
+  ajnf_valobj,
+  3,
+  "dir",
+  "mach_id = %d and dir = '%s'",
   2,
+  "nfsphys_id",
   0,
   0,
+  set_nfsphys_modtime,
+};
+
+static char *dnfp_fields[] = {
+  "machine", "dir",
+};
+
+static struct validate dnfp_validate = {
+  anfp_valobj,
+  2,
+  "dir",
+  "mach_id = %d and dir = '%s'",
+  2,
+  "nfsphys_id",
   0,
-  0,
-  access_member,
-  0,
-  get_ace_use,
+  setup_dnfp,
+  set_nfsphys_modtime,
 };
 
-static char *qgli_fields[] = {
-  "active", "publicflg", "hidden", "maillist", "grouplist",
-  "list",
+static char *gqot_fields[] = {
+  "filesys", "type", "name",
+  "filesys", "type", "name", "quota", "dir", "machine",
+  "modtime", "modby", "modwith",
 };
 
-static struct valobj qgli_valobj[] = {
-  {V_TYPE, 0, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 1, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 2, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 3, "boolean", 0, 0, MR_TYPE},
-  {V_TYPE, 4, "boolean", 0, 0, MR_TYPE},
+static struct valobj gqot_valobj[] = {
+  {V_TYPE, 1, 0, "quota_type", 0, MR_TYPE},
+  {V_TYPEDATA, 2, 0, 0, 0, MR_ACE},
 };
 
-static struct validate qgli_validate = {
-  qgli_valobj,
-  5,
+static struct validate gqot_validate = {
+  gqot_valobj,
+  2,
   0,
   0,
   0,
   0,
-  access_qgli,
   0,
-  qualified_get_lists,
+  0,
+  followup_gqot,
 };
 
-static char *gmol_fields[] = {
-  "list_name",
-  "member_type", "member_name",
+static char *gqbf_fields[] = {
+  "filesys",
+  "filesys", "type", "name", "quota", "dir", "machine",
+  "modtime", "modby", "modwith",
 };
 
-static struct validate gmol_validate = {
-  VOlist0,
-  1,
+static struct validate gqbf_validate = {
   0,
   0,
   0,
   0,
-  access_visible_list,
   0,
-  get_members_of_list,
+  0,
+  access_filesys,
+  0,
+  followup_gqot,
 };
 
-static struct validate geml_validate = {
-  VOlist0,
-  1,
-  0,
+static char *aqot_fields[] = {
+  "filesys", "type", "name", "quota",
+};
+
+static struct valobj aqot_valobj[] = {
+  {V_ID, 0, FILESYS_TABLE, "label", "filsys_id", MR_FILESYS},
+  {V_TYPE, 1, 0, "quota_type", 0, MR_TYPE},
+  {V_TYPEDATA, 2, 0, 0, 0, MR_ACE},
+  {V_NUM, 3},
+};
+
+static struct validate aqot_validate = {
+  aqot_valobj,
+  4,
+  "filsys_id",
+  "filsys_id = %d and type = '%s' and entity_id = %d",
+  3,
   0,
   0,
+  prefetch_filesys,
+  followup_aqot,
+};
+
+static struct validate uqot_validate = {
+  aqot_valobj,
+  4,
+  "filsys_id",
+  "filsys_id = %d AND type = '%s' AND entity_id = %d",
+  3,
   0,
-  access_visible_list,
   0,
-  get_end_members_of_list,
+  setup_dqot,
+  followup_aqot,
 };
 
-static char *glom_fields[] = {
-  "member_type", "member_name",
-  "list_name", "active", "publicflg", "hidden", "maillist", "grouplist",
+static struct validate dqot_validate = {
+  aqot_valobj,
+  3,
+  "filsys_id",
+  "filsys_id = %d AND type = '%s' AND entity_id = %d",
+  3,
+  0,
+  0,
+  setup_dqot,
+  followup_dqot,
 };
 
-static struct valobj glom_valobj[] = {
-  {V_TYPE, 0, "rmember", 0, 0, MR_TYPE},
-  {V_TYPEDATA, 1, 0, 0, 0, MR_NO_MATCH},
-  {V_SORT, 0},
+static char *gnfq_fields[] = {
+  "filesys", "login",
+  "filesys", "login", "quota", "dir", "machine",
+  "modtime", "modby", "modwith",
 };
 
-static struct validate glom_validate = {
-  glom_valobj,
-  3,
+static struct validate gnfq_validate = {
   0,
   0,
   0,
   0,
-  access_member,
   0,
-  get_lists_of_member,
+  0,
+  access_filesys,
+  0,
+  followup_gqot,
 };
 
-static char *cmol_fields[] = {
-  "list_name",
-  "count",
+static char *gnqp_fields[] = {
+  "machine", "dir",
+  "filesys", "login", "quota", "dir", "machine",
+  "modtime", "modby", "modwith",
 };
 
-static struct validate cmol_validate = {
-  VOlist0,
-  1,
+static char *anfq_fields[] = {
+  "filesys", "login", "quota",
+};
+
+static struct valobj anfq_valobj[] = {
+  {V_ID, 0, FILESYS_TABLE, "label", "filsys_id", MR_FILESYS},
+  {V_ID, 1, USERS_TABLE, "login", "users_id", MR_USER},
+  {V_NUM, 2},
+};
+
+static struct validate anfq_validate = {
+  anfq_valobj,
+  3,
+  "filsys_id",
+  "filsys_id = %d AND type = 'USER' AND entity_id = %d",
+  2,
+  0, /* object ? */
   0,
+  prefetch_filesys,
+  followup_aqot,
+};
+
+static struct validate unfq_validate = {
+  anfq_valobj,
+  3,
+  "filsys_id",
+  "filsys_id = %d AND type = 'USER' AND entity_id = %d",
+  2,
   0,
   0,
+  setup_dqot,
+  followup_aqot,
+};
+
+static struct validate dnfq_validate = {
+  anfq_valobj,
+  3,
+  "filsys_id",
+  "filsys_id = %d AND entity_id = %d",
+  2,
   0,
-  access_visible_list,
   0,
-  count_members_of_list,
+  setup_dqot,
+  followup_dqot,
 };
 
 static char *gzcl_fields[] = {
-  CLASS,
-  CLASS, "xmt_type", "xmt_name", "sub_type", "sub_name",
-  "iws_type", "iws_name", "iui_type", "iui_name", MOD1, MOD2, MOD3, 
+  "class",
+  "class", "xmt_type", "xmt_name", "sub_type", "sub_name",
+  "iws_type", "iws_name", "iui_type", "iui_name",
+  "modtime", "modby", "modwith",
 };
 
 static struct validate gzcl_validate = {
-  VOwild0sort,
-  2,
+  0,
+  0,
   0,
   0,
   0,
@@ -2158,27 +1894,27 @@ static struct validate gzcl_validate = {
 };
 
 static char *azcl_fields[] = {
-  CLASS, "xmt_type", "xmt_name", "sub_type", "sub_name",
+  "class", "xmt_type", "xmt_name", "sub_type", "sub_name",
   "iws_type", "iws_name", "iui_type", "iui_name",
 };
 
 static struct valobj azcl_valobj[] = {
-  {V_CHAR, 0},
-  {V_TYPE, 1, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 2, 0, 0, LIST_ID, MR_ACE},
-  {V_TYPE, 3, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 4, 0, 0, LIST_ID, MR_ACE},
-  {V_TYPE, 5, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 6, 0, 0, LIST_ID, MR_ACE},
-  {V_TYPE, 7, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 8, 0, 0, LIST_ID, MR_ACE},
+  {V_CHAR, 0, ZEPHYR_TABLE, "class"},
+  {V_TYPE, 1, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 2, 0, 0, "list_id", MR_ACE},
+  {V_TYPE, 3, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 4, 0, 0, "list_id", MR_ACE},
+  {V_TYPE, 5, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 6, 0, 0, "list_id", MR_ACE},
+  {V_TYPE, 7, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 8, 0, 0, "list_id", MR_ACE},
 };
 
 static struct validate azcl_validate = {
   azcl_valobj,
   9,
-  CLASS,
-  "class = LEFT('%s',SIZE(class))",
+  "class",
+  "class = '%s'",
   1,
   0,
   0,
@@ -2187,26 +1923,27 @@ static struct validate azcl_validate = {
 };
 
 static char *uzcl_fields[] = {
-  CLASS, "newclass", "xmt_type", "xmt_name", "sub_type", "sub_name",
+  "class", "newclass", "xmt_type", "xmt_name", "sub_type", "sub_name",
   "iws_type", "iws_name", "iui_type", "iui_name",
 };
 
 static struct valobj uzcl_valobj[] = {
-  {V_RENAME, 1, "zephyr", CLASS, 0, MR_NOT_UNIQUE},
-  {V_TYPE, 2, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 3, 0, 0, LIST_ID, MR_ACE},
-  {V_TYPE, 4, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 5, 0, 0, LIST_ID, MR_ACE},
-  {V_TYPE, 6, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 7, 0, 0, LIST_ID, MR_ACE},
-  {V_TYPE, 8, ACE_TYPE, 0, 0, MR_ACE},
-  {V_TYPEDATA, 9, 0, 0, LIST_ID, MR_ACE},
+  {V_NAME, 0, ZEPHYR_TABLE, "class", 0, MR_BAD_CLASS},
+  {V_RENAME, 1, ZEPHYR_TABLE, "class", 0, MR_NOT_UNIQUE},
+  {V_TYPE, 2, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 3, 0, 0, "list_id", MR_ACE},
+  {V_TYPE, 4, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 5, 0, 0, "list_id", MR_ACE},
+  {V_TYPE, 6, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 7, 0, 0, "list_id", MR_ACE},
+  {V_TYPE, 8, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 9, 0, 0, "list_id", MR_ACE},
 };
 
 static struct validate uzcl_validate = {
   uzcl_valobj,
-  9,
-  CLASS,
+  10,
+  "class",
   "class = '%s'",
   1,
   0,
@@ -2218,7 +1955,7 @@ static struct validate uzcl_validate = {
 static struct validate dzcl_validate = {
   0,
   0,
-  CLASS,
+  "class",
   "class = '%s'",
   1,
   0,
@@ -2227,20 +1964,68 @@ static struct validate dzcl_validate = {
   0,
 };
 
+static char *gsha_fields[] = {
+  "machine",
+  "machine", "ace_type", "ace_name", "modtime", "modby", "modwith",
+};
+
+static struct validate gsha_validate =
+{
+  0,
+  0,
+  0,
+  0,
+  0,
+  0,
+  0,
+  0,
+  followup_gsha,
+};
+
+static char *asha_fields[] = {
+  "machine", "ace_type", "ace_name",
+};
+
+static struct valobj asha_valobj[] = {
+  {V_ID, 0, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_TYPE, 1, 0, "ace_type", 0, MR_ACE},
+  {V_TYPEDATA, 2, 0, 0, 0, MR_ACE},
+};
+
+static struct validate asha_validate =
+{
+  asha_valobj,
+  3,
+  "mach_id",
+  "mach_id = %d",
+  1,
+  "mach_id",
+  0,
+  0,
+  set_modtime_by_id,
+};
+
 static char *gsvc_fields[] = {
-  SERVICE,
-  SERVICE, "protocol", "port", DESC, MOD1, MOD2, MOD3,
+  "service",
+  "service", "protocol", "port", "description", "modtime", "modby", "modwith",
 };
 
 static char *asvc_fields[] = {
-  SERVICE, "protocol", "port", DESC,
+  "service", "protocol", "port", "description",
+};
+
+static struct valobj asvc_valobj[] = {
+  {V_CHAR, 0, SERVICES_TABLE, "name"},
+  {V_CHAR, 1, SERVICES_TABLE, "protocol"},
+  {V_NUM, 2},
+  {V_CHAR, 3, SERVICES_TABLE, "description"},
 };
 
 static struct validate asvc_validate = {
-  VOchar0,
-  1,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",
+  asvc_valobj,
+  4,
+  "name",
+  "name = '%s'",
   1,
   0,
   0,
@@ -2251,13 +2036,13 @@ static struct validate asvc_validate = {
 static char *gpce_fields[] = {
   "printer",
   "printer", "spooling_host", "spool_directory", "rprinter",
-  "quotaserver", "authenticate", "price", COMMENTS,
-  MOD1, MOD2, MOD3,
+  "quotaserver", "authenticate", "price", "comments",
+  "modtime", "modby", "modwith",
 };
 
 static struct validate gpce_validate = {
-  VOwild0sort,
-  2,
+  0,
+  0,
   0,
   0,
   0,
@@ -2269,21 +2054,26 @@ static struct validate gpce_validate = {
 
 static char *apce_fields[] = {
   "printer", "spooling_host", "spool_directory", "rprinter",
-  "quotaserver", "authenticate", "price", COMMENTS,
-  MOD1, MOD2, MOD3,
+  "quotaserver", "authenticate", "price", "comments",
+  "modtime", "modby", "modwith",
 };
 
 static struct valobj apce_valobj[] = {
-  {V_CHAR, 0},
-  {V_ID, 1, MACHINE, NAME, MACH_ID, MR_MACHINE},
-  {V_ID, 4, MACHINE, NAME, MACH_ID, MR_MACHINE},
+  {V_CHAR, 0, PRINTCAP_TABLE, "name"},
+  {V_ID, 1, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_LEN, 2, PRINTCAP_TABLE, "dir"},
+  {V_LEN, 3, PRINTCAP_TABLE, "rp"},
+  {V_ID, 4, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
+  {V_NUM, 5},
+  {V_NUM, 6},
+  {V_CHAR, 7, PRINTCAP_TABLE, "comments"},
 };
 
 static struct validate apce_validate = {
   apce_valobj,
-  3,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",
+  8,
+  "name",
+  "name = '%s'",
   1,
   0,
   0,
@@ -2294,7 +2084,7 @@ static struct validate apce_validate = {
 static struct validate dpce_validate = {
   0,
   0,
-  NAME,
+  "name",
   "name = '%s'",
   1,
   0,
@@ -2305,29 +2095,30 @@ static struct validate dpce_validate = {
 
 static char *gpcp_fields[] = {
   "printer",
-  "printer", "spooling_host", "spool_directory", "rprinter", COMMENTS,
-  MOD1, MOD2, MOD3,
+  "printer", "spooling_host", "spool_directory", "rprinter", "comments",
+  "modtime", "modby", "modwith",
 };
 
 static char *gpdm_fields[] = {
-  NAME,
-  NAME, "rpcnum", "host", MOD1, MOD2, MOD3,
+  "name",
+  "name", "rpcnum", "host", "modtime", "modby", "modwith",
 };
 
 static char *apdm_fields[] = {
-  NAME, "rpcnum", "host"
-    };
+  "name", "rpcnum", "host"
+};
 
 static struct valobj apdm_valobj[] = {
-  {V_CHAR, 0},
-  {V_ID, 2, MACHINE, NAME, MACH_ID, MR_MACHINE},
+  {V_CHAR, 0, PALLADIUM_TABLE, "name"},
+  {V_NUM, 1},
+  {V_ID, 2, MACHINE_TABLE, "name", "mach_id", MR_MACHINE},
 };
 
 static struct validate apdm_validate = {
   apdm_valobj,
-  2,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",
+  3,
+  "name",
+  "name = '%s'",
   1,
   0,
   0,
@@ -2338,7 +2129,7 @@ static struct validate apdm_validate = {
 static struct validate dpdm_validate = {
   0,
   0,
-  NAME,
+  "name",
   "name = '%s'",
   1,
   0,
@@ -2348,25 +2139,25 @@ static struct validate dpdm_validate = {
 };
 
 static char *gali_fields[] = {
-  NAME, TYPE, "trans",
-  NAME, TYPE, "trans",
+  "name", "type", "trans",
+  "name", "type", "trans",
 };
 
 static char *aali_fields[] = {
-  NAME, TYPE, "trans",
+  "name", "type", "trans",
 };
 
 static struct valobj aali_valobj[] = {
-  {V_CHAR, 0},
-  {V_TYPE, 1, ALIAS, 0, 0, MR_TYPE},
-  {V_CHAR, 2},
+  {V_CHAR, 0, ALIAS_TABLE, "name"},
+  {V_TYPE, 1, 0, "alias", 0, MR_TYPE},
+  {V_CHAR, 2, ALIAS_TABLE, "trans"},
 };
 
 static struct validate aali_validate = {
   aali_valobj,
   3,
   "trans",
-  "name = LEFT('%s',SIZE(name)) and type = '%s' and trans = LEFT('%s',SIZE(trans))",
+  "name = '%s' and type = '%s' and trans = '%s'",
   3,
   0,
   0,
@@ -2388,11 +2179,11 @@ static struct validate dali_validate =  /* DELETE_ALIAS */
 };
 
 static char *gval_fields[] = {
-  NAME, "value",
+  "name", "value",
 };
 
 static struct valobj gval_valobj[] = {
-  {V_NAME, 0, "numvalues", NAME, 0, MR_NO_MATCH},
+  {V_NAME, 0, NUMVALUES_TABLE, "name", 0, MR_NO_MATCH},
 };
 
 static struct validate gval_validate = {
@@ -2408,15 +2199,20 @@ static struct validate gval_validate = {
 };
 
 static char *aval_fields[] = {
-  NAME, "value",
+  "name", "value",
+};
+
+static struct valobj aval_valobj[] = {
+  {V_CHAR, 0, NUMVALUES_TABLE, "name"},
+  {V_NUM, 1},
 };
 
 static struct validate aval_validate = /* for aval, uval, and dval */
 {
-  VOchar0,
-  1,
-  NAME,
-  "name = LEFT('%s',SIZE(name))",  /* LEFT() only needed for aval */
+  aval_valobj,
+  2,
+  "name",
+  "name = '%s'",
   1,
   0,
   0,
@@ -2425,28 +2221,29 @@ static struct validate aval_validate =  /* for aval, uval, and dval */
 };
 
 static char *dval_fields[] = {
-  NAME,
+  "name",
 };
 
 static char *gats_fields[] = {
-  "table_name", "appends", "updates", "deletes", MOD1, MOD2, MOD3,
+  "table_name", "appends", "updates", "deletes",
+  "modtime", "modby", "modwith",
 };
 
 static char *_sdl_fields[] = {
-    "level",
+  "level",
 };
 
-static struct validate _sdl_validate = 
+static struct validate _sdl_validate =
 {
-    0,
-    0,
-    (char *)0,
-    (char *)0,
-    0,
-    0,
-    0,
-    0,
-    _sdl_followup,
+  VOnum0,
+  1,
+  NULL,
+  NULL,
+  0,
+  0,
+  0,
+  0,
+  _sdl_followup,
 };
 
 
@@ -2464,210 +2261,224 @@ struct query Queries2[] = {
     "galo",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle FROM users u",
     galo_fields,
     6,
     "u.users_id != 0",
     0,
-    &VDsort0,
+    "u.login",
+    0,
   },
-  
+
   {
     /* Q_GAAL - GET_ALL_ACTIVE_LOGINS */
     "get_all_active_logins",
     "gaal",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle FROM users u",
     galo_fields,
     6,
     "u.status = 1",
     0,
-    &VDsort0,
+    "u.login",
+    0,
   },
-  
+
   {
     /* Q_GUAL - GET_USER_ACCOUNT_BY_LOGIN */
     "get_user_account_by_login",
     "gual",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(str.string), CHAR(u.signature), CHAR(u.secure), CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u, strings str",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, str.string, u.signature, u.secure, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u, strings str",
     gual_fields,
     15,
-    "u.login LIKE '%s' ESCAPE '*' AND u.users_id != 0 AND u.comment = str.string_id",
+    "u.login LIKE '%s' AND u.users_id != 0 AND u.comments = str.string_id",
     1,
+    "u.login",
     &gubl_validate,
   },
-  
+
   {
     /* Q_GUAU - GET_USER_ACCOUNT_BY_UID */
     "get_user_account_by_uid",
     "guau",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(str.string), CHAR(u.signature), CHAR(u.secure), CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u, strings str",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, str.string, u.signature, u.secure, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u, strings str",
     guau_fields,
     15,
-    "u.uid = %s AND u.users_id != 0 AND u.comment = str.string_id",
+    "u.unix_uid = %s AND u.users_id != 0 AND u.comments = str.string_id",
     1,
+    "u.login",
     &gubu_validate,
   },
-  
+
   {
     /* Q_GUAN - GET_USER_ACCOUNT_BY_NAME */
     "get_user_account_by_name",
     "guan",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(str.string), CHAR(u.signature), CHAR(u.secure), CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u, strings str",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, str.string, u.signature, u.secure, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u, strings str",
     guan_fields,
     15,
-    "u.first LIKE '%s' ESCAPE '*' AND u.last LIKE '%s' ESCAPE '*' AND u.users_id != 0 and u.comment = str.string_id",
+    "u.first LIKE '%s' AND u.last LIKE '%s' AND u.users_id != 0 and u.comments = str.string_id",
     2,
+    "u.login",
     &guan_validate,
   },
-  
+
   {
     /* Q_GUAC - GET_USER_ACCOUNT_BY_CLASS */
     "get_user_account_by_class",
     "guac",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(str.string), CHAR(u.signature), CHAR(u.secure), CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u, strings str",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, str.string, u.signature, u.secure, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u, strings str",
     guac_fields,
     15,
-    "u.type = uppercase('%s') AND u.users_id != 0 AND u.comment = str.string_id",
+    "u.type = UPPER('%s') AND u.users_id != 0 AND u.comments = str.string_id",
     1,
-    &VDsortf,
+    "u.login",
+    &VDfix_modby,
   },
-  
+
   {
     /* Q_GUAM - GET_USER_ACCOUNT_BY_MITID */
     "get_user_account_by_id",
     "guai",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(str.string), CHAR(u.signature), CHAR(u.secure), CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u, strings str",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, str.string, u.signature, u.secure, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u, strings str",
     guam_fields,
     15,
-    "u.clearid LIKE '%s' ESCAPE '*' AND u.users_id != 0 AND u.comment = str.string_id",
+    "u.clearid LIKE '%s' AND u.users_id != 0 AND u.comments = str.string_id",
     1,
-    &VDwildsortf,
+    "u.login",
+    &VDfix_modby,
   },
-  
+
   {
     /* Q_GUBL - GET_USER_BY_LOGIN */
     "get_user_by_login",
     "gubl",
     RETRIEVE,
     "u",
-    USERS,  
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u",
     gubl_fields,
     12,
-    "u.login LIKE '%s' ESCAPE '*' AND u.users_id != 0",
+    "u.login LIKE '%s' AND u.users_id != 0",
     1,
+    "u.login",
     &gubl_validate,
   },
-  
+
   {
     /* Q_GUBU - GET_USER_BY_UID */
     "get_user_by_uid",
     "gubu",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u",
     gubu_fields,
     12,
-    "u.uid = %s AND u.users_id != 0",
+    "u.unix_uid = %s AND u.users_id != 0",
     1,
+    "u.login",
     &gubu_validate,
   },
-  
+
   {
     /* Q_GUBN - GET_USER_BY_NAME */
     "get_user_by_name",
     "gubn",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u",
     gubn_fields,
     12,
-    "u.first LIKE '%s' ESCAPE '*' AND u.last LIKE '%s' ESCAPE '*' AND u.users_id != 0",
+    "u.first LIKE '%s' AND u.last LIKE '%s' AND u.users_id != 0",
     2,
+    "u.login",
     &gubn_validate,
   },
-  
+
   {
     /* Q_GUBC - GET_USER_BY_CLASS */
     "get_user_by_class",
     "gubc",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u",
     gubc_fields,
     12,
-    "u.type = uppercase('%s') AND u.users_id != 0",
+    "u.type = UPPER('%s') AND u.users_id != 0",
     1,
-    &VDsortf,
+    "u.login",
+    &VDfix_modby,
   },
-  
+
   {
     /* Q_GUBM - GET_USER_BY_MITID */
     "get_user_by_mitid",
     "gubm",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), CHAR(u.uid), u.shell, CHAR(u.last), CHAR(u.first), u.middle, CHAR(u.status), CHAR(u.clearid), u.type, CHAR(u.modtime), CHAR(u.modby), u.modwith FROM users u",
+    USERS_TABLE,
+    "u.login, u.unix_uid, u.shell, u.last, u.first, u.middle, u.status, u.clearid, u.type, TO_CHAR(u.modtime, 'DD-mon-YYYY HH24:MI:SS'), u.modby, u.modwith FROM users u",
     gubm_fields,
     12,
-    "u.clearid LIKE '%s' ESCAPE '*' AND u.users_id != 0",
+    "u.clearid LIKE '%s' AND u.users_id != 0",
     1,
-    &VDwildsortf,
+    "u.login",
+    &VDfix_modby,
   },
-  
+
   {
     /* Q_AUAC - ADD_USER_ACCOUNT */  /* uses prefetch_value() for users_id */
     "add_user_account",
     "auac",
     APPEND,
     "u",
-    USERS,
-    "INTO users (login, uid, shell, last, first, middle, status, clearid, type, comment, signature, secure, users_id) VALUES ('%s', %s, '%s', '%s', '%s', '%s', %s, '%s', '%s', %d, '%s', %s, %s)",
+    USERS_TABLE,
+    "INTO users (login, unix_uid, shell, last, first, middle, status, clearid, type, comments, signature, secure, users_id) VALUES ('%s', %s, '%s', NVL('%s', CHR(0)), NVL('%s', CHR(0)), NVL('%s', CHR(0)), %s, NVL('%s', CHR(0)), '%s', %d, LENGTH(NVL('%s', CHR(0))), %s, %s)", /* followup_ausr fixes signature field */
     auac_fields,
     12,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &auac_validate,
   },
-  
+
   {
     /* Q_AUSR - ADD_USER */  /* uses prefetch_value() for users_id */
     "add_user",
     "ausr",
     APPEND,
     "u",
-    USERS,
-    "INTO users (login, uid, shell, last, first, middle, status, clearid, type, comment, signature, secure, users_id) VALUES ('%s', %s, '%s', '%s', '%s', '%s', %s, '%s', '%s', 0, '', 0, %s)",
+    USERS_TABLE,
+    "INTO users (login, unix_uid, shell, last, first, middle, status, clearid, type, comments, signature, secure, users_id) VALUES ('%s', %s, '%s', NVL('%s', CHR(0)), NVL('%s', CHR(0)), NVL('%s', CHR(0)), %s, NVL('%s', CHR(0)), '%s', 0, CHR(0), 0, %s)",
     auac_fields,
     9,
     0,
     0,
+    NULL,
     &ausr_validate,
   },
-  
+
   {
     /* Q_RUSR - REGISTER_USER */
     "register_user",
@@ -2680,36 +2491,39 @@ struct query Queries2[] = {
     3,
     0,
     0,
+    NULL,
     &rusr_validate,
   },
-  
+
   {
     /* Q_UUAC - UPDATE_USER_ACCOUNT */
     "update_user_account",
     "uuac",
     UPDATE,
     "u",
-    USERS,
-    "users SET login = '%s', uid = %s, shell = '%s', last = '%s', first = '%s', middle = '%s', status = %s, clearid = '%s', type = '%s', comment = %d, signature = '%s', secure = %s",
+    USERS_TABLE,
+    "users SET login = '%s', unix_uid = %s, shell = '%s', last = NVL('%s', CHR(0)), first = NVL('%s', CHR(0)), middle = NVL('%s', CHR(0)), status = %s, clearid = NVL('%s', CHR(0)), type = '%s', comments = %d, signature = LENGTH(NVL('%s', CHR(0))), secure = %s", /* followup_uuac fixes signature */
     uuac_fields,
     12,
     "users_id = %d",
     1,
+    NULL,
     &uuac_validate,
   },
+
   {
     /* Q_UUSR - UPDATE_USER */
     "update_user",
     "uusr",
     UPDATE,
     "u",
-    USERS,
-    "users SET login = '%s', uid = %s, shell = '%s', last = '%s', first = '%s', middle = '%s', status = %s, clearid = '%s',  type = '%s'",
+    USERS_TABLE,
+    "users SET login = '%s', unix_uid = %s, shell = '%s', last = NVL('%s', CHR(0)), first = NVL('%s', CHR(0)), middle = NVL('%s', CHR(0)), status = %s, clearid = NVL('%s', CHR(0)),  type = '%s'",
     uuac_fields,
     9,
     "users_id = %d",
     1,
+    NULL,
     &uusr_validate,
   },
 
@@ -2719,12 +2533,13 @@ struct query Queries2[] = {
     "uush",
     UPDATE,
     "u",
-    USERS,
-    "users SET shell = '%s'",  
+    USERS_TABLE,
+    "users SET shell = '%s'",
     uush_fields,
     1,
     "users_id = %d",
     1,
+    NULL,
     &uush_validate,
   },
 
@@ -2734,12 +2549,13 @@ struct query Queries2[] = {
     "uust",
     UPDATE,
     "u",
-    USERS,
+    USERS_TABLE,
     "users SET status = %s",
     uust_fields,
     1,
     "users_id = %d",
     1,
+    NULL,
     &uust_validate,
   },
 
@@ -2749,58 +2565,46 @@ struct query Queries2[] = {
     "uuss",
     UPDATE,
     "u",
-    USERS,
+    USERS_TABLE,
     "users SET secure = %s",
     uuss_fields,
     1,
     "users_id = %d",
     1,
+    NULL,
     &uust_validate,
   },
+
   {
-    /* Q_DUSR - DELETE_USER */ 
+    /* Q_DUSR - DELETE_USER */
     "delete_user",
     "dusr",
     DELETE,
     "u",
-    USERS,
-    (char *)0,
-    dusr_fields,
-    0,
-    "users_id = %d",
-    1,
-    &dusr_validate,
-  },
-
-  {
-    /* Q_DUBU - DELETE_USER_BY_UID */
-    "delete_user_by_uid",
-    "dubu",
-    DELETE,
-    "u",
-    USERS,
-    (char *)0,
-    dubu_fields,
+    USERS_TABLE,
+    NULL,
+    dusr_fields,
     0,
     "users_id = %d",
     1,
-    &dubu_validate,
+    NULL,
+    &dusr_validate,
   },
 
   {
-    /* Q_GKUM - GET_KERBEROS_USER_MAP */ 
+    /* Q_GKUM - GET_KERBEROS_USER_MAP */
     "get_kerberos_user_map",
     "gkum",
     RETRIEVE,
     "k",
-    "krbmap",
-    "CHAR(u.login), CHAR(str.string) FROM krbmap km, users u, strings str",
+    KRBMAP_TABLE,
+    "u.login, str.string FROM krbmap km, users u, strings str",
     gkum_fields,
     2,
-    "u.login LIKE '%s' ESCAPE '*' AND str.string LIKE '%s' ESCAPE '*' AND km.users_id = u.users_id AND km.string_id = str.string_id",
+    "u.login LIKE '%s' AND str.string LIKE '%s' AND km.users_id = u.users_id AND km.string_id = str.string_id",
     2,
-    &VDwild2sort2,
+    "u.login, str.string",
+    NULL,
   },
 
   {
@@ -2809,12 +2613,13 @@ struct query Queries2[] = {
     "akum",
     APPEND,
     "k",
-    "krbmap",
+    KRBMAP_TABLE,
     "INTO krbmap (users_id, string_id) VALUES (%d, %d)",
     akum_fields,
     2,
     0,
     0,
+    NULL,
     &akum_validate,
   },
 
@@ -2824,12 +2629,13 @@ struct query Queries2[] = {
     "dkum",
     DELETE,
     "k",
-    "krbmap",
+    KRBMAP_TABLE,
     0,
     akum_fields,
     0,
     "users_id = %d AND string_id = %d",
     2,
+    NULL,
     &dkum_validate,
   },
 
@@ -2839,12 +2645,13 @@ struct query Queries2[] = {
     "gfbl",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), u.fullname, u.nickname, u.home_addr, u.home_phone, u.office_addr, u.office_phone, u.department, u.affiliation, CHAR(u.fmodtime), CHAR(u.fmodby), u.fmodwith FROM users u",
+    USERS_TABLE,
+    "login, fullname, nickname, home_addr, home_phone, office_addr, office_phone, department, affiliation, TO_CHAR(fmodtime, 'DD-mon-YYYY HH24:MI:SS'), fmodby, fmodwith FROM users",
     gfbl_fields,
     12,
-    "u.users_id = %d",
+    "users_id = %d",
     1,
+    "login",
     &gfbl_validate,
   },
 
@@ -2854,12 +2661,13 @@ struct query Queries2[] = {
     "ufbl",
     UPDATE,
     "u",
-    USERS,
-    "users SET fullname= '%s',nickname= '%s',home_addr= '%s',home_phone= '%s',office_addr= '%s',office_phone= '%s',department= '%s',affiliation= '%s'",
+    USERS_TABLE,
+    "users SET fullname= NVL('%s', CHR(0)), nickname= NVL('%s', CHR(0)), home_addr= NVL('%s', CHR(0)), home_phone= NVL('%s', CHR(0)), office_addr= NVL('%s', CHR(0)), office_phone= NVL('%s', CHR(0)), department= NVL('%s', CHR(0)), affiliation= NVL('%s', CHR(0))",
     ufbl_fields,
     8,
     "users_id = %d",
     1,
+    NULL,
     &ufbl_validate,
   },
 
@@ -2869,12 +2677,13 @@ struct query Queries2[] = {
     "gpob",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), u.potype, CHAR(u.pop_id) + ':' + CHAR(u.box_id), CHAR(u.pmodtime), CHAR(u.pmodby), u.pmodwith FROM users u",
+    USERS_TABLE,
+    "login, potype, pop_id || ':' || box_id, TO_CHAR(pmodtime, 'DD-mon-YYYY HH24:MI:SS'), pmodby, pmodwith FROM users",
     gpob_fields,
     6,
-    "u.users_id = %d",
+    "users_id = %d",
     1,
+    "login",
     &gpob_validate,
   },
 
@@ -2884,27 +2693,29 @@ struct query Queries2[] = {
     "gapo",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), u.potype, CHAR(u.pop_id) + ':' + CHAR(u.box_id) FROM users u",
+    USERS_TABLE,
+    "login, potype, pop_id || ':' || box_id FROM users",
     gpox_fields,
     3,
-    "u.potype != 'NONE'",
+    "potype != 'NONE'",
     0,
+    "login",
     &gpox_validate,
   },
-      
+
   {
     /* Q_GPOP - GET_POBOXES_POP */
     "get_poboxes_pop",
     "gpop",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), u.potype, CHAR(u.pop_id) + ':' + CHAR(u.box_id) FROM users u",
+    USERS_TABLE,
+    "login, potype, pop_id || ':' || box_id FROM users",
     gpox_fields,
     3,
-    "u.potype = 'POP'",
+    "potype = 'POP'",
     0,
+    "login",
     &gpox_validate
   },
 
@@ -2914,12 +2725,13 @@ struct query Queries2[] = {
     "gpos",
     RETRIEVE,
     "u",
-    USERS,
-    "CHAR(u.login), u.potype, CHAR(u.pop_id) + ':' + CHAR(u.box_id) FROM users u",
+    USERS_TABLE,
+    "login, potype, pop_id || ':' || box_id FROM users",
     gpox_fields,
     3,
-    "u.potype = 'SMTP'",
+    "potype = 'SMTP'",
     0,
+    "login",
     &gpox_validate
   },
 
@@ -2929,12 +2741,13 @@ struct query Queries2[] = {
     "spob",
     UPDATE,
     0,
-    USERS,
+    USERS_TABLE,
     0,
     spob_fields,
     3,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &spob_validate,
   },
 
@@ -2944,12 +2757,13 @@ struct query Queries2[] = {
     "spop",
     UPDATE,
     "u",
-    USERS,
+    USERS_TABLE,
     "users SET potype = 'POP'",
     spob_fields,
     0,
     "users_id = %d",
     1,
+    NULL,
     &spop_validate,
   },
 
@@ -2959,42 +2773,29 @@ struct query Queries2[] = {
     "dpob",
     UPDATE,
     "u",
-    USERS,
+    USERS_TABLE,
     "users SET potype = 'NONE'",
     spob_fields,
     0,
     "users_id = %d",
     1,
+    NULL,
     &dpob_validate,
   },
 
-  {
-    /* Q_GMAC - GET_MACHINE */
-    "get_machine",
-    "gmac",
-    RETRIEVE,
-    "m",
-    MACHINE,
-    "CHAR(m.name), m.vendor, CHAR(m.modtime), CHAR(m.modby), m.modwith FROM machine m",
-    gmac_fields,
-    5,
-    "m.name LIKE '%s' ESCAPE '*' AND m.mach_id != 0", 
-    1,
-    &VDupwildsortf,
-  },
-
   {
     /* Q_GHST - GET_HOST */
     "get_host",
     "ghst",
     RETRIEVE,
     "m",
-    MACHINE,
-    "CHAR(m.name), m.vendor, m.model, m.os, m.location, m.contact, CHAR(m.use), CHAR(m.status), CHAR(m.statuschange), CHAR(s.name), m.address, m.owner_type, CHAR(m.owner_id), CHAR(m.acomment), CHAR(m.ocomment), CHAR(m.created), CHAR(m.creator), CHAR(m.inuse), CHAR(m.modtime), CHAR(m.modby), m.modwith FROM machine m, subnet s",
+    MACHINE_TABLE,
+    "m.name, m.vendor, m.model, m.os, m.location, m.contact, m.use, m.status, TO_CHAR(m.statuschange, 'DD-mon-YYYY HH24:MI:SS'), s.name, m.address, m.owner_type, m.owner_id, m.acomment, m.ocomment, TO_CHAR(m.created, 'DD-mon-YYYY HH24:MI:SS'), m.creator, TO_CHAR(m.inuse, 'DD-mon-YYYY HH24:MI:SS'), TO_CHAR(m.modtime, 'DD-mon-YYYY HH24:MI:SS'), m.modby, m.modwith FROM machine m, subnet s",
     ghst_fields,
     21,
-    "m.name LIKE '%s' ESCAPE '*' AND m.address LIKE '%s' ESCAPE '*' AND m.location LIKE '%s' ESCAPE '*' AND m.contact LIKE '%s' ESCAPE '*' AND m.mach_id != 0 AND s.snet_id = m.snet_id", 
+    "m.name LIKE UPPER('%s') AND m.address LIKE '%s' AND m.location LIKE UPPER('%s') AND s.name LIKE UPPER('%s') AND m.mach_id != 0 AND s.snet_id = m.snet_id",
     4,
+    "m.name",
     &ghst_validate,
   },
 
@@ -3004,12 +2805,13 @@ struct query Queries2[] = {
     "ahst",
     APPEND,
     "m",
-    MACHINE,
-    "INTO machine (name, vendor, model, os, location, contact, use, status, statuschange, snet_id, address, owner_type, owner_id, acomment, ocomment, created, inuse, mach_id, creator) VALUES (uppercase('%s'),uppercase('%s'),uppercase('%s'),uppercase('%s'),uppercase('%s'),'%s',%s,%s,date('now'),%d,'%s','%s',%d,%d,%d,date('now'),date('now'),%s,%s)",
+    MACHINE_TABLE,
+    "INTO machine (name, vendor, model, os, location, contact, use, status, statuschange, snet_id, address, owner_type, owner_id, acomment, ocomment, created, inuse, mach_id, creator) VALUES (UPPER('%s'), NVL(UPPER('%s'), CHR(0)), NVL(UPPER('%s'), CHR(0)), NVL(UPPER('%s'), CHR(0)), NVL(UPPER('%s'), CHR(0)), NVL('%s', CHR(0)), %s, %s, SYSDATE, %d, '%s', '%s', %d, %d, %d, SYSDATE, SYSDATE, %s, %s)",
     ahst_fields,
     14,
     0,
     0,
+    NULL,
     &ahst_validate,
   },
 
@@ -3019,12 +2821,13 @@ struct query Queries2[] = {
     "uhst",
     UPDATE,
     "m",
-    MACHINE,
-    "machine SET name=uppercase('%s'),vendor=uppercase('%s'),model=uppercase('%s'),os=uppercase('%s'),location=uppercase('%s'),contact='%s',use=%s,status=%s,snet_id=%d,address='%s',owner_type='%s',owner_id=%d,acomment=%d,ocomment=%d",
+    MACHINE_TABLE,
+    "machine SET name = NVL(UPPER('%s'), CHR(0)), vendor = NVL(UPPER('%s'), CHR(0)), model = NVL(UPPER('%s'), CHR(0)), os = NVL(UPPER('%s'), CHR(0)), location = NVL(UPPER('%s'), CHR(0)), contact = NVL('%s', CHR(0)), use = %s, status = %s, snet_id = %d, address = '%s', owner_type = '%s', owner_id = %d, acomment = %d, ocomment = %d",
     uhst_fields,
     14,
     "mach_id = %d",
     1,
+    NULL,
     &uhst_validate,
   },
 
@@ -3034,27 +2837,45 @@ struct query Queries2[] = {
     "dhst",
     DELETE,
     "m",
-    MACHINE,
-    (char *)0,
+    MACHINE_TABLE,
+    NULL,
     dhst_fields,
     0,
     "mach_id = %d",
     1,
+    NULL,
     &dhst_validate,
   },
 
+  {
+    /* Q_GMAC - GET_MACHINE */
+    "get_machine",
+    "gmac",
+    RETRIEVE,
+    "m",
+    MACHINE_TABLE,
+    "name, vendor, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM machine",
+    gmac_fields,
+    5,
+    "name LIKE UPPER('%s') AND mach_id != 0",
+    1,
+    "name",
+    &VDfix_modby,
+  },
+
   {
     /* Q_GHAL - GET_HOSTALIAS */
     "get_hostalias",
     "ghal",
     RETRIEVE,
     "a",
-    "hostalias",
-    "CHAR(a.name), CHAR(m.name) FROM hostalias a, machine m",
+    HOSTALIAS_TABLE,
+    "a.name, m.name FROM hostalias a, machine m",
     ghal_fields,
     2,
-    "m.mach_id = a.mach_id and a.name LIKE '%s' ESCAPE '*' AND m.name LIKE '%s' ESCAPE '*'",
+    "m.mach_id = a.mach_id and a.name LIKE UPPER('%s') AND m.name LIKE UPPER('%s')",
     2,
+    "a.name",
     &ghal_validate,
   },
 
@@ -3064,12 +2885,13 @@ struct query Queries2[] = {
     "ahal",
     APPEND,
     "a",
-    "hostalias",
-    "INTO hostalias (name, mach_id) VALUES (uppercase('%s'),%d)",
+    HOSTALIAS_TABLE,
+    "INTO hostalias (name, mach_id) VALUES (UPPER('%s'), %d)",
     ghal_fields,
     2,
     0,
     0,
+    NULL,
     &ahal_validate,
   },
 
@@ -3079,12 +2901,13 @@ struct query Queries2[] = {
     "dhal",
     DELETE,
     "a",
-    "hostalias",
-    (char *)0,
+    HOSTALIAS_TABLE,
+    NULL,
     ghal_fields,
     0,
-    "name = uppercase('%s') AND mach_id = %d",
+    "name = UPPER('%s') AND mach_id = %d",
     2,
+    NULL,
     &dhal_validate,
   },
 
@@ -3094,12 +2917,13 @@ struct query Queries2[] = {
     "gsnt",
     RETRIEVE,
     "s",
-    SUBNET,
-    "CHAR(s.name), CHAR(s.description), CHAR(s.saddr), CHAR(s.mask), CHAR(s.low), CHAR(s.high), s.owner_type, CHAR(s.owner_id), CHAR(s.modtime), CHAR(s.modby), s.modwith FROM subnet s",
+    SUBNET_TABLE,
+    "name, description, saddr, mask, low, high, prefix, owner_type, owner_id, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM subnet",
     gsnt_fields,
-    11,
-    "s.name LIKE '%s' ESCAPE '*' and s.snet_id != 0",
+    12,
+    "name LIKE UPPER('%s')",
     1,
+    "name",
     &gsnt_validate,
   },
 
@@ -3109,12 +2933,13 @@ struct query Queries2[] = {
     "asnt",
     APPEND,
     "s",
-    SUBNET,
-    "INTO subnet (name, description, saddr, mask, low, high, owner_type, owner_id, snet_id) VALUES (uppercase('%s'), '%s', %s, %s, %s, %s, '%s', %d, %s)",
+    SUBNET_TABLE,
+    "INTO subnet (name, description, saddr, mask, low, high, prefix, owner_type, owner_id, snet_id) VALUES (UPPER('%s'), NVL('%s', CHR(0)), %s, %s, %s, %s, NVL('%s', CHR(0)), '%s', %d, %s)",
     asnt_fields,
-    8,
+    9,
     0,
     0,
+    NULL,
     &asnt_validate,
   },
 
@@ -3124,12 +2949,13 @@ struct query Queries2[] = {
     "usnt",
     UPDATE,
     "s",
-    SUBNET,
-    "subnet SET name=uppercase('%s'), description='%s', saddr=%s, mask=%s, low=%s, high=%s, owner_type='%s', owner_id=%d",
+    SUBNET_TABLE,
+    "subnet SET name = UPPER('%s'), description = NVL('%s', CHR(0)), saddr = %s, mask = %s, low = %s, high = %s, prefix = NVL('%s', CHR(0)), owner_type = '%s', owner_id = %d",
     usnt_fields,
-    8,
+    9,
     "snet_id = %d",
     1,
+    NULL,
     &usnt_validate,
   },
 
@@ -3139,12 +2965,13 @@ struct query Queries2[] = {
     "dsnt",
     DELETE,
     "s",
-    SUBNET,
-    (char *)0,
+    SUBNET_TABLE,
+    NULL,
     dsnt_fields,
     0,
     "snet_id = %d",
     1,
+    NULL,
     &dsnt_validate,
   },
 
@@ -3154,13 +2981,14 @@ struct query Queries2[] = {
     "gclu",
     RETRIEVE,
     "c",
-    CLUSTER,
-    "CHAR(c.name), c.description, c.location, CHAR(c.modtime), CHAR(c.modby), c.modwith FROM cluster c",
+    CLUSTERS_TABLE,
+    "name, description, location, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM clusters",
     gclu_fields,
     6,
-    "c.name LIKE '%s' ESCAPE '*' AND c.clu_id != 0",
+    "name LIKE '%s' AND clu_id != 0",
     1,
-    &VDwildsortf,
+    "name",
+    &VDfix_modby,
   },
 
   {
@@ -3169,12 +2997,13 @@ struct query Queries2[] = {
     "aclu",
     APPEND,
     "c",
-    CLUSTER,
-    "INTO cluster (name, description, location, clu_id) VALUES ('%s','%s','%s',%s)",
+    CLUSTERS_TABLE,
+    "INTO clusters (name, description, location, clu_id) VALUES ('%s', NVL('%s', CHR(0)), NVL('%s', CHR(0)), %s)",
     aclu_fields,
     3,
     0,
     0,
+    NULL,
     &aclu_validate,
   },
 
@@ -3184,12 +3013,13 @@ struct query Queries2[] = {
     "uclu",
     UPDATE,
     "c",
-    CLUSTER,
-    "cluster SET name = '%s', description = '%s', location = '%s'",
+    CLUSTERS_TABLE,
+    "clusters SET name = '%s', description = NVL('%s', CHR(0)), location = NVL('%s', CHR(0))",
     uclu_fields,
     3,
     "clu_id = %d",
     1,
+    NULL,
     &uclu_validate,
   },
 
@@ -3199,42 +3029,45 @@ struct query Queries2[] = {
     "dclu",
     DELETE,
     "c",
-    CLUSTER,
-    (char *)0,
+    CLUSTERS_TABLE,
+    NULL,
     dclu_fields,
     0,
     "clu_id = %d",
     1,
+    NULL,
     &dclu_validate,
   },
 
   {
-    /* Q_GMCM - GET_MACHINE_TO_CLUSTER_MAP */ 
+    /* Q_GMCM - GET_MACHINE_TO_CLUSTER_MAP */
     "get_machine_to_cluster_map",
     "gmcm",
     RETRIEVE,
     "mcm",
-    "mcmap",
-    "CHAR(m.name), CHAR(c.name) FROM machine m, cluster c, mcmap mcm",
+    MCMAP_TABLE,
+    "m.name, c.name FROM machine m, clusters c, mcmap mcm",
     gmcm_fields,
     2,
-    "m.name LIKE '%s' ESCAPE '*' AND c.name LIKE '%s' ESCAPE '*' AND mcm.clu_id = c.clu_id AND mcm.mach_id = m.mach_id",
+    "m.name LIKE UPPER('%s') AND c.name LIKE '%s' AND mcm.clu_id = c.clu_id AND mcm.mach_id = m.mach_id",
     2,
-    &gmcm_validate, 
+    "m.name",
+    NULL,
   },
-                                           
+
   {
     /* Q_AMTC - ADD_MACHINE_TO_CLUSTER */
     "add_machine_to_cluster",
     "amtc",
     APPEND,
     "mcm",
-    "mcmap",
+    MCMAP_TABLE,
     "INTO mcmap (mach_id, clu_id) VALUES (%d, %d)",
     gmcm_fields,
     2,
     0,
     0,
+    NULL,
     &amtc_validate,
   },
 
@@ -3244,12 +3077,13 @@ struct query Queries2[] = {
     "dmfc",
     DELETE,
     "mcm",
-    "mcmap",
+    MCMAP_TABLE,
     0,
     gmcm_fields,
     0,
     "mach_id = %d AND clu_id = %d",
     2,
+    NULL,
     &amtc_validate,
   },
 
@@ -3259,13 +3093,14 @@ struct query Queries2[] = {
     "gcld",
     RETRIEVE,
     "svc",
-    "svc",
-    "CHAR(c.name), CHAR(svc.serv_label), svc.serv_cluster FROM svc svc, cluster c",
+    SVC_TABLE,
+    "c.name, svc.serv_label, svc.serv_cluster FROM svc svc, clusters c",
     gcld_fields,
     3,
-    "c.clu_id = svc.clu_id AND c.name LIKE '%s' ESCAPE '*' AND svc.serv_label LIKE '%s' ESCAPE '*'",
+    "c.clu_id = svc.clu_id AND c.name LIKE '%s' AND svc.serv_label LIKE '%s'",
     2,
-    &VDwild2sort2,
+    "c.name, svc.serv_label",
+    NULL,
   },
 
   {
@@ -3274,12 +3109,13 @@ struct query Queries2[] = {
     "acld",
     APPEND,
     "svc",
-    "svc",
-    "INTO svc (clu_id, serv_label, serv_cluster) VALUES (%d,'%s','%s')",
+    SVC_TABLE,
+    "INTO svc (clu_id, serv_label, serv_cluster) VALUES (%d, '%s', '%s')",
     acld_fields,
     3,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &acld_validate,
   },
 
@@ -3289,27 +3125,237 @@ struct query Queries2[] = {
     "dcld",
     DELETE,
     "svc",
-    "svc",
-    (char *)0,
+    SVC_TABLE,
+    NULL,
     acld_fields,
     0,
-    "clu_id = %d AND serv_label = '%s' AND serv_cluster = '%s'",   
+    "clu_id = %d AND serv_label = '%s' AND serv_cluster = '%s'",
     3,
+    NULL,
     &dcld_validate,
   },
 
+  {
+    /* Q_GLIN - GET_LIST_INFO */
+    "get_list_info",
+    "glin",
+    RETRIEVE,
+    "l",
+    LIST_TABLE,
+    "name, active, publicflg, hidden, maillist, grouplist, gid, acl_type, acl_id, description, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM list",
+    glin_fields,
+    13,
+    "name LIKE '%s'",
+    1,
+    "name",
+    &glin_validate,
+  },
+
+  {
+    /* Q_EXLN - EXPAND_LIST_NAMES */
+    "expand_list_names",
+    "exln",
+    RETRIEVE,
+    "l",
+    LIST_TABLE,
+    "name FROM list",
+    glin_fields,
+    1,
+    "name LIKE '%s' AND list_id != 0",
+    1,
+    "name",
+    NULL,
+  },
+
+  {
+    /* Q_ALIS - ADD_LIST */ /* uses prefetch_value() for list_id */
+    "add_list",
+    "alis",
+    APPEND,
+    "l",
+    LIST_TABLE,
+    "INTO list (name, active, publicflg, hidden, maillist, grouplist, gid, acl_type, acl_id, description, list_id) VALUES ('%s', %s, %s, %s, %s, %s, %s, '%s', %d, NVL('%s', CHR(0)), %s)",
+    alis_fields,
+    10,
+    0,
+    0,
+    NULL,
+    &alis_validate,
+  },
+
+  {
+    /* Q_ULIS - UPDATE_LIST */
+    "update_list",
+    "ulis",
+    UPDATE,
+    "l",
+    LIST_TABLE,
+    "list SET name = '%s', active = %s, publicflg = %s, hidden = %s, maillist = %s, grouplist = %s, gid = %s, acl_type = '%s', acl_id = %d, description = NVL('%s', CHR(0))",
+    ulis_fields,
+    10,
+    "list_id = %d",
+    1,
+    NULL,
+    &ulis_validate,
+  },
+
+  {
+    /* Q_DLIS - DELETE_LIST */
+    "delete_list",
+    "dlis",
+    DELETE,
+    "l",
+    LIST_TABLE,
+    NULL,
+    dlis_fields,
+    0,
+    "list_id = %d",
+    1,
+    NULL,
+    &dlis_validate,
+  },
+
+  {
+    /* Q_AMTL - ADD_MEMBER_TO_LIST */
+    "add_member_to_list",
+    "amtl",
+    APPEND,
+    0,
+    IMEMBERS_TABLE,
+    0,
+    amtl_fields,
+    3,
+    NULL,
+    0,
+    NULL,
+    &amtl_validate,
+  },
+
+  {
+    /* Q_DMFL - DELETE_MEMBER_FROM_LIST */
+    "delete_member_from_list",
+    "dmfl",
+    DELETE,
+    0,
+    IMEMBERS_TABLE,
+    NULL,
+    amtl_fields,
+    0,
+    0,
+    3,
+    NULL,
+    &dmfl_validate,
+  },
+
+  {
+    /* Q_GAUS - GET_ACE_USE */
+    "get_ace_use",
+    "gaus",
+    RETRIEVE,
+    0,
+    0,
+    0,
+    gaus_fields,
+    2,
+    0,
+    2,
+    NULL,
+    &gaus_validate,
+  },
+
+  {
+    /* Q_QGLI - QUALIFIED_GET_LISTS */
+    "qualified_get_lists",
+    "qgli",
+    RETRIEVE,
+    0,
+    LIST_TABLE,
+    0,
+    qgli_fields,
+    1,
+    0,
+    5,
+    NULL,
+    &qgli_validate,
+  },
+
+  {
+    /* Q_GMOL - GET_MEMBERS_OF_LIST */
+    "get_members_of_list",
+    "gmol",
+    RETRIEVE,
+    NULL,
+    IMEMBERS_TABLE,
+    NULL,
+    gmol_fields,
+    2,
+    NULL,
+    1,
+    NULL,
+    &gmol_validate,
+  },
+
+  {
+    /* Q_GEML - GET_END_MEMBERS_OF_LIST */
+    "get_end_members_of_list",
+    "geml",
+    RETRIEVE,
+    NULL,
+    IMEMBERS_TABLE,
+    NULL,
+    gmol_fields,
+    2,
+    NULL,
+    1,
+    NULL,
+    &geml_validate,
+  },
+
+  {
+    /* Q_GLOM - GET_LISTS_OF_MEMBER */
+    "get_lists_of_member",
+    "glom",
+    RETRIEVE,
+    0,
+    IMEMBERS_TABLE,
+    0,
+    glom_fields,
+    6,
+    0,
+    2,
+    NULL,
+    &glom_validate,
+  },
+
+  {
+    /* Q_CMOL - COUNT_MEMBERS_OF_LIST */
+    "count_members_of_list",
+    "cmol",
+    RETRIEVE,
+    0,
+    IMEMBERS_TABLE,
+    0,
+    cmol_fields,
+    1,
+    0,
+    1,
+    NULL,
+    &cmol_validate,
+  },
+
   {
     /* Q_GSIN - GET_SERVER_INFO */
     "get_server_info",
     "gsin",
     RETRIEVE,
     "s",
-    "servers",
-    "CHAR(s.name), CHAR(s.update_int), s.target_file, s.script, CHAR(s.dfgen), CHAR(s.dfcheck), s.type, CHAR(s.enable), CHAR(s.inprogress), CHAR(s.harderror), s.errmsg, s.acl_type, CHAR(s.acl_id), CHAR(s.modtime), CHAR(s.modby), s.modwith FROM servers s",
+    SERVERS_TABLE,
+    "name, update_int, target_file, script, dfgen, dfcheck, type, enable, inprogress, harderror, errmsg, acl_type, acl_id, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM servers",
     gsin_fields,
     16,
-    "s.name LIKE '%s' ESCAPE '*'",
+    "name LIKE UPPER('%s')",
     1,
+    "name",
     &gsin_validate,
   },
 
@@ -3319,12 +3365,13 @@ struct query Queries2[] = {
     "qgsv",
     RETRIEVE,
     0,
-    "servers",
+    SERVERS_TABLE,
     0,
     qgsv_fields,
     1,
     0,
     3,
+    NULL,
     &qgsv_validate,
   },
 
@@ -3334,12 +3381,13 @@ struct query Queries2[] = {
     "asin",
     APPEND,
     "s",
-    "servers",
-    "INTO servers (name, update_int, target_file, script, type, enable, acl_type, acl_id) VALUES (uppercase('%s'),%s,'%s','%s','%s',%s,'%s',%d)",
+    SERVERS_TABLE,
+    "INTO servers (name, update_int, target_file, script, type, enable, acl_type, acl_id) VALUES (UPPER('%s'), %s, '%s', '%s', '%s', %s, '%s', %d)",
     asin_fields,
     8,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &asin_validate,
   },
 
@@ -3349,12 +3397,13 @@ struct query Queries2[] = {
     "usin",
     UPDATE,
     "s",
-    "servers",
+    SERVERS_TABLE,
     "servers SET update_int = %s, target_file = '%s', script = '%s', type = '%s', enable = %s, acl_type = '%s', acl_id = %d",
     asin_fields,
     7,
-    "name = uppercase('%s')",
+    "name = UPPER('%s')",
     1,
+    NULL,
     &asin_validate,
   },
 
@@ -3364,12 +3413,13 @@ struct query Queries2[] = {
     "rsve",
     UPDATE,
     "s",
-    "servers",
+    SERVERS_TABLE,
     "servers SET harderror = 0, dfcheck = dfgen",
     dsin_fields,
     0,
-    "name = uppercase('%s')",
+    "name = UPPER('%s')",
     1,
+    NULL,
     &rsve_validate,
   },
 
@@ -3379,12 +3429,13 @@ struct query Queries2[] = {
     "ssif",
     UPDATE,
     "s",
-    "servers",
-    "servers SET dfgen = %s, dfcheck = %s, inprogress = %s, harderror = %s, errmsg = '%s'",
+    SERVERS_TABLE,
+    "servers SET dfgen = %s, dfcheck = %s, inprogress = %s, harderror = %s, errmsg = NVL('%s', CHR(0))",
     ssif_fields,
     5,
-    "name = uppercase('%s')",
+    "name = UPPER('%s')",
     1,
+    NULL,
     &ssif_validate,
   },
 
@@ -3394,27 +3445,29 @@ struct query Queries2[] = {
     "dsin",
     DELETE,
     "s",
-    "servers",
-    (char *)0,
+    SERVERS_TABLE,
+    NULL,
     dsin_fields,
     0,
-    "name = uppercase('%s')",
+    "name = UPPER('%s')",
     1,
+    NULL,
     &dsin_validate,
   },
 
   {
-    /* Q_GSHI - GET_SERVER_HOST_INFO */ 
+    /* Q_GSHI - GET_SERVER_HOST_INFO */
     "get_server_host_info",
     "gshi",
     RETRIEVE,
     "sh",
-    "serverhosts",
-    "CHAR(sh.service), CHAR(m.name), CHAR(sh.enable), CHAR(sh.override), CHAR(sh.success), CHAR(sh.inprogress), CHAR(sh.hosterror), sh.hosterrmsg, CHAR(sh.ltt), CHAR(sh.lts), CHAR(sh.value1), CHAR(sh.value2), sh.value3, CHAR(sh.modtime), CHAR(sh.modby), sh.modwith FROM serverhosts sh, machine m",
+    SERVERHOSTS_TABLE,
+    "sh.service, m.name, sh.enable, sh.override, sh.success, sh.inprogress, sh.hosterror, sh.hosterrmsg, sh.ltt, sh.lts, sh.value1, sh.value2, sh.value3, TO_CHAR(sh.modtime, 'DD-mon-YYYY HH24:MI:SS'), sh.modby, sh.modwith FROM serverhosts sh, machine m",
     gshi_fields,
     16,
-    "sh.service LIKE '%s' ESCAPE '*' AND m.name LIKE '%s' ESCAPE '*' AND m.mach_id = sh.mach_id",
+    "sh.service LIKE UPPER('%s') AND m.name LIKE UPPER('%s') AND m.mach_id = sh.mach_id",
     2,
+    "sh.service, m.name",
     &gshi_validate,
   },
 
@@ -3424,12 +3477,13 @@ struct query Queries2[] = {
     "qgsh",
     RETRIEVE,
     0,
-    "serverhosts",
+    SERVERHOSTS_TABLE,
     0,
     qgsh_fields,
     2,
     0,
     6,
+    NULL,
     &qgsh_validate,
   },
 
@@ -3439,12 +3493,13 @@ struct query Queries2[] = {
     "ashi",
     APPEND,
     "sh",
-    "serverhosts",
-    "INTO serverhosts (service, mach_id, enable, value1, value2, value3) VALUES (uppercase('%s'), %d, %s, %s, %s, '%s')",
+    SERVERHOSTS_TABLE,
+    "INTO serverhosts (service, mach_id, enable, value1, value2, value3) VALUES (UPPER('%s'), %d, %s, %s, %s, NVL('%s', CHR(0)))",
     ashi_fields,
     6,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &ashi_validate,
   },
 
@@ -3454,12 +3509,13 @@ struct query Queries2[] = {
     "ushi",
     UPDATE,
     "sh",
-    "serverhosts",
-    "serverhosts SET enable = %s, value1 = %s, value2 = %s, value3 = '%s'",
+    SERVERHOSTS_TABLE,
+    "serverhosts SET enable = %s, value1 = %s, value2 = %s, value3 = NVL('%s', CHR(0))",
     ashi_fields,
     4,
-    "service = uppercase('%s') AND mach_id = %d",
+    "service = UPPER('%s') AND mach_id = %d",
     2,
+    NULL,
     &ashi_validate,
   },
 
@@ -3469,12 +3525,13 @@ struct query Queries2[] = {
     "rshe",
     UPDATE,
     "sh",
-    "serverhosts",
+    SERVERHOSTS_TABLE,
     "serverhosts SET hosterror = 0",
     dshi_fields,
     0,
-    "service = uppercase('%s') AND mach_id = %d",
+    "service = UPPER('%s') AND mach_id = %d",
     2,
+    NULL,
     &rshe_validate,
   },
 
@@ -3484,177 +3541,125 @@ struct query Queries2[] = {
     "ssho",
     UPDATE,
     "sh",
-    "serverhosts",
+    SERVERHOSTS_TABLE,
     "serverhosts SET override = 1",
     dshi_fields,
     0,
-    "service = uppercase('%s') AND mach_id = %d",
+    "service = UPPER('%s') AND mach_id = %d",
     2,
+    NULL,
     &ssho_validate,
   },
-
-  {
-    /* Q_SSHI - SET_SERVER_HOST_INTERNAL */
-    "set_server_host_internal",
-    "sshi",
-    UPDATE,
-    "s",
-    "serverhosts",
-    "serverhosts SET override = %s, success = %s, inprogress = %s, hosterror = %s, hosterrmsg = '%s', ltt = %s, lts = %s",
-    sshi_fields,
-    7,
-    "service = uppercase('%s') AND mach_id = %d", 
-    2,
-    &sshi_validate,
-  },
-
-  {
-    /* Q_DSHI - DELETE_SERVER_HOST_INFO */
-    "delete_server_host_info",
-    "dshi",
-    DELETE,
-    "sh",
-    "serverhosts",
-    (char *)0,
-    dshi_fields,
-    0,
-    "service = uppercase('%s') AND mach_id = %d",
-    2,
-    &dshi_validate,
-  },
-
-  {
-    /* Q_GSHA - GET_SERVER_HOST_ACCESS */ 
-    "get_server_host_access",
-    "gsha",
-    RETRIEVE,
-    "ha",
-    "hostaccess",
-    "CHAR(m.name), ha.acl_type, CHAR(ha.acl_id), CHAR(ha.modtime), CHAR(ha.modby), ha.modwith FROM hostaccess ha, machine m",
-    gsha_fields,
-    6,
-    "m.name LIKE '%s' ESCAPE '*' AND ha.mach_id = m.mach_id",
-    1,
-    &gsha_validate,
-  },
-
-  {
-    /* Q_ASHA - ADD_SERVER_HOST_ACCESS */
-    "add_server_host_access",
-    "asha",
-    APPEND,
-    "ha",
-    "hostaccess",
-    "INTO hostaccess (mach_id, acl_type, acl_id) VALUES (%d,'%s',%d)",
-    asha_fields,
-    3,
-    0,
-    0,
-    &asha_validate,
-  },
-
-  {
-    /* Q_USHA - UPDATE_SERVER_HOST_ACCESS */
-    "update_server_host_access",
-    "usha",
+
+  {
+    /* Q_SSHI - SET_SERVER_HOST_INTERNAL */
+    "set_server_host_internal",
+    "sshi",
     UPDATE,
-    "ha",
-    "hostaccess",
-    "hostaccess SET acl_type = '%s', acl_id = %d",
-    asha_fields,
+    "s",
+    SERVERHOSTS_TABLE,
+    "serverhosts SET override = %s, success = %s, inprogress = %s, hosterror = %s, hosterrmsg = NVL('%s', CHR(0)), ltt = %s, lts = %s",
+    sshi_fields,
+    7,
+    "service = UPPER('%s') AND mach_id = %d",
     2,
-    "mach_id = %d",
-    1,
-    &asha_validate,
+    NULL,
+    &sshi_validate,
   },
 
   {
-    /* Q_DSHA - DELETE_SERVER_HOST_ACCESS */
-    "delete_server_host_access",
-    "dsha",
+    /* Q_DSHI - DELETE_SERVER_HOST_INFO */
+    "delete_server_host_info",
+    "dshi",
     DELETE,
-    "ha",
-    "hostaccess",
-    0,
-    asha_fields,
+    "sh",
+    SERVERHOSTS_TABLE,
+    NULL,
+    dshi_fields,
     0,
-    "mach_id = %d",
-    1,
-    &VDmach,
+    "service = UPPER('%s') AND mach_id = %d",
+    2,
+    NULL,
+    &dshi_validate,
   },
 
   {
-    /* Q_GSLO - GET_SERVER_LOCATIONS */ 
+    /* Q_GSLO - GET_SERVER_LOCATIONS */
     "get_server_locations",
     "gslo",
     RETRIEVE,
     "sh",
-    "serverhosts",
-    "CHAR(sh.service), CHAR(m.name) FROM serverhosts sh, machine m",
+    SERVERHOSTS_TABLE,
+    "sh.service, m.name FROM serverhosts sh, machine m",
     gslo_fields,
     2,
-    "sh.service LIKE '%s' ESCAPE '*' AND sh.mach_id = m.mach_id",
+    "sh.service LIKE UPPER('%s') AND sh.mach_id = m.mach_id",
     1,
-    &VDupwild0,
+    "sh.service, m.name",
+    NULL,
   },
 
   {
-    /* Q_GFSL - GET_FILESYS_BY_LABEL */ 
+    /* Q_GFSL - GET_FILESYS_BY_LABEL */
     "get_filesys_by_label",
     "gfsl",
     RETRIEVE,
     "fs",
-    FILESYS,
-    "CHAR(fs.label), fs.type, CHAR(m.name), CHAR(fs.name), fs.mount, fs.access, fs.comments, CHAR(u.login), CHAR(l.name), CHAR(fs.createflg), fs.lockertype, CHAR(fs.modtime), CHAR(fs.modby), fs.modwith FROM filesys fs, machine m, users u, list l",
+    FILESYS_TABLE,
+    "fs.label, fs.type, m.name, fs.name, fs.mount, fs.rwaccess, fs.comments, u.login, l.name, fs.createflg, fs.lockertype, TO_CHAR(fs.modtime, 'DD-mon-YYYY HH24:MI:SS'), fs.modby, fs.modwith FROM filesys fs, machine m, users u, list l",
     gfsl_fields,
     14,
-    "fs.label LIKE '%s' ESCAPE '*' AND fs.mach_id = m.mach_id AND fs.owner = u.users_id AND fs.owners = l.list_id",
+    "fs.label LIKE '%s' AND fs.mach_id = m.mach_id AND fs.owner = u.users_id AND fs.owners = l.list_id",
     1,
-    &VDwildsortf,
+    "fs.label",
+    &VDfix_modby,
   },
 
   {
-    /* Q_GFSM - GET_FILESYS_BY_MACHINE */ 
+    /* Q_GFSM - GET_FILESYS_BY_MACHINE */
     "get_filesys_by_machine",
     "gfsm",
     RETRIEVE,
     "fs",
-    FILESYS,
-    "CHAR(fs.label), fs.type, CHAR(m.name), CHAR(fs.name), fs.mount, fs.access, fs.comments, CHAR(u.login), CHAR(l.name), CHAR(fs.createflg), fs.lockertype, CHAR(fs.modtime), CHAR(fs.modby), fs.modwith FROM filesys fs, machine m, users u, list l",
+    FILESYS_TABLE,
+    "fs.label, fs.type, m.name, fs.name, fs.mount, fs.rwaccess, fs.comments, u.login, l.name, fs.createflg, fs.lockertype, TO_CHAR(fs.modtime, 'DD-mon-YYYY HH24:MI:SS'), fs.modby, fs.modwith FROM filesys fs, machine m, users u, list l",
     gfsm_fields,
     14,
     "fs.mach_id = %d AND m.mach_id = fs.mach_id AND fs.owner = u.users_id AND fs.owners = l.list_id",
     1,
+    "fs.label",
     &gfsm_validate,
   },
 
   {
-    /* Q_GFSN - GET_FILESYS_BY_NFSPHYS */ 
+    /* Q_GFSN - GET_FILESYS_BY_NFSPHYS */
     "get_filesys_by_nfsphys",
     "gfsn",
     RETRIEVE,
     "fs",
-    FILESYS,
-    "CHAR(fs.label), fs.type, CHAR(m.name), CHAR(fs.name), fs.mount, fs.access, fs.comments, CHAR(u.login), CHAR(l.name), CHAR(fs.createflg), fs.lockertype, CHAR(fs.modtime), CHAR(fs.modby), fs.modwith FROM filesys fs, machine m, users u, list l, nfsphys np",
+    FILESYS_TABLE,
+    "fs.label, fs.type, m.name, fs.name, fs.mount, fs.rwaccess, fs.comments, u.login, l.name, fs.createflg, fs.lockertype, TO_CHAR(fs.modtime, 'DD-mon-YYYY HH24:MI:SS'), fs.modby, fs.modwith FROM filesys fs, machine m, users u, list l, nfsphys np",
     gfsn_fields,
     14,
-    "fs.mach_id = %d AND m.mach_id = fs.mach_id AND fs.owner = u.users_id AND fs.owners = l.list_id AND np.nfsphys_id = fs.phys_id AND np.dir LIKE '%s' ESCAPE '*' AND fs.type = 'NFS'", 
+    "fs.mach_id = %d AND m.mach_id = fs.mach_id AND fs.owner = u.users_id AND fs.owners = l.list_id AND np.nfsphys_id = fs.phys_id AND np.dir LIKE '%s' AND fs.type = 'NFS'",
     2,
+    "fs.label",
     &gfsn_validate,
   },
 
   {
-    /* Q_GFSG - GET_FILESYS_BY_GROUP */ 
+    /* Q_GFSG - GET_FILESYS_BY_GROUP */
     "get_filesys_by_group",
     "gfsg",
     RETRIEVE,
     "fs",
-    FILESYS,
-    "CHAR(fs.label), fs.type, CHAR(m.name), CHAR(fs.name), fs.mount, fs.access, fs.comments, CHAR(u.login), CHAR(l.name), CHAR(fs.createflg), fs.lockertype, CHAR(fs.modtime), CHAR(fs.modby), fs.modwith FROM filesys fs, machine m, users u, list l",
+    FILESYS_TABLE,
+    "fs.label, fs.type, m.name, fs.name, fs.mount, fs.rwaccess, fs.comments, u.login, l.name, fs.createflg, fs.lockertype, TO_CHAR(fs.modtime, 'DD-mon-YYYY HH24:MI:SS'), fs.modby, fs.modwith FROM filesys fs, machine m, users u, list l",
     gfsg_fields,
     14,
     "fs.owners = %d AND m.mach_id = fs.mach_id AND fs.owner = u.users_id AND fs.owners = l.list_id",
     1,
+    "fs.label",
     &gfsg_validate,
   },
 
@@ -3664,27 +3669,29 @@ struct query Queries2[] = {
     "gfsp",
     RETRIEVE,
     "fs",
-    FILESYS,
-    "CHAR(fs.label), fs.type, CHAR(m.name), CHAR(fs.name), fs.mount, fs.access, fs.comments, CHAR(u.login), CHAR(l.name), CHAR(fs.createflg), fs.lockertype, CHAR(fs.modtime), CHAR(fs.modby), fs.modwith FROM filesys fs, machine m, users u, list l",
+    FILESYS_TABLE,
+    "fs.label, fs.type, m.name, fs.name, fs.mount, fs.rwaccess, fs.comments, u.login, l.name, fs.createflg, fs.lockertype, TO_CHAR(fs.modtime, 'DD-mon-YYYY HH24:MI:SS'), fs.modby, fs.modwith FROM filesys fs, machine m, users u, list l",
     gfsp_fields,
     14,
-    "fs.name LIKE '%s' ESCAPE '*' AND m.mach_id = fs.mach_id AND fs.owner = u.users_id AND fs.owners = list_id",
+    "fs.name LIKE '%s' AND m.mach_id = fs.mach_id AND fs.owner = u.users_id AND fs.owners = list_id",
     1,
-    &VDwildsortf,
+    "fs.label",
+    &VDfix_modby,
   },
+
   {
     /* Q_AFIL - ADD_FILESYS */ /* uses prefetch_value() for filsys_id */
     "add_filesys",
     "afil",
     APPEND,
     "fs",
-    FILESYS,
-    "INTO filesys (label, type, mach_id, name, mount, access, comments, owner, owners, createflg, lockertype, filsys_id) VALUES ('%s','%s',%d,'%s','%s','%s','%s',%d,%d,%s,'%s',%s)",
+    FILESYS_TABLE,
+    "INTO filesys (label, type, mach_id, name, mount, rwaccess, comments, owner, owners, createflg, lockertype, filsys_id) VALUES ('%s', '%s', %d, NVL('%s', CHR(0)), '%s', '%s', NVL('%s', CHR(0)), %d, %d, %s, '%s', %s)",
     afil_fields,
     11,
     0,
     0,
+    NULL,
     &afil_validate,
   },
 
@@ -3694,13 +3701,14 @@ struct query Queries2[] = {
     "ufil",
     UPDATE,
     "fs",
-    FILESYS,
-    "filesys SET label = '%s', type = '%s', mach_id = %d, name = '%s', mount = '%s', access = '%s', comments = '%s', owner = %d, owners = %d, createflg = %s, lockertype = '%s'",
+    FILESYS_TABLE,
+    "filesys SET label = '%s', type = '%s', mach_id = %d, name = NVL('%s', CHR(0)), mount = '%s', rwaccess = '%s', comments = NVL('%s', CHR(0)), owner = %d, owners = %d, createflg = %s, lockertype = '%s'",
     ufil_fields,
     11,
     "filsys_id = %d",
     1,
-    &ufil_validate,      
+    NULL,
+    &ufil_validate,
   },
 
   {
@@ -3709,27 +3717,29 @@ struct query Queries2[] = {
     "dfil",
     DELETE,
     "fs",
-    FILESYS,
-    (char *)0,
+    FILESYS_TABLE,
+    NULL,
     dfil_fields,
     0,
     "filsys_id = %d",
     1,
+    NULL,
     &dfil_validate,
   },
 
   {
-    /* Q_GFGM - GET_FSGROUP_MEMBERS */ 
+    /* Q_GFGM - GET_FSGROUP_MEMBERS */
     "get_fsgroup_members",
     "gfgm",
     RETRIEVE,
     "fg",
-    "fsgroup",
-    "CHAR(fs.label), fg.key FROM fsgroup fg, filesys fs",
+    FSGROUP_TABLE,
+    "fs.label, fg.key FROM fsgroup fg, filesys fs",
     gfgm_fields,
     2,
     "fg.group_id = %d AND fs.filsys_id = fg.filsys_id",
     1,
+    "fs.label, fg.key",
     &gfgm_validate,
   },
 
@@ -3739,12 +3749,13 @@ struct query Queries2[] = {
     "aftg",
     APPEND,
     "fg",
-    "fsgroup",
-    "INTO fsgroup (group_id,filsys_id,key) VALUES (%d, %d, '%s')",
+    FSGROUP_TABLE,
+    "INTO fsgroup (group_id, filsys_id, key) VALUES (%d, %d, '%s')",
     gfgm_fields,
     3,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &aftg_validate,
   },
 
@@ -3754,42 +3765,45 @@ struct query Queries2[] = {
     "rffg",
     DELETE,
     "fg",
-    "fsgroup",
-    (char *)0,
+    FSGROUP_TABLE,
+    NULL,
     gfgm_fields,
     0,
     "group_id = %d AND filsys_id = %d",
     2,
+    NULL,
     &aftg_validate,
   },
 
   {
-    /* Q_GANF - GET_ALL_NFSPHYS */ 
+    /* Q_GANF - GET_ALL_NFSPHYS */
     "get_all_nfsphys",
     "ganf",
     RETRIEVE,
     "np",
-    "nfsphys",
-    "CHAR(m.name), CHAR(np.dir), np.device, CHAR(np.status), CHAR(np.allocated), CHAR(np.partsize), CHAR(np.modtime), CHAR(np.modby), np.modwith FROM nfsphys np, machine m",
+    NFSPHYS_TABLE,
+    "m.name, np.dir, np.device, np.status, np.allocated, np.partsize, TO_CHAR(np.modtime, 'DD-mon-YYYY HH24:MI:SS'), np.modby, np.modwith FROM nfsphys np, machine m",
     ganf_fields,
     9,
     "m.mach_id = np.mach_id",
     0,
-    &VDsortf,
+    "m.name, np.dir",
+    &VDfix_modby,
   },
 
   {
-    /* Q_GNFP - GET_NFSPHYS */ 
+    /* Q_GNFP - GET_NFSPHYS */
     "get_nfsphys",
     "gnfp",
     RETRIEVE,
     "np",
-    "nfsphys",
-    "CHAR(m.name), CHAR(np.dir), np.device, CHAR(np.status), CHAR(np.allocated), CHAR(np.partsize), CHAR(np.modtime), CHAR(np.modby), np.modwith FROM nfsphys np, machine m",
+    NFSPHYS_TABLE,
+    "m.name, np.dir, np.device, np.status, np.allocated, np.partsize, TO_CHAR(np.modtime, 'DD-mon-YYYY HH24:MI:SS'), np.modby, np.modwith FROM nfsphys np, machine m",
     gnfp_fields,
     9,
-    "np.mach_id = %d AND np.dir LIKE '%s' ESCAPE '*' AND m.mach_id = np.mach_id", 
+    "np.mach_id = %d AND np.dir LIKE '%s' AND m.mach_id = np.mach_id",
     2,
+    "m.name, np.dir",
     &gnfp_validate,
   },
 
@@ -3799,12 +3813,13 @@ struct query Queries2[] = {
     "anfp",
     APPEND,
     "np",
-    "nfsphys",
-    "INTO nfsphys (mach_id, dir, device, status, allocated, partsize, nfsphys_id) VALUES (%d, '%s', '%s', %s, %s, %s, %s)",
+    NFSPHYS_TABLE,
+    "INTO nfsphys (mach_id, dir, device, status, allocated, partsize, nfsphys_id) VALUES (%d, '%s', NVL('%s', CHR(0)), %s, %s, %s, %s)",
     ganf_fields,
     6,
     0,
     0,
+    NULL,
     &anfp_validate,
   },
 
@@ -3814,12 +3829,13 @@ struct query Queries2[] = {
     "unfp",
     UPDATE,
     "np",
-    "nfsphys",
-    "nfsphys SET device = '%s', status = %s, allocated = %s, partsize = %s",
+    NFSPHYS_TABLE,
+    "nfsphys SET device = NVL('%s', CHR(0)), status = %s, allocated = %s, partsize = %s",
     ganf_fields,
     4,
-    "mach_id = %d AND dir = '%s'", 
+    "mach_id = %d AND dir = '%s'",
     2,
+    NULL,
     &unfp_validate,
   },
 
@@ -3829,13 +3845,14 @@ struct query Queries2[] = {
     "ajnf",
     UPDATE,
     "np",
-    "nfsphys",
+    NFSPHYS_TABLE,
     "nfsphys SET allocated = allocated + %s",
     ajnf_fields,
     1,
     "mach_id = %d AND dir = '%s'",
     2,
-    &unfp_validate,
+    NULL,
+    &ajnf_validate,
   },
 
   {
@@ -3844,42 +3861,45 @@ struct query Queries2[] = {
     "dnfp",
     DELETE,
     "np",
-    "nfsphys",
-    (char *)0,
+    NFSPHYS_TABLE,
+    NULL,
     dnfp_fields,
     0,
     "mach_id = %d AND dir = '%s'",
     2,
+    NULL,
     &dnfp_validate,
   },
 
   {
-    /* Q_GQOT - GET_QUOTA */ 
+    /* Q_GQOT - GET_QUOTA */
     "get_quota",
     "gqot",
     RETRIEVE,
     "q",
-    QUOTA,
-    "CHAR(fs.label), q.type, CHAR(q.entity_id), CHAR(q.quota), CHAR(q.phys_id), CHAR(m.name), CHAR(q.modtime), CHAR(q.modby), q.modwith FROM quota q, filesys fs, machine m",
+    QUOTA_TABLE,
+    "fs.label, q.type, q.entity_id, q.quota, q.phys_id, m.name, TO_CHAR(q.modtime, 'DD-mon-YYYY HH24:MI:SS'), q.modby, q.modwith FROM quota q, filesys fs, machine m",
     gqot_fields,
     9,
-    "fs.label LIKE '%s' ESCAPE '*' AND q.type = '%s' AND q.entity_id = %d AND fs.filsys_id = q.filsys_id AND m.mach_id = fs.mach_id",
+    "fs.label LIKE '%s' AND q.type = '%s' AND q.entity_id = %d AND fs.filsys_id = q.filsys_id AND m.mach_id = fs.mach_id",
     3,
+    NULL,
     &gqot_validate,
   },
 
   {
-    /* Q_GQBF - GET_QUOTA_BY_FILESYS */ 
+    /* Q_GQBF - GET_QUOTA_BY_FILESYS */
     "get_quota_by_filesys",
     "gqbf",
     RETRIEVE,
     "q",
-    QUOTA,
-    "CHAR(fs.label), q.type, CHAR(q.entity_id), CHAR(q.quota), CHAR(q.phys_id), CHAR(m.name), CHAR(q.modtime), CHAR(q.modby), q.modwith FROM quota q, filesys fs, machine m",
+    QUOTA_TABLE,
+    "fs.label, q.type, q.entity_id, q.quota, q.phys_id, m.name, TO_CHAR(q.modtime, 'DD-mon-YYYY HH24:MI:SS'), q.modby, q.modwith FROM quota q, filesys fs, machine m",
     gqbf_fields,
     9,
-    "fs.label LIKE '%s' ESCAPE '*' AND fs.filsys_id = q.filsys_id AND m.mach_id = fs.mach_id",
+    "fs.label LIKE '%s' AND fs.filsys_id = q.filsys_id AND m.mach_id = fs.mach_id",
     1,
+    "fs.label, q.type",
     &gqbf_validate,
   },
 
@@ -3889,12 +3909,13 @@ struct query Queries2[] = {
     "aqot",
     APPEND,
     0,
-    QUOTA,
+    QUOTA_TABLE,
     "INTO quota (filsys_id, type, entity_id, quota, phys_id) VALUES ('%s', %d, %d, %s, %s)",
     aqot_fields,
     4,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &aqot_validate,
   },
 
@@ -3904,12 +3925,13 @@ struct query Queries2[] = {
     "uqot",
     UPDATE,
     0,
-    QUOTA,
+    QUOTA_TABLE,
     "quota SET quota = %s",
     aqot_fields,
     1,
     0,
     3,
+    NULL,
     &uqot_validate,
   },
 
@@ -3919,43 +3941,46 @@ struct query Queries2[] = {
     "dqot",
     DELETE,
     0,
-    QUOTA,
-    (char *)0,
+    QUOTA_TABLE,
+    NULL,
     aqot_fields,
     0,
     0,
     3,
+    NULL,
     &dqot_validate,
   },
 
   {
-    /* Q_GNFQ - GET_NFS_QUOTAS */ 
+    /* Q_GNFQ - GET_NFS_QUOTAS */
     "get_nfs_quota",
     "gnfq",
     RETRIEVE,
     "q",
-    QUOTA,
-    "CHAR(fs.label), CHAR(u.login), CHAR(q.quota), CHAR(q.phys_id), CHAR(m.name), CHAR(q.modtime), CHAR(q.modby), q.modwith FROM quota q, filesys fs, users u, machine m",
+    QUOTA_TABLE,
+    "fs.label, u.login, q.quota, q.phys_id, m.name, TO_CHAR(q.modtime, 'DD-mon-YYYY HH24:MI:SS'), q.modby, q.modwith FROM quota q, filesys fs, users u, machine m",
     gnfq_fields,
     8,
-    "fs.label LIKE '%s' ESCAPE '*' AND q.type = 'USER' AND q.entity_id = u.users_id AND fs.filsys_id = q.filsys_id AND m.mach_id = fs.mach_id AND u.login = '%s'",
+    "fs.label LIKE '%s' AND q.type = 'USER' AND q.entity_id = u.users_id AND fs.filsys_id = q.filsys_id AND m.mach_id = fs.mach_id AND u.login = '%s'",
     2,
+    "fs.label, u.login",
     &gnfq_validate,
   },
 
   {
-    /* Q_GNQP - GET_NFS_QUOTAS_BY_PARTITION */ 
+    /* Q_GNQP - GET_NFS_QUOTAS_BY_PARTITION */
     "get_nfs_quotas_by_partition",
     "gnqp",
     RETRIEVE,
     "q",
-    QUOTA,
-    "CHAR(fs.label), CHAR(u.login), CHAR(q.quota), CHAR(np.dir), CHAR(m.name) FROM quota q, filesys fs, users u, nfsphys np, machine m",
+    QUOTA_TABLE,
+    "fs.label, u.login, q.quota, np.dir, m.name FROM quota q, filesys fs, users u, nfsphys np, machine m",
     gnqp_fields,
     5,
-    "np.mach_id = %d AND np.dir LIKE '%s' ESCAPE '*' AND q.phys_id = np.nfsphys_id AND fs.filsys_id = q.filsys_id AND q.type = 'USER' AND u.users_id = q.entity_id AND m.mach_id = np.mach_id",
+    "np.mach_id = %d AND np.dir LIKE '%s' AND q.phys_id = np.nfsphys_id AND fs.filsys_id = q.filsys_id AND q.type = 'USER' AND u.users_id = q.entity_id AND m.mach_id = np.mach_id",
     2,
-    &gnqp_validate,
+    "fs.label",
+    NULL,
   },
 
   {
@@ -3964,27 +3989,29 @@ struct query Queries2[] = {
     "anfq",
     APPEND,
     0,
-    QUOTA,
+    QUOTA_TABLE,
     "INTO quota (type, filsys_id, entity_id, quota, phys_id ) VALUES ('USER', %d, %d, %s, %s)",
     anfq_fields,
     3,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &anfq_validate,
   },
 
   {
-    /* Q_UNFQ - UPDATE_NFS_QUOTA */ 
+    /* Q_UNFQ - UPDATE_NFS_QUOTA */
     "update_nfs_quota",
     "unfq",
     UPDATE,
     0,
-    QUOTA,
+    QUOTA_TABLE,
     "quota SET quota = %s",
     anfq_fields,
     1,
     0,
     2,
+    NULL,
     &unfq_validate,
   },
 
@@ -3994,224 +4021,31 @@ struct query Queries2[] = {
     "dnfq",
     DELETE,
     0,
-    QUOTA,
-    (char *)0,
+    QUOTA_TABLE,
+    NULL,
     anfq_fields,
     0,
     0,
     2,
+    NULL,
     &dnfq_validate,
   },
 
-  {
-    /* Q_GLIN - GET_LIST_INFO */
-    "get_list_info",
-    "glin",
-    RETRIEVE,
-    0,
-    LIST,
-    0,
-    glin_fields,
-    13,
-    0,
-    1,              
-    &glin_validate, 
-  },
-    
-  {
-    /* Q_EXLN - EXPAND_LIST_NAMES */
-    "expand_list_names",
-    "exln",
-    RETRIEVE,
-    "l",
-    LIST,
-    "CHAR(l.name) FROM list l",
-    glin_fields,
-    1,
-    "l.name LIKE '%s' ESCAPE '*' AND l.list_id != 0",
-    1,
-    &VDwild0,
-  },
-    
-  {
-    /* Q_ALIS - ADD_LIST */ /* uses prefetch_value() for list_id */
-    "add_list",
-    "alis",
-    APPEND,
-    "l",
-    LIST, 
-    "INTO list (name, active, publicflg, hidden, maillist, grouplist, gid, acl_type, acl_id, description, list_id) VALUES ('%s',%s,%s,%s,%s,%s,%s,'%s',%d,'%s',%s)",
-    alis_fields,
-    10,
-    0,
-    0,
-    &alis_validate,
-  },
-
-  {
-    /* Q_ULIS - UPDATE_LIST */
-    "update_list",
-    "ulis",
-    UPDATE,
-    "l",
-    LIST,
-    "list SET name='%s', active=%s, publicflg=%s, hidden=%s, maillist=%s, grouplist=%s, gid=%s, acl_type='%s', acl_id=%d, description='%s'",
-    ulis_fields,
-    10,
-    "list_id = %d",
-    1,
-    &ulis_validate,
-  },
-
-  {
-    /* Q_DLIS - DELETE_LIST */
-    "delete_list",
-    "dlis",
-    DELETE,
-    "l",
-    LIST,
-    (char *)0,
-    dlis_fields,
-    0,
-    "list_id = %d",
-    1,
-    &dlis_validate,
-  },
-
-  {
-    /* Q_AMTL - ADD_MEMBER_TO_LIST */
-    "add_member_to_list",
-    "amtl",
-    APPEND,
-    0,
-    "imembers",
-    0,
-    amtl_fields,
-    3,
-    (char *)0,
-    0,
-    &amtl_validate,
-  },
-
-  {
-    /* Q_DMFL - DELETE_MEMBER_FROM_LIST */
-    "delete_member_from_list",
-    "dmfl",
-    DELETE,
-    0,
-    "imembers",
-    (char *)0,
-    amtl_fields,
-    0,
-    0,
-    3,
-    &dmfl_validate,
-  },
-
-  {
-    /* Q_GAUS - GET_ACE_USE */
-    "get_ace_use",
-    "gaus",
-    RETRIEVE,
-    0,
-    0,
-    0,
-    gaus_fields,
-    2,
-    0,
-    2,
-    &gaus_validate,
-  },
-
-  {
-    /* Q_QGLI - QUALIFIED_GET_LISTS */
-    "qualified_get_lists",
-    "qgli",
-    RETRIEVE,
-    0,
-    LIST,
-    0,
-    qgli_fields,
-    1,
-    0,
-    5,
-    &qgli_validate,
-  },
-
-  {
-    /* Q_GMOL - GET_MEMBERS_OF_LIST */
-    "get_members_of_list",
-    "gmol",
-    RETRIEVE,
-    (char *)0,
-    "imembers",
-    (char *)0,
-    gmol_fields,
-    2,
-    (char *)0,
-    1,
-    &gmol_validate,
-  },
-
-  {
-    /* Q_GEML - GET_END_MEMBERS_OF_LIST */
-    "get_end_members_of_list",
-    "geml",
-    RETRIEVE,
-    (char *)0,
-    "imembers",
-    (char *)0,
-    gmol_fields,
-    0,
-    (char *)0,
-    1,
-    &geml_validate,
-  },
-  {
-    /* Q_GLOM - GET_LISTS_OF_MEMBER */
-    "get_lists_of_member",
-    "glom",
-    RETRIEVE,
-    0,
-    "imembers",
-    0,
-    glom_fields,
-    6,
-    0,
-    2,
-    &glom_validate,
-  },
-
-  {
-    /* Q_CMOL - COUNT_MEMBERS_OF_LIST */
-    "count_members_of_list",
-    "cmol",
-    RETRIEVE,
-    0,
-    "imembers",
-    0,
-    cmol_fields,
-    1,
-    0,
-    1,
-    &cmol_validate,
-  },
-
   {
     /* Q_GZCL - GET_ZEPHYR_CLASS */
     "get_zephyr_class",
     "gzcl",
     RETRIEVE,
     "z",
-    "zephyr",
-    "CHAR(z.class), z.xmt_type, CHAR(z.xmt_id), z.sub_type, CHAR(z.sub_id), z.iws_type, CHAR(z.iws_id), z.iui_type, CHAR(z.iui_id), CHAR(z.modtime), CHAR(z.modby), z.modwith FROM zephyr z",
+    ZEPHYR_TABLE,
+    "class, xmt_type, xmt_id, sub_type, sub_id, iws_type, iws_id, iui_type, iui_id, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM zephyr",
     gzcl_fields,
     12,
-    "z.class LIKE '%s' ESCAPE '*'",
+    "class LIKE '%s'",
     1,
+    "class",
     &gzcl_validate,
-  },    
+  },
 
   {
     /* Q_AZCL - ADD_ZEPHYR_CLASS */
@@ -4219,14 +4053,15 @@ struct query Queries2[] = {
     "azcl",
     APPEND,
     "z",
-    "zephyr",
-    "INTO zephyr (class, xmt_type, xmt_id, sub_type, sub_id, iws_type, iws_id, iui_type, iui_id) VALUES ('%s','%s',%d,'%s',%d,'%s',%d,'%s',%d)",
+    ZEPHYR_TABLE,
+    "INTO zephyr (class, xmt_type, xmt_id, sub_type, sub_id, iws_type, iws_id, iui_type, iui_id) VALUES ('%s', '%s', %d, '%s', %d, '%s', %d, '%s', %d)",
     azcl_fields,
     9,
     0,
     0,
+    NULL,
     &azcl_validate,
-  },    
+  },
 
   {
     /* Q_UZCL - UPDATE_ZEPHYR_CLASS */
@@ -4234,14 +4069,15 @@ struct query Queries2[] = {
     "uzcl",
     UPDATE,
     "z",
-    "zephyr",
+    ZEPHYR_TABLE,
     "zephyr SET class = '%s', xmt_type = '%s', xmt_id = %d, sub_type = '%s', sub_id = %d, iws_type = '%s', iws_id = %d, iui_type = '%s', iui_id = %d",
     uzcl_fields,
     9,
     "class = '%s'",
     1,
+    NULL,
     &uzcl_validate,
-  },    
+  },
 
   {
     /* Q_DZCL - DELETE_ZEPHYR_CLASS */
@@ -4249,14 +4085,79 @@ struct query Queries2[] = {
     "dzcl",
     DELETE,
     "z",
-    "zephyr",
+    ZEPHYR_TABLE,
     0,
     uzcl_fields,
     0,
     "class = '%s'",
     1,
+    NULL,
     &dzcl_validate,
-  },    
+  },
+
+  {
+    /* Q_GSHA - GET_SERVER_HOST_ACCESS */
+    "get_server_host_access",
+    "gsha",
+    RETRIEVE,
+    "ha",
+    HOSTACCESS_TABLE,
+    "m.name, ha.acl_type, ha.acl_id, TO_CHAR(ha.modtime, 'DD-mon-YYYY HH24:MI:SS'), ha.modby, ha.modwith FROM hostaccess ha, machine m",
+    gsha_fields,
+    6,
+    "m.name LIKE UPPER('%s') AND ha.mach_id = m.mach_id",
+    1,
+    "m.name",
+    &gsha_validate,
+  },
+
+  {
+    /* Q_ASHA - ADD_SERVER_HOST_ACCESS */
+    "add_server_host_access",
+    "asha",
+    APPEND,
+    "ha",
+    HOSTACCESS_TABLE,
+    "INTO hostaccess (mach_id, acl_type, acl_id) VALUES (%d, '%s', %d)",
+    asha_fields,
+    3,
+    0,
+    0,
+    NULL,
+    &asha_validate,
+  },
+
+  {
+    /* Q_USHA - UPDATE_SERVER_HOST_ACCESS */
+    "update_server_host_access",
+    "usha",
+    UPDATE,
+    "ha",
+    HOSTACCESS_TABLE,
+    "hostaccess SET acl_type = '%s', acl_id = %d",
+    asha_fields,
+    2,
+    "mach_id = %d",
+    1,
+    NULL,
+    &asha_validate,
+  },
+
+  {
+    /* Q_DSHA - DELETE_SERVER_HOST_ACCESS */
+    "delete_server_host_access",
+    "dsha",
+    DELETE,
+    "ha",
+    HOSTACCESS_TABLE,
+    0,
+    asha_fields,
+    0,
+    "mach_id = %d",
+    1,
+    NULL,
+    &VDmach,
+  },
 
   {
     /* Q_GSVC - GET_SERVICE */
@@ -4264,13 +4165,14 @@ struct query Queries2[] = {
     "gsvc",
     RETRIEVE,
     "ss",
-    "services",
-    "CHAR(ss.name), ss.protocol, CHAR(ss.port), ss.description, CHAR(ss.modtime), CHAR(ss.modby), ss.modwith FROM services ss",
+    SERVICES_TABLE,
+    "name, protocol, port, description, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS'), modby, modwith FROM services",
     gsvc_fields,
     7,
-    "ss.name LIKE '%s' ESCAPE '*'",
+    "name LIKE '%s'",
     1,
-    &VDwildsortf,
+    "name",
+    &VDfix_modby,
   },
 
   {
@@ -4279,12 +4181,13 @@ struct query Queries2[] = {
     "asvc",
     APPEND,
     "ss",
-    "services",
-    "INTO services (name, protocol, port, description) VALUES ('%s','%s',%s,'%s')",
+    SERVICES_TABLE,
+    "INTO services (name, protocol, port, description) VALUES ('%s', '%s', %s, NVL('%s', CHR(0)))",
     asvc_fields,
     4,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &asvc_validate,
   },
 
@@ -4294,27 +4197,29 @@ struct query Queries2[] = {
     "dsvc",
     DELETE,
     "ss",
-    "services",
+    SERVICES_TABLE,
     0,
     asvc_fields,
     0,
     "name = '%s'",
     1,
+    NULL,
     &asvc_validate,
   },
 
   {
-    /* Q_GPCE - GET_PRINTCAP_ENTRY */ 
+    /* Q_GPCE - GET_PRINTCAP_ENTRY */
     "get_printcap_entry",
     "gpce",
     RETRIEVE,
     "pc",
-    "printcap",
-    "CHAR(pc.name), CHAR(m.name), pc.dir, pc.rp, CHAR(pc.quotaserver), CHAR(pc.auth), CHAR(pc.price), pc.comments, CHAR(pc.modtime), CHAR(pc.modby), pc.modwith FROM printcap pc, machine m",
+    PRINTCAP_TABLE,
+    "pc.name, m.name, pc.dir, pc.rp, pc.quotaserver, pc.auth, pc.price, pc.comments, TO_CHAR(pc.modtime, 'DD-mon-YYYY HH24:MI:SS'), pc.modby, pc.modwith FROM printcap pc, machine m",
     gpce_fields,
     11,
-    "pc.name LIKE '%s' ESCAPE '*' AND m.mach_id = pc.mach_id",
+    "pc.name LIKE '%s' AND m.mach_id = pc.mach_id",
     1,
+    "pc.name",
     &gpce_validate,
   },
 
@@ -4324,12 +4229,13 @@ struct query Queries2[] = {
     "apce",
     APPEND,
     "pc",
-    "printcap",
-    "INTO printcap (name, mach_id, dir, rp, quotaserver, auth, price, comments) VALUES ('%s',%d,'%s','%s',%d,%s,%s,'%s')",
+    PRINTCAP_TABLE,
+    "INTO printcap (name, mach_id, dir, rp, quotaserver, auth, price, comments) VALUES ('%s', %d, '%s', '%s', %d, %s, %s, NVL('%s', CHR(0)))",
     apce_fields,
     8,
     0,
     0,
+    NULL,
     &apce_validate,
   },
 
@@ -4339,12 +4245,13 @@ struct query Queries2[] = {
     "dpce",
     DELETE,
     "pc",
-    "printcap",
+    PRINTCAP_TABLE,
     0,
     apce_fields,
     0,
     "name = '%s'",
     1,
+    NULL,
     &dpce_validate,
   },
 
@@ -4354,13 +4261,14 @@ struct query Queries2[] = {
     "gpcp",
     RETRIEVE,
     "pc",
-    "printcap",
-    "CHAR(pc.name), CHAR(m.name), pc.dir, pc.rp, pc.comments, CHAR(pc.modtime), CHAR(pc.modby), pc.modwith FROM printcap pc, machine m",
+    PRINTCAP_TABLE,
+    "pc.name, m.name, pc.dir, pc.rp, pc.comments, TO_CHAR(pc.modtime, 'DD-mon-YYYY HH24:MI:SS'), pc.modby, pc.modwith FROM printcap pc, machine m",
     gpcp_fields,
     8,
-    "pc.name LIKE '%s' ESCAPE '*' AND m.mach_id = pc.mach_id",
+    "pc.name LIKE '%s' AND m.mach_id = pc.mach_id",
     1,
-    &VDwildsortf,
+    "pc.name",
+    &VDfix_modby,
   },
 
   {
@@ -4369,12 +4277,13 @@ struct query Queries2[] = {
     "dpcp",
     DELETE,
     "pc",
-    "printcap",
+    PRINTCAP_TABLE,
     0,
     apce_fields,
     0,
     "name = '%s'",
     1,
+    NULL,
     &dpce_validate,
   },
 
@@ -4384,13 +4293,14 @@ struct query Queries2[] = {
     "gpdm",
     RETRIEVE,
     "pal",
-    "palladium",
-    "CHAR(pal.name), CHAR(pal.ident), CHAR(m.name), CHAR(pal.modtime), CHAR(pal.modby), pal.modwith FROM palladium pal, machine m",
+    PALLADIUM_TABLE,
+    "pal.name, pal.identifier, m.name, TO_CHAR(pal.modtime, 'DD-mon-YYYY HH24:MI:SS'), pal.modby, pal.modwith FROM palladium pal, machine m",
     gpdm_fields,
     6,
-    "pal.name LIKE '%s' ESCAPE '*' AND m.mach_id = pal.mach_id",
+    "pal.name LIKE '%s' AND m.mach_id = pal.mach_id",
     1,
-    &VDwildsortf,
+    "pal.name",
+    &VDfix_modby,
   },
 
   {
@@ -4399,12 +4309,13 @@ struct query Queries2[] = {
     "apdm",
     APPEND,
     "pal",
-    "palladium",
-    "INTO palladium (name, ident, mach_id) VALUES ('%s',%s,%d)",
+    PALLADIUM_TABLE,
+    "INTO palladium (name, identifier, mach_id) VALUES ('%s', %s, %d)",
     apdm_fields,
     3,
     0,
     0,
+    NULL,
     &apdm_validate,
   },
 
@@ -4414,12 +4325,13 @@ struct query Queries2[] = {
     "dpdm",
     DELETE,
     "pal",
-    "palladium",
+    PALLADIUM_TABLE,
     0,
     apdm_fields,
     0,
     "name = '%s'",
     1,
+    NULL,
     &dpdm_validate,
   },
 
@@ -4429,13 +4341,14 @@ struct query Queries2[] = {
     "gali",
     RETRIEVE,
     "a",
-    ALIAS,
-    "CHAR(a.name), CHAR(a.type), CHAR(a.trans) FROM alias a",
+    ALIAS_TABLE,
+    "name, type, trans FROM alias",
     gali_fields,
     3,
-    "a.name LIKE '%s' ESCAPE '*' AND a.type LIKE '%s' ESCAPE '*' AND a.trans LIKE '%s' ESCAPE '*'",
+    "name LIKE '%s' AND type LIKE '%s' AND trans LIKE '%s'",
     3,
-    &VDwild3sort1,
+    "type, name, trans",
+    NULL,
   },
 
   {
@@ -4444,12 +4357,13 @@ struct query Queries2[] = {
     "aali",
     APPEND,
     "a",
-    ALIAS,
+    ALIAS_TABLE,
     "INTO alias (name, type, trans) VALUES ('%s', '%s', '%s')",
     aali_fields,
     3,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &aali_validate,
   },
 
@@ -4459,12 +4373,13 @@ struct query Queries2[] = {
     "dali",
     DELETE,
     "a",
-    ALIAS,
-    (char *)0,
+    ALIAS_TABLE,
+    NULL,
     aali_fields,
     0,
-    "name = '%s' AND type = '%s' AND  trans = '%s'", 
+    "name = '%s' AND type = '%s' AND  trans = '%s'",
     3,
+    NULL,
     &dali_validate,
   },
 
@@ -4474,12 +4389,13 @@ struct query Queries2[] = {
     "gval",
     RETRIEVE,
     "val",
-    "numvalues",
-    "CHAR(val.value) FROM numvalues val",
+    NUMVALUES_TABLE,
+    "value FROM numvalues",
     gval_fields,
     1,
-    "val.name = '%s'",
+    "name = '%s'",
     1,
+    NULL,
     &gval_validate,
   },
 
@@ -4489,12 +4405,13 @@ struct query Queries2[] = {
     "aval",
     APPEND,
     "val",
-    "numvalues",
+    NUMVALUES_TABLE,
     "INTO numvalues (name, value) VALUES ('%s', %s)",
     aval_fields,
     2,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &aval_validate,
   },
 
@@ -4504,12 +4421,13 @@ struct query Queries2[] = {
     "uval",
     UPDATE,
     "val",
-    "numvalues",
+    NUMVALUES_TABLE,
     "numvalues SET value = %s",
     aval_fields,
     1,
     "name = '%s'",
     1,
+    NULL,
     &aval_validate,
   },
 
@@ -4519,12 +4437,13 @@ struct query Queries2[] = {
     "dval",
     DELETE,
     "val",
-    "numvalues",
-    (char *)0,
+    NUMVALUES_TABLE,
+    NULL,
     dval_fields,
     0,
     "name = '%s'",
     1,
+    NULL,
     &aval_validate,
   },
 
@@ -4534,12 +4453,13 @@ struct query Queries2[] = {
     "gats",
     RETRIEVE,
     "tbs",
-    "tblstats",
-    "tbs.table_name, CHAR(tbs.appends), CHAR(tbs.updates), CHAR(tbs.deletes), CHAR(tbs.modtime) FROM tblstats tbs",
+    TBLSTATS_TABLE,
+    "table_name, appends, updates, deletes, TO_CHAR(modtime, 'DD-mon-YYYY HH24:MI:SS') FROM tblstats",
     gats_fields,
     5,
-    (char *)0,
+    NULL,
     0,
+    "table_name",
     0,
   },
 
@@ -4548,16 +4468,17 @@ struct query Queries2[] = {
     "_set_debug_level",
     "_sdl",
     UPDATE,
-    (char *)0,
-    (char *)0,
-    (char *)0,
+    NULL,
+    0,
+    NULL,
     _sdl_fields,
     1,
-    (char *)0,
+    NULL,
     0,
+    NULL,
     &_sdl_validate,
   },
 
 };
 
-int QueryCount2 = (sizeof Queries2 / sizeof (struct query));
+int QueryCount2 = (sizeof(Queries2) / sizeof(struct query));
This page took 0.32531 seconds and 4 git commands to generate.