Index: vhDeploy/D20170719xConfigItemControleOrderLijnen.cls.xml
===================================================================
diff -u
--- vhDeploy/D20170719xConfigItemControleOrderLijnen.cls.xml	(revision 0)
+++ vhDeploy/D20170719xConfigItemControleOrderLijnen.cls.xml	(revision 43696)
@@ -0,0 +1,36 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20170719xConfigItemControleOrderLijnen">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>ConfigItem - Controle OrderLijnen tussen Admin en AX</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Sleutel As %String = "AX_ControleOrderLijnenAxAdmin"
+	#dim Notes01 As %String = "\\notes01\shared\OV\Controle verkooporders Admin - AX"
+	#dim Main As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("DefaultExportDirectory")
+	
+	If $$$Server = "CACHE01" {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel,Notes01_"\prod")
+	} ElseIf $$$Server = "CACHESTAGING2010" {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel,Notes01_"\staging")
+	} ElseIf $$$Server = "CACHEDEV2010" {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel,Notes01_"\dev")
+	} ElseIf $$$Server = "CACHEACCEPT2010" {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel,Notes01_"\accept")
+	} ElseIf $$$Server = "CACHETEST2010" {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel,Notes01_"\test")
+	} Else {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel,Main_"\AX\ControleOrderLijnenAxAdmin")
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AXimpl/Controle/Order/OrderLijnControleGenerator.cls.xml
===================================================================
diff -u -r43070 -r43696
--- AXimpl/Controle/Order/OrderLijnControleGenerator.cls.xml	(.../OrderLijnControleGenerator.cls.xml)	(revision 43070)
+++ AXimpl/Controle/Order/OrderLijnControleGenerator.cls.xml	(.../OrderLijnControleGenerator.cls.xml)	(revision 43696)
@@ -3,6 +3,11 @@
 <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>
@@ -18,11 +23,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="OrderLijnData">
-<Type>APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
@@ -32,16 +32,24 @@
 	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 ..OrderLijnData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New()
-	
+	Set ..TijdstipCreatie = ##class(TECH.DateTime).CurrentTimeStamp()
+		
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
+<Method name="GenerateOrderLijnControle">
+<Implementation><![CDATA[
+	Do ..GenerateAll("Admin")
+	Do ..GenerateAll("AX")
+]]></Implementation>
+</Method>
+
 <Method name="GenerateAll">
 <FormalSpec>Omgeving:%String</FormalSpec>
 <Implementation><![CDATA[
 	#dim OrderLijnIterator As TECH.Iterator
+	
 	If (Omgeving = "Admin"){
 		Set OrderLijnIterator = ..AdminOrderLijnIterator
 	} ElseIf (Omgeving = "AX"){
@@ -65,18 +73,22 @@
 <FormalSpec>OrderLijnIterator:TECH.Iterator,Omgeving:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ..OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "Klant")
-	Do ..OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "LeverDatum")
-	Do ..OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "Product")
-	Do ..OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "VerkochtAantal")
-	Do ..OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "VerkoopOrderId")
-	Do ..OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "VerkoopOrderLijnId")
+	Set OrderLijnData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New()
+	
+	Do OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "Klant")
+	Do OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "LeverDatum")
+	Do OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "Product")
+	Do OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "VerkochtAantal")
+	Do OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "VerkoopOrderId")
+	Do OrderLijnData.VoegToeVeld("AXimpl.Controle.Order.OrderLijn", "VerkoopOrderLijnId")
 
-	Set ..OrderLijnData.ScheidingsTeken = ";"	
-	Set ..OrderLijnData.Iterator = OrderLijnIterator
-	Set ..OrderLijnData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"VHIP 906 - "_Omgeving_" - OrderLijnen ter controle.csv")
+	Set OrderLijnData.ScheidingsTeken = ";"	
+	Set OrderLijnData.Iterator = OrderLijnIterator
 	
-	Do ..BestandGenerator.MaakBestand(..OrderLijnData)
+	#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")
+	
+	Do ..BestandGenerator.MaakBestand(OrderLijnData)
 ]]></Implementation>
 </Method>
 </Class>