Index: vhUnitTest/APPS/OrderUitvoering/TestOrderUitvoeringService.cls.xml
===================================================================
diff -u -r2487 -r2771
--- vhUnitTest/APPS/OrderUitvoering/TestOrderUitvoeringService.cls.xml	(.../TestOrderUitvoeringService.cls.xml)	(revision 2487)
+++ vhUnitTest/APPS/OrderUitvoering/TestOrderUitvoeringService.cls.xml	(.../TestOrderUitvoeringService.cls.xml)	(revision 2771)
@@ -17,7 +17,7 @@
 	
 	Set ReservatieStructuur = Service.MaakReservatieStructuur(Order, OrderLijn)
 	Do $$$AssertEquals(ReservatieStructuur.TransactieReferentie,90000,"Het ordernr")
-	Do $$$AssertEquals(ReservatieStructuur.TransactieLijnReferentie,101,"Het order lijn nr")
+	Do $$$AssertEquals(ReservatieStructuur.TransactieLijnReferentie,100,"Het order lijn uniek nr")
 	Do $$$AssertEquals(ReservatieStructuur.Bedrijf,##class(DOM.common.enu.Bedrijf).VanHoecke(),"Het bedrijf")
 	
 	Set MoederProductReservatie = ReservatieStructuur.Reservatie
@@ -51,17 +51,17 @@
 	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
 	
 	Set OrderID = 90000
-	Set OrderLijnID = 101
+	Set OrderLijnCode = 100
 	Set KlantID = 1000
 	Set ProductID = 700
 	
 	// Nieuwe productlijn aanmaken
 	
-	Set ProductOrderLijnEventData = ##class(DOM.VKP.event.ProductOrderLijnEventData).%New(OrderID, OrderLijnID, KlantID, ProductID)
+	Set ProductOrderLijnEventData = ##class(DOM.VKP.event.ProductOrderLijnEventData).%New(OrderID, OrderLijnCode, KlantID, ProductID)
 	Set ProductOrderLijnGemaaktEvent = ##class(DOM.VKP.event.ProductOrderLijnGemaakt).%New(ProductOrderLijnEventData)
 	Do ##class(APPS.OrderUitvoering.impl.OrderUitvoeringServiceImpl).BijProductOrderLijnGemaakt(ProductOrderLijnGemaaktEvent)
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnID,##class(DOM.common.enu.Bedrijf).VanHoecke())
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).VanHoecke())
 	Do $$$AssertTrue($IsObject(VerwachteUitvoer),"De verwachte uitvoer werd aangemaakt")
 	Set VerwachteUitvoer = ""
 	
@@ -73,11 +73,11 @@
 	Set WijzigingTypes = ##class(DOM.VKP.impl.ProductOrderLijnWijzigingTypes).%New()
 	Do WijzigingTypes.Insert(##class(DOM.VKP.enu.ProductOrderLijnWijzigingType).Aantal())
 	Do WijzigingTypes.Insert(##class(DOM.VKP.enu.ProductOrderLijnWijzigingType).Leverdatum())
-	Set ProductOrderLijnWijzigEventData = ##class(DOM.VKP.event.ProductOrderLijnWijzigEventData).%New(OrderID, OrderLijnID, KlantID, ProductID, WijzigingTypes)
+	Set ProductOrderLijnWijzigEventData = ##class(DOM.VKP.event.ProductOrderLijnWijzigEventData).%New(OrderID, OrderLijnCode, KlantID, ProductID, WijzigingTypes)
 	Set ProductOrderLijnGewijzigdEvent = ##class(DOM.VKP.event.ProductOrderLijnGewijzigd).%New(ProductOrderLijnWijzigEventData)
 	Do ##class(APPS.OrderUitvoering.impl.OrderUitvoeringServiceImpl).BijProductOrderLijnGewijzigd(ProductOrderLijnGewijzigdEvent)
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnID,##class(DOM.common.enu.Bedrijf).VanHoecke())
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).VanHoecke())
 	Set Reservatie = VerwachteUitvoer.GeefReservatie()
 	Do $$$AssertEquals(Reservatie.GeefAantal(),1,"Het aantal van het moederproduct is op 1 geplaatst")
 	Do $$$AssertEquals(Reservatie.GeefDueOut(),"2011-10-08 00:00:00","De dueout van het moeder is gewijzigd naar 2011-10-08 00:00:00")
