Index: vhLib/Macro.inc.rou
===================================================================
diff -u -r2 -r140
--- vhLib/Macro.inc.rou	(.../Macro.inc.rou)	(revision 2)
+++ vhLib/Macro.inc.rou	(.../Macro.inc.rou)	(revision 140)
@@ -1,7 +1,7 @@
  
  // Koppeling tussen User en IP adres / IO-device =
 #define IctUserFromIP(%ip)             $$$IctUserFromIP4($P(%ip,".",4))
-#define IctUserFromIP4(%ip4)           $Case(%ip4, 15:"pv", 27:"cw", 97:"wv", 127:"jbl", 138:"wro", 150:"pra", 191:"csc" , 195:"jcl", 204:"fma" , 205:"csc", :"")
+#define IctUserFromIP4(%ip4)           $Case(%ip4, 15:"pv", 27:"cw", 97:"wv", 127:"jbl", 138:"wro", 150:"pra", 191:"csc" , 195:"jcl", 204:"fma" , 205:"wv", 206:"jcl", 49:"csc", 95:"jbl", :"")
  
 #define UserFromDevice(%v)             $$$TextBetween(%v,"|TNT|","_")
 #define IctUserFromDevice(%v)          $Select($$$UserFromDevice(%v)?1(1"pv",1"cw",1"wv",1"jbl",1"wro",1"pra",1"jcl",1"fma",1"csc"):$$$UserFromDevice(%v), 1:"")
Index: vhDeploy/WV/Deploy20120208ICTUserFromIP.cls.xml
===================================================================
diff -u
--- vhDeploy/WV/Deploy20120208ICTUserFromIP.cls.xml	(revision 0)
+++ vhDeploy/WV/Deploy20120208ICTUserFromIP.cls.xml	(revision 140)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.WV.Deploy20120208ICTUserFromIP">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Compileren van code met macro $$$IctUserFromIP</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set LijstClassesEnRoutines = "TECH.Error.impl.ErrorHandler.cls,vhLib.Logger.cls,vhLib.mac,cspBasis.Library.mac"
+	
+	Write "Volgende code wordt gecompileerd : "_LijstClassesEnRoutines,!,! 
+	Do $System.OBJ.CompileList(LijstClassesEnRoutines,.qspec,.Errors)
+	
+	If ($D(Errors))&&($G(Errors)>0) {
+		Write "Errors bij het compileren van de code : ",!
+		Write $$ArrayToText^vhLib("Errors",.Errors),!
+		Write !
+		Write "Gelieve deze items manueel te compileren: ",!
+		Write LijstClassesEnRoutines,!,!
+	}
+	Else {
+		Write "De items zijn succesvol gecompileerd."
+	}
+]]></Implementation>
+</Method>
+</Class>
+</Export>