Index: vhTest/Mock/AX/Uitgaand/common/impl/MessageManager.cls.xml
===================================================================
diff -u
--- vhTest/Mock/AX/Uitgaand/common/impl/MessageManager.cls.xml	(revision 0)
+++ vhTest/Mock/AX/Uitgaand/common/impl/MessageManager.cls.xml	(revision 34685)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.AX.Uitgaand.common.impl.MessageManager">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>AX.Uitgaand.common.impl.MessageManager,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GenerateID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GenerateID")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/common/AifConverter.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/common/AifConverter.cls.xml	(revision 0)
+++ AX/Uitgaand/common/AifConverter.cls.xml	(revision 34685)
@@ -0,0 +1,8 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.common.AifConverter">
+<Abstract>1</Abstract>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/AX/Uitgaand/common/impl/MessageManager.cls.xml
===================================================================
diff -u
--- vhTest/Fake/AX/Uitgaand/common/impl/MessageManager.cls.xml	(revision 0)
+++ vhTest/Fake/AX/Uitgaand/common/impl/MessageManager.cls.xml	(revision 34685)
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.AX.Uitgaand.common.impl.MessageManager">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>AX.Uitgaand.common.impl.MessageManager</Super>
+
+<Method name="GenerateID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/common/impl/AifGenerator.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/common/impl/AifGenerator.cls.xml	(revision 0)
+++ AX/Uitgaand/common/impl/AifGenerator.cls.xml	(revision 34685)
@@ -0,0 +1,82 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.common.impl.AifGenerator">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="FileAPI">
+<Type>AX.common.impl.FileAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="FirmaBepaler">
+<Type>AX.common.impl.FirmaBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MessageManager">
+<Type>AX.Uitgaand.common.impl.MessageManager</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>MessageManager:AX.Uitgaand.common.impl.MessageManager</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	set ..FirmaBepaler = ##class(AX.common.impl.FirmaBepaler).%New()
+	set ..FileAPI = ##class(AX.common.impl.FileAPI).%New()
+	set ..MessageManager = $$$Inject(MessageManager,##class(AX.Uitgaand.common.impl.MessageManager).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="Generate">
+<FormalSpec>Command:%String,Id:%String</FormalSpec>
+<Implementation><![CDATA[
+	set Message = ##class(AXaif.Message.Envelope).%New()
+	set Message.Header = ##class(AXaif.Message.Header).%New()
+	set Message.Header.MessageId = ..MessageManager.GenerateID()
+	set Message.Header.Company = ..FirmaBepaler.GeefInitialen()
+	set Message.Header.Action = ..GetAction(Command)
+	set Message.Body = ##class(AXaif.Message.Body).%New()
+	set Message.Body.MessageParts = ##class(AXaif.Message.MessageParts).%New()
+	
+	#dim Converter As AX.Uitgaand.common.AifConverter = ..GetConverter(Command)
+	
+	set:Command="Customer/Create" Message.Body.MessageParts.Customer = Converter.Convert(Id)
+	set:Command="SalesInvoice/Create" Message.Body.MessageParts.LedgerGeneralJournal = Converter.Convert(Id)
+		
+	#dim Path As %String = ##class(TECH.Files).AppendSubPath(##class(TECH.Config.ConfigMgr).Instance().GeefString("MSMGATEWAY"),"AIF\Inbound")
+	#dim Filename As %String = $replace(Command,"/","-")_" "_Id_" "_" - "_..FirmaBepaler.GeefInitialen()_##class(TECH.Files).GeefCurrentTimeStamp()_" .xml"
+	#dim FullFilename As %String = ##class(TECH.Files).AppendFile(Path,Filename)
+		
+	#dim FileWriter As TECH.File.FileWriter = ..FileAPI.GeefFileWriter()
+	do FileWriter.Open(FullFilename,$$$False)
+	do FileWriter.WriteXML(Message)
+	do FileWriter.Close()
+]]></Implementation>
+</Method>
+
+<Method name="GetConverter">
+<FormalSpec>Command:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>AX.Uitgaand.common.AifConverter</ReturnType>
+<Implementation><![CDATA[	quit ##class(AX.Uitgaand.VKP.VanHoeckeKlant.impl.AifConverter).%New()
+]]></Implementation>
+</Method>
+
+<Method name="GetAction">
+<FormalSpec>Command:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	quit "http://schemas.microsoft.com/dynamics/2008/01/services/CustomerService/create"
+	//quit:Command="SalesInvoice/Create" "http://schemas.microsoft.com/dynamics/2008/01/services/GeneralJournalService/create"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/common/impl/MessageManager.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/common/impl/MessageManager.cls.xml	(revision 0)
+++ AX/Uitgaand/common/impl/MessageManager.cls.xml	(revision 34685)
@@ -0,0 +1,14 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.common.impl.MessageManager">
+<Super>TECH.Mockable</Super>
+
+<Method name="GenerateID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit "{"_$system.Util.CreateGUID()_"}"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>