Index: vhLib.mac.rou
===================================================================
diff -u -r1523 -r1926
--- vhLib.mac.rou	(.../vhLib.mac.rou)	(revision 1523)
+++ vhLib.mac.rou	(.../vhLib.mac.rou)	(revision 1926)
@@ -1195,10 +1195,16 @@
  
 GetClientIP()
     new IP
-	if ($D(MApplication)) { Set IP = MApplication.GetClientIP() }
- 	elseif ($IsObject($G(%request)))&&(%request.%IsA("%CSP.Request")) 
- 	 { Set IP=$G(%request.CgiEnvs("REMOTE_ADDR")) }
- 	else { set IP = $$GetIPFromTerminalSessie }
+	if ($D(MApplication)) { 
+		Set IP = MApplication.GetClientIP() 
+	}
+ 	elseif ($IsObject($G(%request)))&&(%request.%IsA("%CSP.Request")) { 
+ 		Set IP=$G(%request.CgiEnvs("REMOTE_ADDR")) 
+ 	}
+ 	else { 
+ 		Set IP = $$GetIPFromTerminalSessie
+ 		Set:(IP="") IP=##class(%SYSTEM.Process).%OpenId($JOB).ClientIPAddressGet()   ; Added by WimV on 30/08/2011   --> voor factory-connection 
+ 	}
  	quit IP