Index: APPS/OrderUitvoering/impl/HaluxReservatieService.cls.xml =================================================================== diff -u -r3930 -r3968 --- APPS/OrderUitvoering/impl/HaluxReservatieService.cls.xml (.../HaluxReservatieService.cls.xml) (revision 3930) +++ APPS/OrderUitvoering/impl/HaluxReservatieService.cls.xml (.../HaluxReservatieService.cls.xml) (revision 3968) @@ -279,8 +279,9 @@ Type:DOM.OV.enu.BonLijnType TECH.Iterator + + +1 +DOM.CRM.Klant + Index: DOM/OV/impl/DataM/DataMBon.cls.xml =================================================================== diff -u -r1076 -r3968 --- DOM/OV/impl/DataM/DataMBon.cls.xml (.../DataMBon.cls.xml) (revision 1076) +++ DOM/OV/impl/DataM/DataMBon.cls.xml (.../DataMBon.cls.xml) (revision 3968) @@ -40,5 +40,11 @@ + + +DOM.CRM.Klant + + Index: vhUnitTest/APPS/OrderUitvoering/TestHaluxReservatie.cls.xml =================================================================== diff -u -r3914 -r3968 --- vhUnitTest/APPS/OrderUitvoering/TestHaluxReservatie.cls.xml (.../TestHaluxReservatie.cls.xml) (revision 3914) +++ vhUnitTest/APPS/OrderUitvoering/TestHaluxReservatie.cls.xml (.../TestHaluxReservatie.cls.xml) (revision 3968) @@ -105,9 +105,12 @@ /* Lijn verwijderen */ - Set EventData = ##class(DOM.VKP.event.ProductOrderLijnEventData).%New(OrderID,OrderLijnCode,KlantID,ProductID) + Set BonID = 9999888 + Set ^KU1(BonID,"F") = KlantID_"\" + Set EventData = ##class(DOM.VKP.event.ProductLijnOpBonEventData).%New(OrderID,OrderLijnCode,BonID) Set ProductLijnOpBonEvent = ##class(DOM.VKP.event.ProductLijnOpBonEvent).%New(EventData) Do ##class(APPS.OrderUitvoering.impl.HaluxReservatieService).BijProductLijnOpBonEvent(ProductLijnOpBonEvent) + Kill ^KU1(BonID) Set VerwachteInvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI() Set VerwachteInvoer = VerwachteInvoerAPI.ZoekInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())