Index: BL/MB/UGLYPicking/Opslag.cls.xml
===================================================================
diff -u -r7569 -r8430
--- BL/MB/UGLYPicking/Opslag.cls.xml	(.../Opslag.cls.xml)	(revision 7569)
+++ BL/MB/UGLYPicking/Opslag.cls.xml	(.../Opslag.cls.xml)	(revision 8430)
@@ -986,7 +986,7 @@
 
  $$$WriteToLog("Verplaats pallet success.")
  
- Set EventData = ##class(DOM.MAG.event.PalletVerplaatstEventData).%New(PalletID,$LI(DoelLocation,1),$LI(DoelLocation,2),$LI(DoelLocation,3),$LI(DoelLocation,4))
+ Set EventData = ##class(DOM.MAG.event.PalletVerplaatstEventData).%New(PalletID,$LI(DoelLocation,1),$LI(DoelLocation,2),$LI(DoelLocation,3),$LI(DoelLocation,4),$LI(BronLocation,1),$LI(BronLocation,2),$LI(BronLocation,3),$LI(BronLocation,4))
  Set Event = ##class(DOM.MAG.event.PalletVerplaatstEvent).%New(EventData)
  Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(Event)
 
Index: DOM/MAG/event/PalletVerplaatstEventData.cls.xml
===================================================================
diff -u -r7569 -r8430
--- DOM/MAG/event/PalletVerplaatstEventData.cls.xml	(.../PalletVerplaatstEventData.cls.xml)	(revision 7569)
+++ DOM/MAG/event/PalletVerplaatstEventData.cls.xml	(.../PalletVerplaatstEventData.cls.xml)	(revision 8430)
@@ -10,33 +10,55 @@
 <Type>%String</Type>
 </Property>
 
-<Property name="LocM">
+<Property name="DoelLocM">
 <Type>%String</Type>
 </Property>
 
-<Property name="LocG">
+<Property name="DoelLocG">
 <Type>%String</Type>
 </Property>
 
-<Property name="LocX">
+<Property name="DoelLocX">
 <Type>%String</Type>
 </Property>
 
-<Property name="LocY">
+<Property name="DoelLocY">
 <Type>%String</Type>
 </Property>
 
+<Property name="BronLocM">
+<Type>%String</Type>
+</Property>
+
+<Property name="BronLocG">
+<Type>%String</Type>
+</Property>
+
+<Property name="BronLocX">
+<Type>%String</Type>
+</Property>
+
+<Property name="BronLocY">
+<Type>%String</Type>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>PalletID:%String,LocM:%String,LocG:%String,LocX:%String,LocY:%String</FormalSpec>
+<Description>
+Wanneer vanuit receptie wordt verplaatst is er geen bron</Description>
+<FormalSpec>PalletID:%String,DoelLocM:%String,DoelLocG:%String,DoelLocX:%String,DoelLocY:%String,BronLocM:%String="",BronLocG:%String="",BronLocX:%String="",BronLocY:%String=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set ..PalletID = PalletID
-	Set ..LocM = LocM
-	Set ..LocG = LocG
-	Set ..LocX = LocX
-	Set ..LocY = LocY
+	Set ..DoelLocM = DoelLocM
+	Set ..DoelLocG = DoelLocG
+	Set ..DoelLocX = DoelLocX
+	Set ..DoelLocY = DoelLocY
+	Set ..BronLocM = BronLocM
+	Set ..BronLocG = BronLocG
+	Set ..BronLocX = BronLocX
+	Set ..BronLocY = BronLocY
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -45,23 +67,34 @@
 <Type>%Library.CacheSerialState</Type>
 <State>PalletVerplaatstEventDataState</State>
 <Data name="PalletVerplaatstEventDataState">
-<Structure>listnode</Structure>
 <Subscript>"DOM.MAG.event.PalletVerplaatstEventData"</Subscript>
 <Value name="1">
-<Value>LocG</Value>
+<Value>DoelLocG</Value>
 </Value>
 <Value name="2">
-<Value>LocM</Value>
+<Value>DoelLocM</Value>
 </Value>
 <Value name="3">
-<Value>LocX</Value>
+<Value>DoelLocX</Value>
 </Value>
 <Value name="4">
-<Value>LocY</Value>
+<Value>DoelLocY</Value>
 </Value>
 <Value name="5">
 <Value>PalletID</Value>
 </Value>
+<Value name="6">
+<Value>BronLocM</Value>
+</Value>
+<Value name="7">
+<Value>BronLocG</Value>
+</Value>
+<Value name="8">
+<Value>BronLocX</Value>
+</Value>
+<Value name="9">
+<Value>BronLocY</Value>
+</Value>
 </Data>
 </Storage>
 </Class>