Index: vhUnitTest/AX/Uitgaand/PM/impl/RunAll2a/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AX/Uitgaand/PM/impl/RunAll2a/Test.cls.xml	(revision 0)
+++ vhUnitTest/AX/Uitgaand/PM/impl/RunAll2a/Test.cls.xml	(revision 42149)
@@ -0,0 +1,66 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AX.Uitgaand.PM.impl.RunAll2a.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Dagelijks nachtelijke check of Dixf converties nog ok zijn">
+<Implementation><![CDATA[
+	If ..MagUitgevoerdWordenVolgensTijdstip() {
+		Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("AX_DIXF",..GeefBestandLocatie(),..#Applicatie)
+	
+		Do ##class(AX.Uitgaand.PM.impl.RunAll2a).GenerateAll()	
+		
+		Do $$$AssertRecentGemaakteBestanden(..GeefBestandLocatie())
+	}
+]]></Implementation>
+</Method>
+
+<Method name="MagUitgevoerdWordenVolgensTijdstip">
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not($$$ValIsBetween($Piece($Horolog,",",2),$$INTTIME^vhLib.DataTypes("09:00"),$$INTTIME^vhLib.DataTypes("21:00")))
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+Method StuurMailNaarIct(Boodschap As %String) [ Private ]
+{
+	#dim MailAPI As TECH.Mail.MailAPI = ##class(TECH.Context).Instance().GeefMailAPI()
+	#dim Mail As TECH.Mail.Mail = MailAPI.MaakNieuwMail()
+	
+	Do Mail.VoegToeOntvanger(..GeefOntvanger())
+	Do Mail.VoegToeOntvangerCC(..GeefOntvangerCC())
+	Do Mail.ZetVerzender(..GeefVerzender())
+	Do Mail.ZetOnderwerp(..GeefOnderwerp())
+	Do Mail.ZetInhoud(Boodschap)
+	
+	Do MailAPI.VerstuurMail(Mail)
+}
+
+Method GeefVerzender() As TECH.String [ Private ]
+{
+	Quit "AdminCACHE@vanhoecke.be"
+}
+
+Method GeefOnderwerp() As TECH.String [ Private ]
+{
+	Quit "TEST!! RunAll2a - nachtelijke run"
+}
+
+Method GeefOntvanger() As TECH.String [ Abstract, Private ]
+{
+	Quit "S-THB@vanhoecke.be" // "ICT_Development@vanhoecke.be"
+}
+
+Method GeefOntvangerCC() As TECH.String [ Abstract, Private ]
+{
+}
+*/
+]]></Content>
+</UDLText>
+</Class>
+
+
+</Export>