Index: APPS/MAG/Receptie/event/ReceptiePalletEvent.cls.xml
===================================================================
diff -u -r51710 -r51728
--- APPS/MAG/Receptie/event/ReceptiePalletEvent.cls.xml	(.../ReceptiePalletEvent.cls.xml)	(revision 51710)
+++ APPS/MAG/Receptie/event/ReceptiePalletEvent.cls.xml	(.../ReceptiePalletEvent.cls.xml)	(revision 51728)
@@ -1,12 +1,22 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
 <Class name="APPS.MAG.Receptie.event.ReceptiePalletEvent">
-<Description>
-</Description>
 <ClassType>serial</ClassType>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>TECH.PubSub.Event</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
 
+<Method name="%OnNew">
+<FormalSpec>Data:APPS.MAG.Receptie.event.ReceptiePalletEventData</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+ 	Set ..Type = "ReceptiePalletEvent"
+	Quit ##super(Data)
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 </Storage>
Index: APPS/MAG/Receptie/event/ReceptiePalletEventData.cls.xml
===================================================================
diff -u -r51713 -r51728
--- APPS/MAG/Receptie/event/ReceptiePalletEventData.cls.xml	(.../ReceptiePalletEventData.cls.xml)	(revision 51713)
+++ APPS/MAG/Receptie/event/ReceptiePalletEventData.cls.xml	(.../ReceptiePalletEventData.cls.xml)	(revision 51728)
@@ -47,6 +47,8 @@
 	Set ..OrderNummer = OrderNummer
 	Set ..OrderLijnNummer = OrderLijnNummer
 	Set ..Aantal = Aantal
+	
+	Quit $$$OK
 ]]></Implementation>
 </Method>