Index: APPS/PM/Maatwerk/OLM/impl/AbstractOpMaatFactory.cls.xml
===================================================================
diff -u -r5401 -r5402
--- APPS/PM/Maatwerk/OLM/impl/AbstractOpMaatFactory.cls.xml	(.../AbstractOpMaatFactory.cls.xml)	(revision 5401)
+++ APPS/PM/Maatwerk/OLM/impl/AbstractOpMaatFactory.cls.xml	(.../AbstractOpMaatFactory.cls.xml)	(revision 5402)
@@ -54,7 +54,7 @@
 	Set AantalInTeKorten = InTeKortenKinderen.GetAt(1).GeefAantal()
 	Set InTeKortenNaar = InbouwBreedte - (BreedteOLProduct - BreedteInTeKortenProduct)
 	
-	#dim IngekortProduct As DOM.PM.Product = ..BerekenIngekortProduct(InTeKortenProduct, TeVervangenProduct, InTeKortenNaar, AantalInTeKorten)
+	Set IngekortProduct = ..BerekenIngekortProduct(InTeKortenProduct, TeVervangenProduct, InTeKortenNaar, AantalInTeKorten)
 	Set Bouwsteen = SamengesteldProduct.VoegToeKindBouwsteen(IngekortProduct,AantalInTeKorten)
 	
 	Set Bouwsteen = SamengesteldProduct.GeefBouwsteen(InTeKortenKinderen.GetAt(1).GeefID())
Index: DOM/PM/event/AdministratiefProductGewijzigdEvent.cls.xml
===================================================================
diff -u -r5401 -r5402
--- DOM/PM/event/AdministratiefProductGewijzigdEvent.cls.xml	(.../AdministratiefProductGewijzigdEvent.cls.xml)	(revision 5401)
+++ DOM/PM/event/AdministratiefProductGewijzigdEvent.cls.xml	(.../AdministratiefProductGewijzigdEvent.cls.xml)	(revision 5402)
@@ -1,7 +1,10 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="24">
+<Export generator="Cache" version="9">
 <Class name="DOM.PM.event.AdministratiefProductGewijzigdEvent">
+<ClassType>serial</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
 <Super>TECH.PubSub.Event</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="%OnNew">
 <FormalSpec>Data:DOM.PM.event.AdministratiefProductEventData</FormalSpec>
@@ -18,6 +21,4 @@
 <Type>%Library.CacheSerialState</Type>
 </Storage>
 </Class>
-
-
 </Export>