Index: AXimpl/Controle/Order/OrderLijnControleGenerator.cls.xml
===================================================================
diff -u -r43696 -r43699
--- AXimpl/Controle/Order/OrderLijnControleGenerator.cls.xml	(.../OrderLijnControleGenerator.cls.xml)	(revision 43696)
+++ AXimpl/Controle/Order/OrderLijnControleGenerator.cls.xml	(.../OrderLijnControleGenerator.cls.xml)	(revision 43699)
@@ -3,11 +3,6 @@
 <Class name="AXimpl.Controle.Order.OrderLijnControleGenerator">
 <Super>TECH.RegisteredObject</Super>
 
-<Property name="TijdstipCreatie">
-<Type>%TimeStamp</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="AdminOrderLijnIterator">
 <Type>AXimpl.Controle.Order.Admin.AdminOrderLijnIterator</Type>
 <Private>1</Private>
@@ -32,21 +27,21 @@
 	Set ..BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()
 	Set ..AdminOrderLijnIterator = ##class(AXimpl.Controle.Order.Admin.AdminOrderLijnIterator).%New()
 	Set ..AxOrderLijnIterator = ##class(AXimpl.Controle.Order.Ax.AxOrderLijnIterator).%New()
-	Set ..TijdstipCreatie = ##class(TECH.DateTime).CurrentTimeStamp()
-		
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GenerateOrderLijnControle">
 <Implementation><![CDATA[
-	Do ..GenerateAll("Admin")
-	Do ..GenerateAll("AX")
+	#dim TijdstipCreatie As %TimeStamp = ##class(TECH.Files).GeefCurrentTimeStamp()
+	Do ..GenerateAll("Admin",TijdstipCreatie)
+	Do ..GenerateAll("AX",TijdstipCreatie)
 ]]></Implementation>
 </Method>
 
 <Method name="GenerateAll">
-<FormalSpec>Omgeving:%String</FormalSpec>
+<FormalSpec>Omgeving:%String,TijdstipCreatie:%TimeStamp=##class(TECH.Files).GeefCurrentTimeStamp()</FormalSpec>
 <Implementation><![CDATA[
 	#dim OrderLijnIterator As TECH.Iterator
 	
@@ -60,7 +55,7 @@
 	
 	Do StartTimer^vhLib
 	Try {
-		do ..Generate(OrderLijnIterator, Omgeving)
+		do ..Generate(OrderLijnIterator, Omgeving, TijdstipCreatie)
 		Write !,"Csv van "_Omgeving_" voor OrderLijnControle is klaar. Aantal minuten: " 
 		write $$TimeFromStart^vhLib()/60
 	} Catch {
@@ -70,7 +65,7 @@
 </Method>
 
 <Method name="Generate">
-<FormalSpec>OrderLijnIterator:TECH.Iterator,Omgeving:%String</FormalSpec>
+<FormalSpec>OrderLijnIterator:TECH.Iterator,Omgeving:%String,TijdstipCreatie:%TimeStamp=##class(TECH.Files).GeefCurrentTimeStamp()</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set OrderLijnData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New()
@@ -86,7 +81,7 @@
 	Set OrderLijnData.Iterator = OrderLijnIterator
 	
 	#dim BestandLocatie As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_ControleOrderLijnenAxAdmin")
-	Set OrderLijnData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(BestandLocatie,"VHIP 906 - "_..TijdstipCreatie_" - "_Omgeving_" - OrderLijnen ter controle.csv")
+	Set OrderLijnData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(BestandLocatie,"VHIP 906 - "_TijdstipCreatie_" - "_Omgeving_" - OrderLijnen ter controle.csv")
 	
 	Do ..BestandGenerator.MaakBestand(OrderLijnData)
 ]]></Implementation>