Index: vhUnitTest/APPS/VisiDot/impl/TestVHossService.cls.xml
===================================================================
diff -u -r58842 -r58850
--- vhUnitTest/APPS/VisiDot/impl/TestVHossService.cls.xml	(.../TestVHossService.cls.xml)	(revision 58842)
+++ vhUnitTest/APPS/VisiDot/impl/TestVHossService.cls.xml	(.../TestVHossService.cls.xml)	(revision 58850)
@@ -15,7 +15,7 @@
 <Method name="Test: Flow VHoss">
 <Implementation><![CDATA[
 		#dim KlantID As %String = "K||1000"
-		#dim VHossID As %String = 8888
+		#dim VHossID As %String = "O1123456"
 		Set VHossService = ##class(APPS.VisiDot.impl.VHossService).%New()
 		Do VHossService.LeenUitVHoss(KlantID, VHossID)
 		
@@ -37,7 +37,7 @@
 		#dim AantalDagenTussen = 3
 	
 		#dim KlantID As %String = "K||1000"
-		#dim VHossID As %String = 8888
+		#dim VHossID As %String = "O1123456"
 		Set VHossService = ##class(APPS.VisiDot.impl.VHossService).%New()
 		Do VHossService.LeenUitVHoss(KlantID, VHossID)