Index: AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml
===================================================================
diff -u -r47685 -r47950
--- AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 47685)
+++ AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml	(.../InventoryInConverter.cls.xml)	(revision 47950)
@@ -51,13 +51,28 @@
 <Private>1</Private>
 </Property>
 
+<Property name="AankoopAPI">
+<Type>DOM.AKP.AankoopAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductTypeAPI">
+<Type>DOM.PM.ProductTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ConversieBezwarenBepaler">
+<Type>AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="CurrentLegalEntity">
 <Type>%String</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Admin.Common.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,InventoryOutConverter:AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter,ProductRepository:Prod.ProductRepository</FormalSpec>
+<FormalSpec>ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Admin.Common.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,InventoryOutConverter:AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter,ProductRepository:Prod.ProductRepository,AankoopAPI:DOM.AKP.AankoopAPI,ProductTypeAPI:DOM.PM.ProductTypeAPI,ConversieBezwarenBepaler:AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -69,6 +84,9 @@
 	 Set ..ReceptieService = $$$Inject(ReceptieService,##class(APPS.AKP.Receptie.impl.ReceptieService).%New())
 	 Set ..InventoryOutConverter = $$$Inject(InventoryOutConverter,##class(AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter).%New())
 	 Set ..ProductRepository = $$$Inject(ProductRepository,##class(Prod.ProductRepository).%New())
+	 Set ..AankoopAPI = $$$Inject(AankoopAPI,##class(DOM.DomeinContext).Instance().GeefAankoopAPI())
+	 Set ..ProductTypeAPI = $$$Inject(ProductTypeAPI,##class(DOM.DomeinContext).Instance().GeefProductTypeAPI())
+	 Set ..ConversieBezwarenBepaler = $$$Inject(ConversieBezwarenBepaler,##class(AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New())
 	 Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -77,6 +95,9 @@
 <FormalSpec>WMSJournalOutRequest:AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut,MessageId:%String</FormalSpec>
 <ReturnType>AXif.Dynamics.Inventory.MessageParts</ReturnType>
 <Implementation><![CDATA[
+	#dim VerwerkingBezwaren as %String = ##class(TECH.ListUtils).ListToPieces(..ConversieBezwarenBepaler.GeefBezwaren(WMSJournalOutRequest),$$$CRLF)	
+	Quit:$Length(VerwerkingBezwaren) ..GeefFoutResponse(VerwerkingBezwaren,MessageId)
+
 	Set ..ToeleveringMetReceptieArray = ##class(%ArrayOfDataTypes).%New()
 	Set ..ToeleveringZonderReceptieArray = ##class(%ArrayOfDataTypes).%New()
 	Set ..AangemaakteRecepties = ##class(%ListOfDataTypes).%New()
@@ -88,6 +109,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefFoutResponse">
+<FormalSpec>Melding:%String,MessageId:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>AXif.Dynamics.Inventory.MessageParts</ReturnType>
+<Implementation><![CDATA[
+	
+	Set AxdEntityHeader = ##class(AXif.Dynamics.Inventory.MessageParts.AxdEntityHeader).%New()
+	Set AxdEntityHeader.class = "entity"
+	Set AxdEntityHeader.MessageId = MessageId
+	Set AxdEntityHeader.ErrorText = Melding
+	
+	Set MessageParts = ##class(AXif.Dynamics.Inventory.MessageParts).%New()
+	Set MessageParts.MessagePart = ##class(AXif.Dynamics.Inventory.MessageParts.AxdADUMsgOutboundInQuery).%New()
+	Do MessageParts.MessagePart.Header.Insert(AxdEntityHeader)
+	
+	Quit MessageParts
+]]></Implementation>
+</Method>
+
 <Method name="MaakToeleveringen">
 <FormalSpec>WMSJournalOutRequest:AXif.Dynamics.InventoryIn.MessageParts.AxdADUMsgWMSJournalOut</FormalSpec>
 <Private>1</Private>