Index: KF2AD.mac.rou =================================================================== diff -u -r2869 -r2913 --- KF2AD.mac.rou (.../KF2AD.mac.rou) (revision 2869) +++ KF2AD.mac.rou (.../KF2AD.mac.rou) (revision 2913) @@ -121,7 +121,6 @@ Set WijzigingTypes = ##class(DOM.VKP.impl.ProductOrderLijnWijzigingTypes).%New() Do:$P(R,D,3)'=UA WijzigingTypes.Insert(##class(DOM.VKP.enu.ProductOrderLijnWijzigingType).Aantal()) Do:$P(R,D,6)'=UEP WijzigingTypes.Insert(##class(DOM.VKP.enu.ProductOrderLijnWijzigingType).Prijs()) - ;Do:$P(R,D,25)'=ULT WijzigingTypes.Insert(##class(DOM.VKP.enu.ProductOrderLijnWijzigingType).Leverdatum()) If (WijzigingTypes.Count() > 0) { Set ProductOrderLijnWijzigEventData = ##class(DOM.VKP.event.ProductOrderLijnWijzigEventData).%New(OrderID, OrderLijnCode, KlantID, ProductID, WijzigingTypes)