out = stdout;
initialize_sms_error_table();
#ifsql INGRES
- EXEC SQL CONNECT sms;
+ EXEC SQL CONNECT moira;
#endsql
#ifsql INFORMIX
- EXEC SQL DATABASE sms;
+ EXEC SQL DATABASE moira;
#endsql
register struct member *m;
register struct list *memberlist;
+ /* The following WHENEVER is declarative, not executed,
+ * and applies for the remainder of this file only.
+ */
EXEC SQL WHENEVER SQLERROR GOTO sqlerr;
/* get locks */
- EXEC SQL SELECT modtime INTO :buf FROM list WHERE LIST_ID = 0;
- EXEC SQL SELECT modtime INTO :buf FROM list WHERE USERS_ID = 0;
+ EXEC SQL SELECT modtime INTO :buf FROM list WHERE list_id = 0;
+ EXEC SQL SELECT modtime INTO :buf FROM list WHERE users_id = 0;
fprintf(stderr, "Loading machines\n");
machines = create_hash(1000);
lists = create_hash(15001);
EXEC SQL DECLARE l_cursor CURSOR FOR
- SELECT list_id, name, maillist, desc, acl_type, acl_id
+ SELECT list_id, name, maillist, description, acl_type, acl_id
FROM list WHERE active != 0;
EXEC SQL OPEN l_cursor;
while (1) {