@@ -99,11 +99,11 @@
 	
 	Set WijzigingTypes = ##class(DOM.VKP.impl.ProductOrderLijnWijzigingTypes).%New()
 	Do WijzigingTypes.Insert(##class(DOM.VKP.enu.ProductOrderLijnWijzigingType).Product())
-	Set ProductOrderLijnWijzigEventData = ##class(DOM.VKP.event.ProductOrderLijnWijzigEventData).%New(OrderID, OrderLijnID, KlantID, ProductID, WijzigingTypes)
+	Set ProductOrderLijnWijzigEventData = ##class(DOM.VKP.event.ProductOrderLijnWijzigEventData).%New(OrderID, OrderLijnCode, KlantID, ProductID, WijzigingTypes)
 	Set ProductOrderLijnGewijzigdEvent = ##class(DOM.VKP.event.ProductOrderLijnGewijzigd).%New(ProductOrderLijnWijzigEventData)
 	Do ##class(APPS.OrderUitvoering.impl.OrderUitvoeringServiceImpl).BijProductOrderLijnGewijzigd(ProductOrderLijnGewijzigdEvent)
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnID,##class(DOM.common.enu.Bedrijf).VanHoecke())
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).VanHoecke())
 	Set Reservatie = VerwachteUitvoer.GeefReservatie()
 	Do $$$AssertEquals(Reservatie.GeefProductID(),701,"Het moederproduct is gewijzigd")
 	Set VerwachteUitvoer = ""
@@ -114,19 +114,19 @@
 	
 	// Lijn verwijderen
 	
-	Set ProductOrderLijnEventData = ##class(DOM.VKP.event.ProductOrderLijnEventData).%New(OrderID, OrderLijnID, KlantID, ProductID)
+	Set ProductOrderLijnEventData = ##class(DOM.VKP.event.ProductOrderLijnEventData).%New(OrderID, OrderLijnCode, KlantID, ProductID)
 	Set ProductOrderLijnAnnulatieEvent = ##class(DOM.VKP.event.ProductOrderLijnAnnulatie).%New(ProductOrderLijnEventData)
 	Do ##class(APPS.OrderUitvoering.impl.OrderUitvoeringServiceImpl).BijProductOrderLijnAnnulatie(ProductOrderLijnGemaaktEvent)
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnID,##class(DOM.common.enu.Bedrijf).VanHoecke())
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).VanHoecke())
 	Do $$$AssertFalse($IsObject(VerwachteUitvoer),"De verwachte uitvoer werd verwijderd")
 ]]></Implementation>
 </Method>
 
 <Method name="OnBeforeAllTests">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set VerwachteUitvoer = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI().ZoekUitvoerViaTransactieLijnRef(90000,101,##class(DOM.common.enu.Bedrijf).VanHoecke())
+	Set VerwachteUitvoer = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI().ZoekUitvoerViaTransactieLijnRef(90000,100,##class(DOM.common.enu.Bedrijf).VanHoecke())
 	If ($IsObject(VerwachteUitvoer)) { Do VerwachteUitvoer.Delete() }
 	Set VerwachteUitvoer = ""
 	
@@ -140,6 +140,7 @@
 	Set ^KOD(1000,"F",90000) = ""
 	Set ^KOD(1000,"F",90000,0) = ""
 	Set ^KOD(1000,"F",90000,101) = "703000 \700\2\\\59.31\0#\8\59.31\59.31\703000 \L\\\100\59.31\KF0\\\\E1\EUR\\1\62371\\\\\\\\\\\\\\\\\\\\\1\\"
+	Set ^ORD("IU",90000,100) = 101
 	
 	Set ^PRBS("BS",700) = "MSK\OL"
 	Set ^PRBS("BS",700,"KIND.005") = "701\2\K\\\\\\\\PROD"
@@ -175,6 +176,7 @@
 	Kill ^KOD(1000,"F",90000)
 	Kill ^PRBS("BS",700)
 	Kill ^PRBS("BS",700)
+	Kill ^ORD("IU",90000,100)
 	Quit $$$OK
 ]]></Implementation>
 </Method>