Index: vhTest/Fake/APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml	(revision 33319)
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.Halux.PPS.Document.impl.common.TussenEtiketVoorToeleveringBepaler">
+<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>APPS.Halux.PPS.Document.impl.common.TussenEtiketVoorToeleveringBepaler</Super>
+
+<Method name="MaakTussenEtiket">
+<ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml	(revision 33319)
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Document.impl.common.TussenEtiketVoorToeleveringBepaler">
+<Super>TECH.Mockable</Super>
+
+<Method name="MaakTussenEtiket">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
+<Implementation><![CDATA[
+	Set DueOutFormatter = ##class(APPS.Halux.PPS.impl.BatchDueOutFormatter).%New()
+	Set TussenEtiket = ##class(BL.Etiket.LadeKlantEtiket).%New("")
+	Set TussenEtiket.Info1 = ToeleveringID
+	Set BatchService = ##class(APPS.Halux.common.impl.BatchService).%New()
+	
+	#dim Batch As APPS.Halux.common.Batch = BatchService.GeefBijhorendeBatchViaID(ToeleveringID)
+	Set TussenEtiket.Info3 = "Batch:"_Batch.GeefID()_", "_DueOutFormatter.GeefGeformatteerdeDueOut(Batch)
+	
+	Quit TussenEtiket
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml
===================================================================
diff -u -r31730 -r33319
--- APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml	(.../MaatwerkProductEtiketten.cls.xml)	(revision 31730)
+++ APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml	(.../MaatwerkProductEtiketten.cls.xml)	(revision 33319)
@@ -118,12 +118,8 @@
 <Private>1</Private>
 <ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
 <Implementation><![CDATA[
-	set ..TussenEtiket = ##class(BL.Etiket.LadeKlantEtiket).%New("")
-	set ..TussenEtiket.Info1 = ToeleveringID
-	#dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(ToeleveringID)
-	Set BatchService = ##class(APPS.Halux.common.impl.BatchService).%New()
-	#dim Batch As APPS.Halux.common.Batch = BatchService.GeefBijhorendeBatchViaID(ToeleveringID)
-	Set ..TussenEtiket.Info3 = "Batch:"_Batch.GeefID()_", "_..DueOutFormatter.GeefGeformatteerdeDueOut(Batch)
+	#dim TussenEtiketVoorToeleveringBepaler = ##class(APPS.Halux.PPS.Document.impl.common.TussenEtiketVoorToeleveringBepaler).%New("")
+	set ..TussenEtiket = TussenEtiketVoorToeleveringBepaler.MaakTussenEtiket(ToeleveringID)
 	Do ..Etiketten.Insert(..TussenEtiket)
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/Halux/PPS/Document/impl/common/TussenEtiketVoorToeleveringBepaler.cls.xml	(revision 33319)
@@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.Halux.PPS.Document.impl.common.TussenEtiketVoorToeleveringBepaler">
+<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>APPS.Halux.PPS.Document.impl.common.TussenEtiketVoorToeleveringBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="MaakTussenEtiket">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<ReturnType>BL.Etiket.LadeKlantEtiket</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakTussenEtiket",ToeleveringID)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>