open DB with SQL, not quel

diff --git a/backup/dump_db.dc b/backup/dump_db.dc
index 6dc214ae539513cfd67575e4ccf35270022f75eb..d6969a147a10976bfc7028f11a1a2dd5f9fc0283 100644 (file)
--- a/backup/dump_db.dc
+++ b/backup/dump_db.dc
@@ -20,6 +20,7 @@ static char *rcsid_dump_db_c = "$Header$";
 #include <sys/file.h>
 #include <ctype.h>
 #include <mit-copyright.h>
+EXEC SQL INCLUDE sqlca;
 #include "dump_db.h"
 
 /* putc without the line buffer hair */
@@ -52,14 +53,12 @@ main(argc, argv)
     act[127]=2;
     for (i=0; i<' '; i++) act[i]=2;
     
-##  ingres sms 
-##  set lockmode session where level = table
-##  begin transaction
+    EXEC SQL CONNECT moira;
+    EXEC SQL set lockmode session where level = table;
 
     do_backups(prefix);
 
-##  end transaction    
-##  exit
+    EXEC SQL DISCONNECT;
     exit(0);
 }