Index: AXimpl/Controle/OrdDiff/AX/DataBouwer.cls.xml
===================================================================
diff -u -r49438 -r50300
--- AXimpl/Controle/OrdDiff/AX/DataBouwer.cls.xml	(.../DataBouwer.cls.xml)	(revision 49438)
+++ AXimpl/Controle/OrdDiff/AX/DataBouwer.cls.xml	(.../DataBouwer.cls.xml)	(revision 50300)
@@ -41,7 +41,7 @@
 		
 		#dim AantalGepickt As %String = +rs.Data("GEPICKTEHOEVEELHEID")
 		#dim AantalBesteld As %String = +rs.Data("QTYORDERED")
-		#dim AantalOpenstaand As %String = +rs.Data("OPENSTAANDEHOEVEELHEID")
+		#dim AantalOpenstaand As %String = +rs.Data("OPENSTAANDEHOEVEELHEID")-rs.Data("GEPICKTEHOEVEELHEID")
 		#dim InventTransId As %String = rs.Data("INVENTTRANSID")
 		#dim ConfigId As %String = $$$Strip0(rs.Data("CONFIGID"))
 		#dim SoprContractId As %String =$$$Strip0(rs.Data("ADUSOPRCONTRACTID"))
Index: AXimpl/Controle/OrdDiff/Query.cls.xml
===================================================================
diff -u
--- AXimpl/Controle/OrdDiff/Query.cls.xml	(revision 0)
+++ AXimpl/Controle/OrdDiff/Query.cls.xml	(revision 50300)
@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Controle.OrdDiff.Query">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="Test">
+<Description>
+d ##class(AXimpl.Controle.OrdDiff.Query).Test()</Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set rs=##class(%ResultSet).%New("AXimpl.Controle.OrdDiff.Query:OrderDiff")
+	Set sc=rs.Execute() 
+	If $$$ISERR(sc)  Quit sc
+	While rs.Next() {
+	k %x
+	m %x=rs.Data
+	zw %x
+	}
+]]></Implementation>
+</Method>
+
+<Query name="OrderDiff">
+<Type>%Query</Type>
+<SqlProc>1</SqlProc>
+<Parameter name="CONTAINID" value="0"/>
+<Parameter name="ROWSPEC" value="Diff_GekendInAX:%Boolean, Diff_GekendInAdmin:%Boolean, Diff_Aantal:%Boolean, Diff_Leverdatum:%Boolean, Diff_Product:%Boolean, AxInventTransId:%String, Naam:%String, KlantNr:%String, OrderId:%String, AX_AXSalesId:%String, AX_AantalBesteld:%Integer, AX_AantalGeleverd:%Integer, AX_AantalOpenstaand:%Integer, AX_ConfigId:%String, AX_ItemId:%String, AX_Leverdatum:%Date, AX_KortTekst:%String, AX_ProductNr:%String, AX_SoprContractId:%String, Admin_AXSalesId:%String, Admin_Aantal:%Integer, Admin_ItemId:%String,  Admin_Leverdatum:%Date, Admin_KortTekst:%String, Admin_ProductNr:%String, Admin_AantalLijnen:%Integer"/>
+</Query>
+
+<Method name="OrderDiffExecute">
+<ClassMethod>1</ClassMethod>
+<FormalSpec><![CDATA[&qHandle:%Binary]]></FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+    ;D ##class(AXimpl.Controle.OrdDiff.MaakDiff).%New().Maak()
+   
+	Set SQLStatement="Select Diff_GekendInAX,Diff_GekendInAdmin,Diff_Aantal,Diff_Leverdatum,Diff_Product,AxInventTransId,klant->Naam,KlantNr,OrderId,"
+  	_"   AX_AXSalesId,AX_AantalBesteld,AX_AantalGeleverd,AX_AantalOpenstaand,AX_ConfigId,AX_ItemId,AX_Leverdatum,ax_product->KortTekst,AX_ProductNr,AX_SoprContractId,"
+  	_"   Admin_AXSalesId,Admin_Aantal,Admin_ItemId, Admin_Leverdatum,admin_product->KortTekst,Admin_ProductNr,Admin_AantalLijnen"                                                                                                                                                
+	_" from AXimpl_Controle_OrdDiff.ProductOrderLijn where diff_Orderverschillend=1"
+	_" order by orderid, axinventtransid"
+
+	Set rs=##class(%ResultSet).%New("%DynamicQuery:SQL")
+	Set sc=rs.Prepare(SQLStatement)
+	If $$$ISERR(sc) Quit sc
+	Set sc=rs.Execute() 
+	If $$$ISERR(sc)  Quit sc
+	Set %ResultIterator=##class(TECH.ResultSetIterator).%New(rs)
+
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="OrderDiffFetch">
+<ClassMethod>1</ClassMethod>
+<FormalSpec><![CDATA[&qHandle:%Binary,&Row:%List,&AtEnd:%Integer=0]]></FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	If %ResultIterator.HasNext() {
+		#dim rs as %ResultSet=%ResultIterator.Next()
+		Set Row=""
+		For I=1:1:rs.GetColumnCount()
+		{
+			Set Row=Row_$LB(rs.GetData(I))
+		}
+	}
+	
+	If '%ResultIterator.HasNext() {
+		Set AtEnd=1
+	}
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="OrderDiffClose">
+<ClassMethod>1</ClassMethod>
+<FormalSpec><![CDATA[&qHandle:%Binary]]></FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Kill %ResultIterator
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AXimpl/Controle/OrdDiff/AX/OrderData.cls.xml
===================================================================
diff -u -r49378 -r50300
--- AXimpl/Controle/OrdDiff/AX/OrderData.cls.xml	(.../OrderData.cls.xml)	(revision 49378)
+++ AXimpl/Controle/OrdDiff/AX/OrderData.cls.xml	(.../OrderData.cls.xml)	(revision 50300)
@@ -5,15 +5,15 @@
 <Super>%SerialObject</Super>
 
 <Property name="AantalBesteld">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 </Property>
 
 <Property name="AantalGeleverd">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 </Property>
 
 <Property name="AantalOpenstaand">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 </Property>
 
 <Property name="ItemId">