Index: APPS/OrderUitvoering/impl/OrderUitvoeringServiceImpl.cls.xml
===================================================================
diff -u -r2487 -r2771
--- APPS/OrderUitvoering/impl/OrderUitvoeringServiceImpl.cls.xml (.../OrderUitvoeringServiceImpl.cls.xml) (revision 2487)
+++ APPS/OrderUitvoering/impl/OrderUitvoeringServiceImpl.cls.xml (.../OrderUitvoeringServiceImpl.cls.xml) (revision 2771)
@@ -18,7 +18,7 @@
Set Product = ProductOrderLijn.GeefProduct()
Set ReservatieVoorVerwachteUitvoer.TransactieReferentie = Order.GeefOrderNr()
- Set ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie = ProductOrderLijn.GeefLijnNr()
+ Set ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie = ProductOrderLijn.GeefOLU()
Set ReservatieVoorVerwachteUitvoer.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
Set Reservatie = ##class(DOM.ProdRes.dto.Reservatie).%New()
@@ -122,7 +122,7 @@
1
@@ -188,9 +188,9 @@
Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
Set ProductOrderLijnEventData = ProductOrderLijnAnnulatieEvent.Data
Set OrderID = ProductOrderLijnEventData.GeefOrderID()
- Set OrderLijnID = ProductOrderLijnEventData.GeefOrderLijnID()
+ Set OrderLijnCode = ProductOrderLijnEventData.GeefOrderLijnCode()
- Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnID,##class(DOM.common.enu.Bedrijf).VanHoecke())
+ Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).VanHoecke())
If ('$IsObject(VerwachteUitvoer)) Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.ObjectExpectedException).%New("Geen verwachtte uitvoer gevonden voor (OrderID, OrderLijnID): "_OrderID_", "_OrderLijnID))
Do VerwachteUitvoerAPI.AnnuleerVerwachteUitvoer(VerwachteUitvoer.%Id())