Index: WS/WebService.inc.rou
===================================================================
diff -u
--- WS/WebService.inc.rou	(revision 0)
+++ WS/WebService.inc.rou	(revision 15)
@@ -0,0 +1,5 @@
+ 
+ 
+#define LogIncomming(%l,%m) 	do ##class(%l).%New().LogIncomming(..%ClassName(1),"%m")
+#define LogOutgoing(%l,%m,%r) 	do ##class(%l).%New().LogOutgoing(..%ClassName(1),"%m",%r)
+	
\ No newline at end of file