Index: AXimpl/Dynamics/InventoryOut/PRNrAxConfigIdVoorraadHistoriek.cls.xml
===================================================================
diff -u
--- AXimpl/Dynamics/InventoryOut/PRNrAxConfigIdVoorraadHistoriek.cls.xml	(revision 0)
+++ AXimpl/Dynamics/InventoryOut/PRNrAxConfigIdVoorraadHistoriek.cls.xml	(revision 48963)
@@ -0,0 +1,58 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriek">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.Persistent</Super>
+
+<Index name="UniqueIndex">
+<Properties>ProductNr,AxConfigId</Properties>
+<Unique>1</Unique>
+</Index>
+
+<Index name="IdxProductNr">
+<Properties>ProductNr</Properties>
+</Index>
+
+<Index name="IdxAxConfigId">
+<Properties>AxConfigId</Properties>
+</Index>
+
+<Property name="ProductNr">
+<Type>%String</Type>
+</Property>
+
+<Property name="AxConfigId">
+<Type>%String</Type>
+</Property>
+
+<Property name="QtyVH">
+<Type>%String</Type>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DataLocation>^AXimpl.Dyn2FEB.PRNrAxConfi83F3D</DataLocation>
+<DefaultData>PRNrAxConfigIdVoorraadHistoriekDefaultData</DefaultData>
+<IdLocation>^AXimpl.Dyn2FEB.PRNrAxConfi83F3D</IdLocation>
+<IndexLocation>^AXimpl.Dyn2FEB.PRNrAxConfi83F3I</IndexLocation>
+<StreamLocation>^AXimpl.Dyn2FEB.PRNrAxConfi83F3S</StreamLocation>
+<Data name="PRNrAxConfigIdVoorraadHistoriekDefaultData">
+<Value name="1">
+<Value>%%CLASSNAME</Value>
+</Value>
+<Value name="2">
+<Value>ProductNr</Value>
+</Value>
+<Value name="3">
+<Value>AxConfigId</Value>
+</Value>
+<Value name="4">
+<Value>QtyVH</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: AXimpl/Dynamics/InventoryOut/PRNrAxConfigIdVoorraadHistoriekRepository.cls.xml
===================================================================
diff -u
--- AXimpl/Dynamics/InventoryOut/PRNrAxConfigIdVoorraadHistoriekRepository.cls.xml	(revision 0)
+++ AXimpl/Dynamics/InventoryOut/PRNrAxConfigIdVoorraadHistoriekRepository.cls.xml	(revision 48963)
@@ -0,0 +1,126 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository">
+<Super>TECH.Persistentie.impl.Repository</Super>
+
+<Parameter name="DataClassName">
+<Type>%String</Type>
+<Default>AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriek</Default>
+</Parameter>
+
+<Method name="BestaatVolgensProductNrAxConfigIdCombo">
+<FormalSpec>ProductNr:%String,AxConfigId:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Quit:$$$Not(..BestaatGlobal()) 0
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT ID FROM " _SqlTableName _" WHERE ProductNr = '"_ProductNr_"' AND AxConfigId = '"_AxConfigId_"'"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+
+	Quit:ResultSet.Next() 1
+	Quit 0
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderVolgensProductNrAxConfigIdCombo">
+<FormalSpec>ProductNr:%String,AxConfigId:%String</FormalSpec>
+<Implementation><![CDATA[
+	#Dim iterator as TECH.Iterator = ..ZoekVolgensProductNrAxConfigIdCombo(ProductNr, AxConfigId)
+	while iterator.HasNext(){
+		Do ##class(AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository).%New().VerwijderViaID(iterator.Next().GeefID())
+	}
+]]></Implementation>
+</Method>
+
+<Method name="GeefQtyVHVolgensProductNrEnAxConfigId">
+<FormalSpec>ProductNr:%String,AxConfigId:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT QtyVH FROM " _SqlTableName _" WHERE ProductNr = '"_ProductNr_"' AND AxConfigId = '"_AxConfigId_"'"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+	#dim Opener As TECH.Persistentie.Repository.ResultSetItemOpener = ##class(TECH.Persistentie.Repository.ResultSetItemOpener).%New($this)
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	#dim Result As TECH.Iterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator, Opener)
+
+	Quit Result
+]]></Implementation>
+</Method>
+
+<Method name="GeefQtyVHPerProductNr">
+<FormalSpec>ProductNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT SUM(QtyVH) AS QtyVH FROM " _SqlTableName _" WHERE ProductNr = '"_ProductNr_"' GROUP BY ProductNr"
+	
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+	#dim Opener As TECH.Persistentie.Repository.ResultSetItemOpener = ##class(TECH.Persistentie.Repository.ResultSetItemOpener).%New($this)
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	#dim Result As TECH.Iterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator, Opener)
+
+	Quit Result
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantalAxConfigIdsPerProductNr">
+<FormalSpec>ProductNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT COUNT(AxConfigId) AS AxConfigId FROM " _SqlTableName _" WHERE ProductNr = '"_ProductNr_"'"
+	
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+	#dim Opener As TECH.Persistentie.Repository.ResultSetItemOpener = ##class(TECH.Persistentie.Repository.ResultSetItemOpener).%New($this)
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	#dim Result As TECH.Iterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator, Opener)
+
+	Quit Result
+]]></Implementation>
+</Method>
+
+<Method name="GeefAxConfigIdsPerProductNr">
+<FormalSpec>ProductNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT AxConfigId FROM " _SqlTableName _" WHERE ProductNr = '"_ProductNr_"'"
+	
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+	#dim Opener As TECH.Persistentie.Repository.ResultSetItemOpener = ##class(TECH.Persistentie.Repository.ResultSetItemOpener).%New($this)
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	#dim Result As TECH.Iterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator, Opener)
+
+	Quit Result
+]]></Implementation>
+</Method>
+
+<Method name="ZoekVolgensProductNrAxConfigIdCombo">
+<FormalSpec>ProductNr:%String,AxConfigId:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT ID FROM " _SqlTableName _" WHERE ProductNr = '"_ProductNr_"' AND AxConfigId = '"_AxConfigId_"'"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+	#dim Opener As TECH.Persistentie.Repository.ResultSetItemOpener = ##class(TECH.Persistentie.Repository.ResultSetItemOpener).%New($this)
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	#dim Result As TECH.Iterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator, Opener)
+
+	Quit Result
+]]></Implementation>
+</Method>
+
+<Method name="BestaatGlobal">
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not($Data(^AXimpl.Dyn2FEB.PRNrAxConfi83F3D)=0)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AXimpl/Dynamics/InventoryOut/Converter/dto/AXids.cls.xml
===================================================================
diff -u -r47347 -r48963
--- AXimpl/Dynamics/InventoryOut/Converter/dto/AXids.cls.xml	(.../AXids.cls.xml)	(revision 47347)
+++ AXimpl/Dynamics/InventoryOut/Converter/dto/AXids.cls.xml	(.../AXids.cls.xml)	(revision 48963)
@@ -18,6 +18,10 @@
 <Property name="ProductId">
 <Type>%String</Type>
 </Property>
