From: danw <danw>
Date: Tue, 17 Jun 1997 20:22:04 +0000 (+0000)
Subject: Finally implement _set_debug_level. (SQL trace will go to a file in
X-Git-Url: http://andersk.mit.edu/gitweb/moira.git/commitdiff_plain/f27b30aa6cde299bd543b3acaa562437175ce259

Finally implement _set_debug_level. (SQL trace will go to a file in
/usr/oracle/rdbms/log/)
---

diff --git a/server/qfollow.pc b/server/qfollow.pc
index 686b26f1..7260cc01 100644
--- a/server/qfollow.pc
+++ b/server/qfollow.pc
@@ -1243,13 +1243,13 @@ int _sdl_followup(q, argv, cl)
     int i;
     i = atoi(argv[0]);
     log_flags = i;
-#ifdef INGRES
+
     if (i & LOG_SQL) {
-	EXEC SQL set printqry;
+	EXEC SQL ALTER SESSION SET SQL_TRACE TRUE;
     } else {
-	EXEC SQL set noprintqry;
+	EXEC SQL ALTER SESSION SET SQL_TRACE FALSE;
     }
-#endif
+    
     return(MR_SUCCESS);
 }