Index: AX/Uitgaand/EC/Service.cls.xml
===================================================================
diff -u -r44290 -r44431
--- AX/Uitgaand/EC/Service.cls.xml	(.../Service.cls.xml)	(revision 44290)
+++ AX/Uitgaand/EC/Service.cls.xml	(.../Service.cls.xml)	(revision 44431)
@@ -44,7 +44,7 @@
 	{
 		Set ..ExportDefaults=##class(AX.Uitgaand.EC.impl.ExportDefaults).%New()
 	}
-	Set ..ExportDefaults.NewGenerationID=##class(AX.Uitgaand.EC.Klanten.impl.Klanten).LaatsteGenerationID()
+	;Set ..ExportDefaults.NewGenerationID=##class(AX.Uitgaand.EC.Klanten.impl.Klanten).LaatsteGenerationID()
 	Set ..ExportSamenvatting=##class(AX.Uitgaand.EC.impl.ExportSamenvatting).%New(..ExportDefaults)
 	Set ..Tijdstip=$zdt($H,3)
 	Set ..Debug=1
@@ -54,7 +54,7 @@
 
 <Method name="GenerateAndExportAll">
 <Description>
-d ##class(AX.Uitgaand.EC.Service).%New(1).GenerateAndExportAll()</Description>
+d ##class(AX.Uitgaand.EC.Service).%New().GenerateAndExportAll()</Description>
 <Implementation><![CDATA[
 	Do ..GenerateAll()	
 	Do ..ExportAll()
@@ -73,6 +73,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ExportProductieLevertermijn">
+<Description>
+d ##class(AX.Uitgaand.EC.Service).%New().ExportProductieLevertermijn()</Description>
+<Implementation><![CDATA[
+	Do ..InitLog()
+	d ##class(AX.Uitgaand.EC.Productie.impl.ExportLevertermijn).%New(..ExportDefaults, ..ExportSamenvatting).ExportAll()
+	Do ..ZetLog("Export Productielevertermijn")
+	Do ..ExportBestandsSamenvatting()
+	Do ..VerplaatsBestanden()
+]]></Implementation>
+</Method>
+
 <Method name="KillAll">
 <Description>
 d ##class(AX.Uitgaand.EC.Service).KillAll()</Description>
@@ -108,10 +120,11 @@
 	Do ..ExportKlanten()
 	Do ..ExportKlantGroepen()
 	Do ..ExportProductReferenties()
-	;Do ..ExportHistoriek()
+	Do ..ExportHistoriek()
 	
 	Do ..ExportBasisAssortiment()
 	Do ..ExportKlantUitzAssortiment()
+	Do ..ExportKlantExcludedAssortiment()
 	
 	Do ..ExportCodexPrijzen()
 	Do ..ExportKlantUitzPrijzen()
@@ -187,7 +200,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ExportKlantExcludedAssortiment">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..InitLog()
+	d ##class(AX.Uitgaand.EC.Assortiment.impl.ExportKlantExcluded).%New(..ExportDefaults, ..ExportSamenvatting).ExportAll()
+	Do ..ZetLog("Export excluded assortiment")
+]]></Implementation>
+</Method>
+
 <Method name="ExportGebruiker">
