Index: AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifMerger.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifMerger.cls.xml	(revision 0)
+++ AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifMerger.cls.xml	(revision 34760)
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.VKP.VanHoeckeKlant.impl.AifMerger">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="MergableFieldCollector">
+<Type>AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>MergableFieldCollector:AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	set ..MergableFieldCollector = $$$Inject(MergableFieldCollector,##class(AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="Merge">
+<FormalSpec><![CDATA[&AxCustomer:AXaif.Customer.AxdCustomer,AdminCustomer:AXaif.Customer.AxdCustomer]]></FormalSpec>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml
===================================================================
diff -u
--- vhTest/Mock/AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml	(revision 0)
+++ vhTest/Mock/AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml	(revision 34760)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector">
+<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.VKP.VanHoeckeKlant.impl.MergableFieldCollector,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="CollectFields">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("CollectFields")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml
===================================================================
diff -u
--- vhTest/Fake/AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml	(revision 0)
+++ vhTest/Fake/AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml	(revision 34760)
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector">
+<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.VKP.VanHoeckeKlant.impl.MergableFieldCollector</Super>
+
+<Method name="CollectFields">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifMerger/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifMerger/Test.cls.xml	(revision 0)
+++ vhUnitTest/AX/Uitgaand/VKP/VanHoeckeKlant/impl/AifMerger/Test.cls.xml	(revision 34760)
@@ -0,0 +1,38 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AX.Uitgaand.VKP.VanHoeckeKlant.impl.AifMerger.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test">
+<Implementation><![CDATA[
+	set MergableFields = ##class(%ListOfDataTypes).%New()
+	do MergableFields.Insert("Custable[].CashDisc")
+	
+	set Merger = ##class(AX.Uitgaand.VKP.VanHoeckeKlant.impl.AifMerger).%New(..MergableFieldCollector(MergableFields))
+	
+	set AxCustomer = ##class(AXaif.Customer.AxdCustomer).%New()
+	set CustTable = ##class(AXaif.Customer.AxdEntityCustTable).%New()
+	set CustTable.CashDisc = "10D3%"
+	do AxCustomer.CustTable.Insert(CustTable)
+		
+	set AdminCustomer = ##class(AXaif.Customer.AxdCustomer).%New()
+	set CustTable = ##class(AXaif.Customer.AxdEntityCustTable).%New()
+	set CustTable.CashDisc = "10D3%"
+	
+	do AdminCustomer.CustTable.Insert(CustTable)
+]]></Implementation>
+</Method>
+
+<Method name="MergableFieldCollector">
+<FormalSpec>MergableFields:%ListOfDataTypes</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	set MergableFieldCollector = ##class(vhTest.Mock.AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector).%New()
+	do MergableFieldCollector.IndienMethodCall("CollectFields").DanReturn(MergableFields)
+	quit MergableFieldCollector
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml	(revision 0)
+++ AX/Uitgaand/VKP/VanHoeckeKlant/impl/MergableFieldCollector.cls.xml	(revision 34760)
@@ -0,0 +1,12 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.VKP.VanHoeckeKlant.impl.MergableFieldCollector">
+<Super>TECH.Mockable</Super>
+
+<Method name="CollectFields">
+<ReturnType>%ListOfDataTypes</ReturnType>
+</Method>
+</Class>
+
+
+</Export>