Index: AXimpl/Controle/OrdDiff/MaakDiff.cls.xml
===================================================================
diff -u -r49434 -r69259
--- AXimpl/Controle/OrdDiff/MaakDiff.cls.xml	(.../MaakDiff.cls.xml)	(revision 49434)
+++ AXimpl/Controle/OrdDiff/MaakDiff.cls.xml	(.../MaakDiff.cls.xml)	(revision 69259)
@@ -3,23 +3,50 @@
 <Class name="AXimpl.Controle.OrdDiff.MaakDiff">
 <Super>TECH.RegisteredObject</Super>
 
+<Property name="Debug">
+<Type>%Boolean</Type>
+</Property>
+
+<UDLText name="T">
+<Content><![CDATA[
+/* OPHALEN VAN DE DIFF VIA SQL
+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
+*/
+]]></Content>
+</UDLText>
+
 <Method name="%OnNew">
 <Description>
 D ##class(AXimpl.Controle.OrdDiff.MaakDiff).%New().Maak()</Description>
+<FormalSpec>Debug:%Boolean=1</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
-<Implementation><![CDATA[	Quit $$$OK
+<Implementation><![CDATA[
+	Set ..Debug=Debug
+	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="Maak">
 <Implementation><![CDATA[
+	If ..Debug Write "Clean",!
 	Do ..VerwijderOudeData()
+	
+	If ..Debug Write "Ophalen Admin orders",!
 	Do ..HaalAdminData()
+	
+	If ..Debug Write "Ophalen AX orders",!
 	Do ..HaalAXData()
+	
+	If ..Debug Write "Bepaal verschillen",!
 	Do ..BepaalDiff()
+	
+	If ..Debug Write "Klaar. Druk enter om verder te gaan" Read K
 ]]></Implementation>
 </Method>