Index: AXimpl/Controle/Order/Ax/AxOrderLijnIterator.cls.xml
===================================================================
diff -u -r49431 -r49438
--- AXimpl/Controle/Order/Ax/AxOrderLijnIterator.cls.xml	(.../AxOrderLijnIterator.cls.xml)	(revision 49431)
+++ AXimpl/Controle/Order/Ax/AxOrderLijnIterator.cls.xml	(.../AxOrderLijnIterator.cls.xml)	(revision 49438)
@@ -37,31 +37,25 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	#Dim SqlStatement as %String
-	
-	Set SqlStatement = "Select salesLine.SALESID,salesLine.CUSTACCOUNT,salesline.INVENTTRANSID,salesline.ITEMID,salesline.CONFIRMEDDLV,salesline.RECEIPTDATECONFIRMED,salesline.QTYORDERED"
-	_"  ,isnull(( select -sum(qty) from inventtrans where INVENTTRANSORIGIN.RECID = inventtrans.INVENTTRANSORIGIN and INVENTTRANS.STATUSISSUE = 3 and "
-	_"            inventtrans.STATUSRECEIPT = 0 and inventtrans.DATAAREAID = INVENTTRANSORIGIN.DATAAREAID and inventtrans.PARTITION = INVENTTRANSORIGIN.PARTITION),0) as GEPICKTEHOEVEELHEID"
-	_"  ,salesline.REMAINSALESPHYSICAL as OPENSTAANDEHOEVEELHEID,ADMINPRODUCTNUMMER "
-	_"  ,inventtransorigin.ADUSOPRCONTRACTID "
-	_"  ,InventDim.CONFIGID "
-	_"  ,isnull(LogisticsPostalAddress.CountryRegionId,'') as COUNTRYREGIONID "
-	_"  ,isnull(LogisticsPostalAddress.City,'') as CITY "
-	_"  ,isnull(LogisticsPostalAddress.Street,'') as STREET "
-	_"  ,isnull(LogisticsPostalAddress.Zipcode,'') as ZIPCODE "
-	_"from SALESLINE "
-	_"join inventdim on inventdim.INVENTDIMID = salesline.INVENTDIMID and inventdim.DATAAREAID = SALESLINE.DATAAREAID and inventdim.PARTITION = salesline.PARTITION "
+	Set SqlStatement = "select salesLine.SalesId,salesLine.CustAccount,salesline.inventtransid,salesline.itemid,salesline.CONFIRMEDDLV,salesline.QtyOrdered"
+	_",isnull(( select -sum(qty) from inventtrans where INVENTTRANSORIGIN.RECID = inventtrans.INVENTTRANSORIGIN and INVENTTRANS.STATUSISSUE = 3 and "
+	_"inventtrans.STATUSRECEIPT = 0 and inventtrans.DATAAREAID = INVENTTRANSORIGIN.DATAAREAID and inventtrans.PARTITION = INVENTTRANSORIGIN.PARTITION),0) as GepickteHoeveelheid"
+	_",salesline.REMAINSALESPHYSICAL as OpenstaandeHoeveelheid"
+	_",CONFIGID"
+	_",inventtransorigin.ADUSOPRContractId"
+	_",isnull(LogisticsPostalAddress.CountryRegionId,'') as CountryRegionId"
+	_",isnull(LogisticsPostalAddress.City,'') as City"
+	_",isnull(LogisticsPostalAddress.Street,'') as Street"
+	_",isnull(LogisticsPostalAddress.Zipcode,'') as Zipcode"
+	_" from SALESLINE join inventdim on inventdim.INVENTDIMID = salesline.INVENTDIMID and inventdim.DATAAREAID = SALESLINE.DATAAREAID and inventdim.PARTITION = salesline.PARTITION "
 	_"join SALESTABLE on SALESTABLE.SALESID = salesline.SALESID and SALESTABLE.DATAAREAID = salesline.DATAAREAID and salestable.PARTITION = salesline.PARTITION "
-	_"left outer join ADUEcoResAttributeCombination as Kenmerk on InventDim.ConfigId=Kenmerk.ConfigId "
-    _"   and SalesLine.ITEMID=Kenmerk.ITEMID "
-    _"   and InventDim.ConfigId<>'' "
 	_"left outer join LOGISTICSPOSTALADDRESS on LOGISTICSPOSTALADDRESS.RECID = salesline.DELIVERYPOSTALADDRESS and LOGISTICSPOSTALADDRESS.PARTITION = salesline.PARTITION "
 	_"join INVENTTRANSORIGIN on INVENTTRANSORIGIN.INVENTTRANSID = salesline.INVENTTRANSID and INVENTTRANSORIGIN.DATAAREAID = salesline.DATAAREAID and "