+
+<Property name="QtyVH">
+<Type>%String</Type>
+</Property>
 </Class>
 
 
Index: AXimpl/Dynamics/InventoryOut/MaatwerkIterator.cls.xml
===================================================================
diff -u
--- AXimpl/Dynamics/InventoryOut/MaatwerkIterator.cls.xml	(revision 0)
+++ AXimpl/Dynamics/InventoryOut/MaatwerkIterator.cls.xml	(revision 48963)
@@ -0,0 +1,105 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Dynamics.InventoryOut.MaatwerkIterator">
+<Super>TECH.RegisteredObject,TECH.Iterator</Super>
+
+<Property name="OrderApi">
+<Type>DOM.VKP.OrderAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="QueryAPI">
+<Type>TECH.Query.QueryAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ResultSet">
+<Type>TECH.ResultSet</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ResultSetIterator">
+<Type>TECH.ResultSetIterator</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="OrderLijnIterator">
+<Type>TECH.CombinedIterator</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="PRNrAxConfigIdRepository">
+<Type>AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",OrderApi:DOM.VKP.OrderAPI</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..QueryAPI = $$$Inject(QueryAPI, ##class(TECH.Context).Instance().GeefQueryAPI())
+	Set ..OrderApi = $$$Inject(OrderApi, ##class(DOM.DomeinContext).Instance().GeefOrderAPI())
+	#dim OrderIterator As TECH.Iterator = ..OrderApi.GeefOrderIterator()
+	Set ..OrderLijnIterator = ##class(TECH.CombinedIterator).%New(OrderIterator,##class(AXimpl.Controle.Order.Admin.OrderLijnIterator).%ClassName($$$True))
+	Set ..PRNrAxConfigIdRepository = ##class(AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository).%New()
+	Do ..StelSamenTeSyncenPRNrAxConfigIdCombos()
+	Do ..VoerUitQuery()
+	Set ..ResultSetIterator = ##class(TECH.ResultSetIterator).%New(..ResultSet)
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="HasNext">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..ResultSetIterator.HasNext()
+]]></Implementation>
+</Method>
+
+<Method name="Next">
+<ReturnType>%CacheString</ReturnType>
+<Implementation><![CDATA[	Quit ..ResultSetIterator.Next()
+]]></Implementation>
+</Method>
+
+<Method name="StelSamenTeSyncenPRNrAxConfigIdCombos">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ##class(AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriek).%KillExtent()
+	While (..OrderLijnIterator.HasNext()) {
+		#dim OrderLijn As DOM.VKP.Orderlijn = ..OrderLijnIterator.Next()
+		#dim ProductNr As %String = OrderLijn.GeefProductID()
+		#dim AxConfigId As %String = OrderLijn.GeefAxConfigId()
+		#dim AantalOpOrderLijn As %String = OrderLijn.GeefAantal()
+		#dim IsGeslotenOrder As %Boolean = $$$If(OrderLijn.GeefOrder().GeefStatus()=##class(DOM.VKP.enu.OrderStatus).Gesloten(),$$$True,$$$False)
+		#dim IsKOM As %Boolean = $$$If(OrderLijn.GeefToeleveringLijnNr()="KOM",$$$True,$$$False)
+		#dim AantalInGlobal As %String = 0
+		If (..PRNrAxConfigIdRepository.BestaatVolgensProductNrAxConfigIdCombo(ProductNr, AxConfigId)) {
+			Set AantalInGlobal = ..PRNrAxConfigIdRepository.GeefQtyVHVolgensProductNrEnAxConfigId(ProductNr, AxConfigId)
+			Do ..PRNrAxConfigIdRepository.VerwijderVolgensProductNrAxConfigIdCombo(ProductNr, AxConfigId)
+		} 
+		If ($$$HasLength(AxConfigId) && IsGeslotenOrder && IsKOM) {
+			Set NieuweCombo = ##class(AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriek).%New()
+			Set NieuweCombo.ProductNr = ProductNr
+			Set NieuweCombo.AxConfigId = AxConfigId
+			Set NieuweCombo.QtyVH = AantalOpOrderLijn + AantalInGlobal
+			Do NieuweCombo.Save()
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VoerUitQuery">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim SqlStatement as %String
+	Set SqlStatement = "SELECT ProductNr, AxConfigId, QtyVH FROM AXimpl_Dynamics_InventoryOut.PRNrAxConfigIdVoorraadHistoriek Group By AxConfigId"
+	Set ..ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>