Index: DOM/MAG/event/StockGewijzigdEvent.cls.xml
===================================================================
diff -u -r48163 -r48171
--- DOM/MAG/event/StockGewijzigdEvent.cls.xml	(.../StockGewijzigdEvent.cls.xml)	(revision 48163)
+++ DOM/MAG/event/StockGewijzigdEvent.cls.xml	(.../StockGewijzigdEvent.cls.xml)	(revision 48171)
@@ -1,12 +1,22 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
 <Class name="DOM.MAG.event.StockGewijzigdEvent">
-<Description>
-</Description>
 <ClassType>serial</ClassType>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>TECH.PubSub.Event</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
 
+<Method name="%OnNew">
+<FormalSpec>Data:DOM.MAG.event.StockGewijzigdEventData</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+ 	Set ..Type = "StockGewijzigdEvent"
+	Quit ##super(Data)
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 </Storage>