EXEC SQL END DECLARE SECTION;
#ifsql INGRES
- EXEC SQL CONNECT sms;
+ EXEC SQL CONNECT moira;
#endsql
#ifsql INFORMIX
- EXEC SQL DATABASE sms;
+ EXEC SQL DATABASE moira;
#endsql
if (argc == 2) {
EXEC SQL WHENEVER SQLERROR GOTO sqlerr;
EXEC SQL DECLARE x CURSOR FOR
- SELECT login, mit_year FROM users WHERE status = 1;
+ SELECT login, type FROM users WHERE status = 1;
EXEC SQL OPEN x;
while (1) {
EXEC SQL FETCH x INTO :login, :class;