Index: vhUnitTest/APPS/OV/impl/TestFlowObjectInhoudService.cls.xml
===================================================================
diff -u -r734 -r867
--- vhUnitTest/APPS/OV/impl/TestFlowObjectInhoudService.cls.xml	(.../TestFlowObjectInhoudService.cls.xml)	(revision 734)
+++ vhUnitTest/APPS/OV/impl/TestFlowObjectInhoudService.cls.xml	(.../TestFlowObjectInhoudService.cls.xml)	(revision 867)
@@ -1,13 +1,42 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:12">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-02-09 14:51:59">
 <Class name="vhUnitTest.APPS.OV.impl.TestFlowObjectInhoudService">
 <Description>
 do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.OV.impl.TestFlowObjectInhoudService")</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>vhUnitTest.TestCase</Super>
-<TimeChanged>62109,32062.003288</TimeChanged>
+<TimeChanged>62131,53568.47021</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
+<Method name="OnBeforeAllTests">
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+
+	set sc = ##super()
+	
+	Set ^KOD(14245,"F",105079,0) = 102
+	Set ^KOD(14245,"F",105079,1) = "\20.12.10\20.12.10 u/tel NSL/BA\\\14245\DI1\1112#1178#62080,47045\\\\\\1\\\\EUR\\\00\1\\DIV#62080,47045#105079\\\\\\\\\\\\\\\\\\\\\62080,47062"
+	Set ^KOD(14245,"F",105079,2) = "\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"
+	Set ^KOD(14245,"F",105079,3) = "\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"
+	Set ^KOD(14245,"F",105079,4) = 2
+	Set ^KOD(14245,"F",105079,101) = "703002 \9896\-1\\\8.04\0#\0\-8.04\-8.04\703002 \L\\Z\100\-8.04\KF0\\\\E1\EUR\\\62081\\\\\\\\\\\\\\\\\\\\\0\\"
+	
+	Set ^KO1(105079,"F") = "14245\"
+	
+	Set ^KOD(14308,"F",113220,0) = 103
+	Set ^KOD(14308,"F",113220,1) = "\25.03.10\25.03.10 jeroen\\\14308\DI1\31#1178#61810,34261\Stefan Willemsen\\\\\1\\\\EUR\tel.sw\\00\1\\31#61810,34261#113220\\\\\\\\\\\\\\\\77417\"
+	Set ^KOD(14308,"F",113220,2) = "\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"
+	Set ^KOD(14308,"F",113220,3) = "\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"
+	Set ^KOD(14308,"F",113220,4) = 3
+	Set ^KOD(14308,"F",113220,101) = "703002 \501133\1\\\0.53\0#\0\0.53\0.53\703002 \L\\\100\0.53\KF0\\\\E1\EUR\\\61807\\\\\\\\\\\\\\\\\\\\\1"
+	Set ^KOD(14308,"F",113220,102) = "703002 \501134\1\\\0.53\0#\0\0.53\0.53\703002 \L\\\200\0.53\KF0\\\\E1\EUR\\\61807\\\\\\\\\\\\\\\\\\\\\1"
+	
+	Set ^KO1(113220,"F") = "14308\"
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="TestService">
 <Implementation><![CDATA[
 	Set OrderAPI = ##class(DOM.DomeinContext).Instance().GeefOrderAPI()
@@ -22,12 +51,12 @@
 	Set BevatLangGoed = ##class(APPS.OV.impl.FlowObjectInhoudService).BonBevatLangGoed(Bon)
 	Do $$$AssertTrue(BevatLangGoed,"De bon bevat langgoed")
 	
-	Set OrderNr = 105780
+	Set OrderNr = 113220
 	Set Order = OrderAPI.GeefOrder(OrderNr)
 	Set BevatLangGoed = ##class(APPS.OV.impl.FlowObjectInhoudService).OrderBevatLangGoed(Order)
 	Do $$$AssertFalse(BevatLangGoed,"Het order bevat geen langgoed")
 	
-	Set OrderNr = 105803
+	Set OrderNr = 105079
 	Set Order = OrderAPI.GeefOrder(OrderNr)
 	Set BevatLangGoed = ##class(APPS.OV.impl.FlowObjectInhoudService).OrderBevatLangGoed(Order)
 	Do $$$AssertTrue(BevatLangGoed,"Het order bevat langgoed")
@@ -54,5 +83,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="720904211"/>
+<Checksum value="3247371113"/>
 </Export>