Index: vhLib/TerminalDevice.cls.xml
===================================================================
diff -u -r2476 -r2513
--- vhLib/TerminalDevice.cls.xml	(.../TerminalDevice.cls.xml)	(revision 2476)
+++ vhLib/TerminalDevice.cls.xml	(.../TerminalDevice.cls.xml)	(revision 2513)
@@ -12,11 +12,12 @@
 
 <Method name="GeefIctGebruikerInitialenVanIP">
 <ClassMethod>1</ClassMethod>
-<FormalSpec>IP4Adres:%String</FormalSpec>
+<FormalSpec>IP4Adres:%String,ValideerInitialen:%Boolean=1</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim IP4Delen3en4 As %String = $piece(IP4Adres,".",3,4)
-	quit $Case(IP4Delen3en4, 
+	#dim GebruikerInitialen As %String = ""
+	Set GebruikerInitialen = $Case(IP4Delen3en4, 
 		"1.15":"pv", 
 		"1.97":"wv", 
 		"1.205":"wv", 
@@ -33,6 +34,12 @@
 		"1.74":"sca",
 		"1.207":"jwi",
 		:"")
+		
+   If (ValideerInitialen) && (GebruikerInitialen = "")  {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("GeefIctGebruikerInitialenVanIP is niet mogelijk. Definieer initialen voor IP '"_IP4Adres_"'.")
+   }
+   
+   Quit GebruikerInitialen
 ]]></Implementation>
 </Method>