-	_"   INVENTTRANSORIGIN.PARTITION = salesline.PARTITION "
-	_"where salestable.SALESSTATUS = 1 and salestable.SALESTYPE = 3 and salesline.SALESQTY >= 0 "
-	_"  and salesLine.DATAAREAID = 'VHBE' and salesline.PARTITION = '5637144576' "
-	_"  and salesline.REMAINSALESPHYSICAL - isnull(( select -sum(qty) from inventtrans where INVENTTRANSORIGIN.RECID = inventtrans.INVENTTRANSORIGIN and INVENTTRANS.STATUSISSUE = 3 and "
-	_"  inventtrans.STATUSRECEIPT = 0 and inventtrans.DATAAREAID = INVENTTRANSORIGIN.DATAAREAID and inventtrans.PARTITION = INVENTTRANSORIGIN.PARTITION),0) > 0 "
-	_"order by salesline.inventtransid"
+	_"INVENTTRANSORIGIN.PARTITION = salesline.PARTITION where salestable.SALESSTATUS = 1 and salestable.SALESTYPE = 3 and salesline.SALESQTY >= 0 "
+	_"and salesLine.DATAAREAID = 'VHBE' and salesline.PARTITION = '5637144576' "
+	_"and salesline.REMAINSALESPHYSICAL - isnull(( select -sum(qty) from inventtrans where INVENTTRANSORIGIN.RECID = inventtrans.INVENTTRANSORIGIN and INVENTTRANS.STATUSISSUE = 3 and "
+	_"inventtrans.STATUSRECEIPT = 0 and inventtrans.DATAAREAID = INVENTTRANSORIGIN.DATAAREAID and inventtrans.PARTITION = INVENTTRANSORIGIN.PARTITION),0) > 0 "
+	_"ORDER BY salesline.inventtransid"
 	
 	Set ..ResultSet = ..SqlQueryConnection.GetResultSet(SqlStatement)
 ]]></Implementation>
@@ -75,11 +69,7 @@
 
 <Method name="Next">
 <ReturnType>AXimpl.Controle.Order.OrderLijn</ReturnType>
-<Implementation><![CDATA[
- 	Quit ..ResultSet
-	;#dim ConvertedAxProductOrderLijn As AXimpl.Controle.Order.OrderLijn = ..Converter.Convert(..ResultSet)
-	
-	;Quit ConvertedAxProductOrderLijn
+<Implementation><![CDATA[	Quit ..Converter.Convert(..ResultSet)
 ]]></Implementation>
 </Method>
 
Index: AXimpl/Controle/OrdDiff/AX/DataBouwer.cls.xml
===================================================================
diff -u -r49434 -r49438
--- AXimpl/Controle/OrdDiff/AX/DataBouwer.cls.xml	(.../DataBouwer.cls.xml)	(revision 49434)
+++ AXimpl/Controle/OrdDiff/AX/DataBouwer.cls.xml	(.../DataBouwer.cls.xml)	(revision 49438)
@@ -5,7 +5,7 @@
 <Super>TECH.RegisteredObject</Super>
 
 <Property name="AxOrderLijnIterator">
-<Type>AXimpl.Controle.Order.Ax.AxOrderLijnIterator</Type>
+<Type>AXimpl.Controle.OrdDiff.AX.AxOrderLijnIterator</Type>
 <Private>1</Private>
 </Property>
 
@@ -19,7 +19,7 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..AxOrderLijnIterator = ##class(AXimpl.Controle.Order.Ax.AxOrderLijnIterator).%New()
+	Set ..AxOrderLijnIterator = ##class(AXimpl.Controle.OrdDiff.AX.AxOrderLijnIterator).%New()
 	Set ..Translator=##class(AX.Uitgaand.EC.DataAX.impl.Translator).%New()
 	Quit $$$OK
 ]]></Implementation>
