Index: AX/Uitgaand/PM/SOPRContract/impl/SOPRDixfGenerator.cls.xml
===================================================================
diff -u -r46276 -r46463
--- AX/Uitgaand/PM/SOPRContract/impl/SOPRDixfGenerator.cls.xml	(.../SOPRDixfGenerator.cls.xml)	(revision 46276)
+++ AX/Uitgaand/PM/SOPRContract/impl/SOPRDixfGenerator.cls.xml	(.../SOPRDixfGenerator.cls.xml)	(revision 46463)
@@ -15,16 +15,16 @@
 
 <Method name="GenerateAll">
 <Description>
-d ##class(AX.Uitgaand.PM.SOPRContract.impl.SOPRDixfGenerator).%New().GenerateAll()</Description>
+Do ##class(AX.Uitgaand.PM.SOPRContract.impl.SOPRDixfGenerator).%New().GenerateAll()</Description>
 <FormalSpec>Vestiging:AXimpl.InterneFirmaInitialen="VHBE"</FormalSpec>
 <Implementation><![CDATA[
 	Set ..Vestiging = Vestiging
 	Try {
 		Do StartTimer^vhLib
-		#dim ProductIterator As TECH.Iterator = ##class(SOPRIterator).%New(Vestiging)
+		#dim ProductIterator As TECH.Iterator = ##class(AX.Uitgaand.PM.SOPRContract.impl.SOPRIterator).%New(Vestiging)
 		;zw ^||SOPRContract
 		Do ..Generate(ProductIterator)
-		Write !,"Csv voor migratie 0602 SOPR Contract voor "_Vestiging_" is klaar. Aantal minuten: " 
+		Write !,"Csv voor migratie 0622 SOPR Contract voor "_Vestiging_" is klaar. Aantal minuten: " 
 		Write $$TimeFromStart^vhLib()/60
 	} Catch {
 		Write ##class(TECH.ExceptionHandler).Catch().ToString()
@@ -71,19 +71,19 @@
 <Implementation><![CDATA[
 	#dim AXProductData As APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased	
 	Set AXProductData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New()
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "ItemID","ItemID")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "SOPRcontract","SOPRcontract")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "Aankoopprijs","Aankoopprijs")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "AankoopUnitID","AankoopUnitID")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "Kostprijs","Kostprijs")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "KostUnitID","KostUnitID")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "Ingangsdatum","Ingangsdatum")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "ClientID","ClientID")
-	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "KortTekst","KortTekst")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "ItemID")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "SOPRcontract")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "Aankoopprijs")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "AankoopUnitID")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "Kostprijs")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "KostUnitID")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "Ingangsdatum")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "ClientID")
+	Do AXProductData.VoegToeVeld("AXdixf.SOPRContract.SOPRDefinitie", "KortTekst")
 
 	Set AXProductData.ScheidingsTeken = ";"	
 	Set AXProductData.Iterator = ProductIterator
-	Set AXProductData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"SOPRContract"_..Vestiging_".csv")
+	Set AXProductData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0622SOPRContract"_..Vestiging_".csv")
 	
 	#dim BestandGenerator As APPS.common.Rapport.impl.BestandGenerator
 	Set BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()