+<Description>
+d ##class(AX.Uitgaand.EC.Service).%New().ExportGebruiker()</Description>
 <Implementation><![CDATA[
 	Do ..InitLog()
 	d ##class(AX.Uitgaand.EC.Gebruiker.impl.ExportGebruiker).%New(..ExportDefaults, ..ExportSamenvatting).ExportAll()
Index: AX/Uitgaand/EC/Productie/impl/ExportLevertermijn.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/EC/Productie/impl/ExportLevertermijn.cls.xml	(revision 0)
+++ AX/Uitgaand/EC/Productie/impl/ExportLevertermijn.cls.xml	(revision 44431)
@@ -0,0 +1,172 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.EC.Productie.impl.ExportLevertermijn">
+<ClassType/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="FileName">
+<Type>%String</Type>
+</Property>
+
+<Property name="Writer">
+<Type>%XML.Writer</Type>
+</Property>
+
+<Property name="DomeinID">
+<Type>%String</Type>
+</Property>
+
+<Property name="ExportDefaults">
+<Type>AX.Uitgaand.EC.impl.ExportDefaults</Type>
+</Property>
+
+<Property name="ExportSamenvatting">
+<Type>AX.Uitgaand.EC.impl.ExportSamenvatting</Type>
+</Property>
+
+<Method name="ToonProductieDuur">
+<Description>
+D ##class(AX.Uitgaand.EC.Productie.impl.ExportLevertermijn).ToonProductieDuur()</Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	w "TBX ",..%New("","").BerekenTBX(),!
+	w "LBX ",..%New("","").BerekenLBX(),!
+	w "TAX ",..%New("","").BerekenTAX(),!
+]]></Implementation>
+</Method>
+
+<Method name="%OnNew">
+<FormalSpec>ExportDefaults:AX.Uitgaand.EC.impl.ExportDefaults,ExportSamenvatting:AX.Uitgaand.EC.impl.ExportSamenvatting</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..ExportDefaults=ExportDefaults
+	Set ..ExportSamenvatting=ExportSamenvatting
+	Set ..DomeinID="VH"
+
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ExportAll">
+<Implementation><![CDATA[
+	Do ..OpenOutput()
+	Do ..ExportOne("Legrabox",..BerekenLBX())
+	Do ..ExportOne("Tandembox",..BerekenTBX())
+	Do ..ExportOne("TA'ORbox",..BerekenTAX())
+	Do ..CloseOutput()
+]]></Implementation>
+</Method>
+
+<Method name="BerekenTBX">
+<Implementation><![CDATA[
+	#dim VerpakkingsType as DOM.VKP.impl.ProductieDagenBepaler.enu.VerpakkingSoort
+	#dim MaxDagen as %Integer
+	#dim Dagen as %Integer
+	
+	Set MaxDagen=0
+	For VerpakkingsType="Bulk","Probox","Karton","VHOSS" {
+		Set Dagen=..BerekenLevertermijnPerVerpakking(VerpakkingsType)
+		Set:MaxDagen<Dagen MaxDagen=Dagen
+	}
+	Quit MaxDagen
+]]></Implementation>
+</Method>
+
+<Method name="BerekenLBX">
+<Private>1</Private>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[
+	#dim VerpakkingsType as DOM.VKP.impl.ProductieDagenBepaler.enu.VerpakkingSoort
+	#dim MaxDagen as %Integer
+	#dim Dagen as %Integer
+	
+	Set MaxDagen=0
+	For VerpakkingsType="Bulk","Probox","Karton","VHOSS" {
+		Set Dagen=..BerekenLevertermijnPerVerpakking(VerpakkingsType)
+		Set:MaxDagen<Dagen MaxDagen=Dagen
+	}
+	Quit MaxDagen
+]]></Implementation>
+</Method>
+
+<Method name="BerekenTAX">
+<Private>1</Private>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[
+	#dim VerpakkingsType as DOM.VKP.impl.ProductieDagenBepaler.enu.VerpakkingSoort
+	#dim MaxDagen as %Integer
+	#dim Dagen as %Integer
+
+	Set MaxDagen=0
+	For VerpakkingsType="TAX" {
+		Set Dagen=..BerekenLevertermijnPerVerpakking(VerpakkingsType)
+		Set:MaxDagen<Dagen MaxDagen=Dagen
+	}
+	Quit MaxDagen
+]]></Implementation>
+</Method>
+
+<Method name="BerekenLevertermijnPerVerpakking">
+<FormalSpec>VerpakkingsType:DOM.VKP.impl.ProductieDagenBepaler.enu.VerpakkingSoort</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[
+	#dim Dagen as %Integer
+	Set DagenData=##class(DOM.VKP.impl.TBXProductieDagenData).OpenId(VerpakkingsType)
+	If $isObject(DagenData) {
+		Set Dagen=DagenData.GlobaleDefault
+	} Else {
+		Set Dagen=0
+	}
+	Quit Dagen
+]]></Implementation>
+</Method>
+
+<Method name="ExportOne">
+<FormalSpec>Groep:%String,AantalDagen:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	Set Proxy=..BuildProxy(Groep, AantalDagen)
+	Do ..Writer.Object(Proxy,"Levertermijn")
+	Do ..ExportSamenvatting.Increment()
+]]></Implementation>
+</Method>
+
+<Method name="BuildProxy">
+<FormalSpec>Groep:%String,AantalDagen:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	Set Proxy=##class(pxLevertermijn).%New()
+	Set Proxy.ProductGroep=Groep
+	Set Proxy.AantalDagen=AantalDagen
+	Quit Proxy
+]]></Implementation>
+</Method>
+
+<Method name="OpenOutput">
+<Implementation><![CDATA[
+	Set ..Writer=##class(%XML.Writer).%New()
+	Set ..Writer.NoXMLDeclaration=1
+	Set ..Writer.Indent=1
+	Set Omschrijving="ProductieLevertermijn"
+	Set BestandsNaam=..ExportDefaults.GeefBestandsNaam(Omschrijving)
+	Do ..ExportSamenvatting.NieuwBestand(Omschrijving, BestandsNaam)
+	Set sc=..Writer.OutputToFile(..ExportDefaults.GeefPadEnBestandsNaam(Omschrijving))
+	Quit:$$$ISERR(sc) sc
+	Set ..Writer.Charset="UTF-8"
+	Do ..Writer.RootElement("ProductieLevertermijn")
+	Do ..Writer.Element("Domein")
+	Do ..Writer.Write(..DomeinID)
+	Do ..Writer.EndElement()
+]]></Implementation>
+</Method>
+
+<Method name="CloseOutput">
+<Implementation><![CDATA[
+	Do ..Writer.EndRootElement()
+	Do ..ExportSamenvatting.SluitBestand()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/EC/Productie/impl/pxLevertermijn.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/EC/Productie/impl/pxLevertermijn.cls.xml	(revision 0)
+++ AX/Uitgaand/EC/Productie/impl/pxLevertermijn.cls.xml	(revision 44431)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+
+
+<Class name="AX.Uitgaand.EC.Productie.impl.pxLevertermijn">
+<IncludeCode>BL.EC.Common</IncludeCode>
+<Super>%RegisteredObject,%XML.Adaptor</Super>
+
+<Property name="ProductGroep">
+<Type>%String</Type>
+<Parameter name="XMLNAME" value="ProductGroep"/>
+</Property>
+
+<Property name="AantalDagen">
+<Type>%String</Type>
+<Parameter name="XMLNAME" value="AantalDagen"/>
+</Property>
+</Class>
+</Export>