Index: AXimpl/Controle/OrdDiff/AX/AxOrderLijnIterator.cls.xml
===================================================================
diff -u
--- AXimpl/Controle/OrdDiff/AX/AxOrderLijnIterator.cls.xml	(revision 0)
+++ AXimpl/Controle/OrdDiff/AX/AxOrderLijnIterator.cls.xml	(revision 49438)
@@ -0,0 +1,95 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Controle.OrdDiff.AX.AxOrderLijnIterator">
+<Super>TECH.RegisteredObject,TECH.Iterator</Super>
+
+<Property name="Converter">
+<Type>AXimpl.Controle.Order.Ax.AxOrderLijnConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ResultSet">
+<Type>TECH.ResultSet</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="SqlQueryConnection">
+<Type>AXimpl.SqlQueryConnection</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>SqlQueryConnection:AXimpl.SqlQueryConnection</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..SqlQueryConnection = $$$Implementation(SqlQueryConnection,##class(AXimpl.SqlQueryConnection).%New())
+	Do ..VoerUitQuery()
+	Set ..Converter = ##class(AXimpl.Controle.Order.Ax.AxOrderLijnConverter).%New()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="VoerUitQuery">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim SqlStatement as %String
+	
+	Set SqlStatement = "Select salesLine.SALESID,salesLine.CUSTACCOUNT,salesline.INVENTTRANSID,salesline.ITEMID,salesline.CONFIRMEDDLV,salesline.RECEIPTDATECONFIRMED,salesline.QTYORDERED"
+	_"  ,isnull(( select -sum(qty) from inventtrans where INVENTTRANSORIGIN.RECID = inventtrans.INVENTTRANSORIGIN and INVENTTRANS.STATUSISSUE = 3 and "
+	_"            inventtrans.STATUSRECEIPT = 0 and inventtrans.DATAAREAID = INVENTTRANSORIGIN.DATAAREAID and inventtrans.PARTITION = INVENTTRANSORIGIN.PARTITION),0) as GEPICKTEHOEVEELHEID"
+	_"  ,salesline.REMAINSALESPHYSICAL as OPENSTAANDEHOEVEELHEID,ADMINPRODUCTNUMMER "
+	_"  ,inventtransorigin.ADUSOPRCONTRACTID "
+	_"  ,InventDim.CONFIGID "
+	_"  ,isnull(LogisticsPostalAddress.CountryRegionId,'') as COUNTRYREGIONID "
+	_"  ,isnull(LogisticsPostalAddress.City,'') as CITY "
+	_"  ,isnull(LogisticsPostalAddress.Street,'') as STREET "
+	_"  ,isnull(LogisticsPostalAddress.Zipcode,'') as ZIPCODE "
+	_"from SALESLINE "
+	_"join inventdim on inventdim.INVENTDIMID = salesline.INVENTDIMID and inventdim.DATAAREAID = SALESLINE.DATAAREAID and inventdim.PARTITION = salesline.PARTITION "
+	_"join SALESTABLE on SALESTABLE.SALESID = salesline.SALESID and SALESTABLE.DATAAREAID = salesline.DATAAREAID and salestable.PARTITION = salesline.PARTITION "
+	_"left outer join ADUEcoResAttributeCombination as Kenmerk on InventDim.ConfigId=Kenmerk.ConfigId "
+    _"   and SalesLine.ITEMID=Kenmerk.ITEMID "
+    _"   and InventDim.ConfigId<>'' "
+	_"left outer join LOGISTICSPOSTALADDRESS on LOGISTICSPOSTALADDRESS.RECID = salesline.DELIVERYPOSTALADDRESS and LOGISTICSPOSTALADDRESS.PARTITION = salesline.PARTITION "
+	_"join INVENTTRANSORIGIN on INVENTTRANSORIGIN.INVENTTRANSID = salesline.INVENTTRANSID and INVENTTRANSORIGIN.DATAAREAID = salesline.DATAAREAID and "
+	_"   INVENTTRANSORIGIN.PARTITION = salesline.PARTITION "
+	_"where salestable.SALESSTATUS = 1 and salestable.SALESTYPE = 3 and salesline.SALESQTY >= 0 "
+	_"  and salesLine.DATAAREAID = 'VHBE' and salesline.PARTITION = '5637144576' "
+	_"  and salesline.REMAINSALESPHYSICAL - isnull(( select -sum(qty) from inventtrans where INVENTTRANSORIGIN.RECID = inventtrans.INVENTTRANSORIGIN and INVENTTRANS.STATUSISSUE = 3 and "
+	_"  inventtrans.STATUSRECEIPT = 0 and inventtrans.DATAAREAID = INVENTTRANSORIGIN.DATAAREAID and inventtrans.PARTITION = INVENTTRANSORIGIN.PARTITION),0) > 0 "
+	_"order by salesline.inventtransid"
+	
+	Set ..ResultSet = ..SqlQueryConnection.GetResultSet(SqlStatement)
+]]></Implementation>
+</Method>
+
+<Method name="HasNext">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (..ResultSet.Next() > 0)
+]]></Implementation>
+</Method>
+
+<Method name="Next">
+<ReturnType>AXimpl.Controle.Order.OrderLijn</ReturnType>
+<Implementation><![CDATA[ 	Quit ..ResultSet
+]]></Implementation>
+</Method>
+
+<Method name="%OnClose">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do:$IsObject(..ResultSet) ..SqlQueryConnection.Disconnect()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>