Index: APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler.cls.xml
===================================================================
diff -u -r34406 -r34460
--- APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler.cls.xml	(.../EtiketInfoBepaler.cls.xml)	(revision 34406)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler.cls.xml	(.../EtiketInfoBepaler.cls.xml)	(revision 34460)
@@ -69,7 +69,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",PartijAPI:DOM.PARTIJ.PartijAPI="",LadeOnderdeelInfoBepaler:APPS.Halux.PPS.Activiteit.impl.TAOR.common.LadeOnderdeelInfoBepaler=""</FormalSpec>
+<FormalSpec>AssemblageKarRepository:APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository="",PartijAPI:DOM.PARTIJ.PartijAPI="",LadeOnderdeelInfoBepaler:APPS.Halux.PPS.Activiteit.impl.TAOR.common.LadeOnderdeelInfoBepaler="",PlaatDimensieStringBepaler:APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -84,7 +84,7 @@
 	Set ..DimensieNaarBalkDimensieConverter = ##class(DOM.PM.Maatwerk.LadeInfo.impl.DimensieNaarBalkDimensieConverter).%New()
 	
 	Set ..DimensieStringBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.DimensieStringBepaler).%New()
-	Set ..PlaatDimensieStringBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler).%New()
+	Set ..PlaatDimensieStringBepaler = $$$Inject(PlaatDimensieStringBepaler, ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler).%New())
 	Set ..KleurcodeStringBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.KleurcodeStringBepaler).%New()
 	Set ..AfwerkingBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.AfwerkingBepaler).%New()
 	Set ..Toeleveringen = ##class(%ArrayOfDataTypes).%New()
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml
===================================================================
diff -u -r34449 -r34460
--- APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml	(.../PlaatDimensieStringBepaler.cls.xml)	(revision 34449)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml	(.../PlaatDimensieStringBepaler.cls.xml)	(revision 34460)
@@ -19,18 +19,21 @@
 </Property>
 
 <Method name="%OnNew">
+<FormalSpec>OpdeelzaagDimensieBepaler:APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..OpdeelzaagDimensieBepaler = ##class(APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler).%New()
+	Set ..OpdeelzaagDimensieBepaler = $$$Inject(OpdeelzaagDimensieBepaler, ##class(APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler).%New())
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefDimensieString">
 <FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel</FormalSpec>
+<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Plaat As DOM.PM.Maatwerk.LadeInfo.Plaat = LadeOnderdeel.GeefPlaten().GetAt(1)
 	
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler/Test.cls.xml	(revision 34460)
@@ -0,0 +1,111 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler.Test">
+<Super>vhUnitTest.DOM.PM.Maatwerk.TAX.Base</Super>
+
+<Property name="LadeOnderdeel">
+<Type>DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel.AutoComplete</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[	Do ##super(aTestName)
+]]></Implementation>
+</Method>
+
+<Method name="Test: OpdeelZaagDimensieBepaler wordt opgeroepen">
+<Implementation><![CDATA[
+	#dim OpdeelZaagDimensieBepalerMock As vhTest.Mock.APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler = ##class(vhTest.Mock.APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler).%New()
+	#dim PlaatDimensieStringBepaler As APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler).%New(OpdeelZaagDimensieBepalerMock)
+	#dim LadeOnderdeelStub As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel).%New()
+	#dim Platen As DOM.PM.Maatwerk.LadeInfo.Platen = ##class(DOM.PM.Maatwerk.LadeInfo.Platen).%New()
+	#dim PlaatStub As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.RugPlaat = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.RugPlaat).%New()
+	
+	Do LadeOnderdeelStub.IndienMethodCall("GeefPlaten").DanReturn(Platen)
+	Do LadeOnderdeelStub.IndienMethodCall("GeefRol").DanReturn(..LadeOnderdeel.Rug)
+	
+	Do Platen.Insert(PlaatStub)
+	
+	Do OpdeelZaagDimensieBepalerMock.VerwachtMethodCall("GeefDimensie", PlaatStub)
+	Do PlaatDimensieStringBepaler.GeefDimensieString(LadeOnderdeelStub)
+	Do OpdeelZaagDimensieBepalerMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Bodem">
+<Implementation><![CDATA[
+	#define Breedte 100
+	#define Hoogte 200
+	#define Lengte 300
+	
+	Do ..AssertDimensieString(..LadeOnderdeel.Bodem, ..GeefBalkDimensies($$$Breedte, $$$Hoogte, $$$Lengte), "100x300")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Front">
+<Implementation><![CDATA[
+	#define Breedte 100
+	#define Hoogte 200
+	#define Lengte 300
+	
+	Do ..AssertDimensieString(..LadeOnderdeel.Front, ..GeefBalkDimensies($$$Breedte, $$$Hoogte, $$$Lengte), "300x100")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Rug">
+<Implementation><![CDATA[
+	#define Breedte 100
+	#define Hoogte 200
+	#define Lengte 300
+	
+	Do ..AssertDimensieString(..LadeOnderdeel.Rug, ..GeefBalkDimensies($$$Breedte, $$$Hoogte, $$$Lengte), "100x300")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Zijkant">
+<Implementation><![CDATA[
+	#define Breedte 100
+	#define Hoogte 200
+	#define Lengte 300
+	
+	Do ..AssertDimensieString(..LadeOnderdeel.Front, ..GeefBalkDimensies($$$Breedte, $$$Hoogte, $$$Lengte), "300x100")
+]]></Implementation>
+</Method>
+
+<Method name="AssertDimensieString">
+<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel,BalkDimensies:DOM.PM.Maatwerk.LadeInfo.dto.BalkDimensies,VerwachteDimensieString:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim OpdeelZaagDimensieBepalerStub As vhTest.Mock.APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler = ##class(vhTest.Mock.APPS.Halux.Machine.OpdeelZaag.impl.DimensieBepaler).%New()
+	#dim PlaatDimensieStringBepaler As APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler).%New(OpdeelZaagDimensieBepalerStub)
+	#dim LadeOnderdeelStub As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel).%New()
+	#dim Platen As DOM.PM.Maatwerk.LadeInfo.Platen = ##class(DOM.PM.Maatwerk.LadeInfo.Platen).%New()
+	
+	Do LadeOnderdeelStub.IndienMethodCall("GeefRol").DanReturn(LadeOnderdeel)	
+	Do LadeOnderdeelStub.IndienMethodCall("GeefPlaten").DanReturn(Platen)
+	
+	Do OpdeelZaagDimensieBepalerStub.IndienMethodCall("GeefDimensie", $$$ElkeWaarde).DanReturn(BalkDimensies)
+	
+	Do $$$AssertEquals(PlaatDimensieStringBepaler.GeefDimensieString(LadeOnderdeelStub), VerwachteDimensieString)
+]]></Implementation>
+</Method>
+
+<Method name="GeefBalkDimensies">
+<FormalSpec>Breedte:TECH.Decimal,Hoogte:TECH.Decimal,Lengte:TECH.Decimal</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.LadeInfo.dto.BalkDimensies</ReturnType>
+<Implementation><![CDATA[
+	#dim BalkDimensies As DOM.PM.Maatwerk.LadeInfo.dto.BalkDimensies = ##class(DOM.PM.Maatwerk.LadeInfo.dto.BalkDimensies).%New()
+	
+	Set BalkDimensies.Breedte = Breedte
+	Set BalkDimensies.Hoogte = Hoogte
+	Set BalkDimensies.Lengte = Lengte
+	
+	Quit BalkDimensies
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/BepaalEtiketData/Test.cls.xml
===================================================================
diff -u -r34447 -r34460
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/BepaalEtiketData/Test.cls.xml	(.../Test.cls.xml)	(revision 34447)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/BepaalEtiketData/Test.cls.xml	(.../Test.cls.xml)	(revision 34460)
@@ -109,12 +109,13 @@
 	#dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
 	#dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
 	#dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+	
 	#dim LadeOnderdeelInfoBepalerMock As vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.LadeOnderdeelInfoBepaler = ##class(vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.LadeOnderdeelInfoBepaler).%New()
 	#dim EtiketInfoBepaler As APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler).%New(..AssemblageKarRepository, ..PartijAPI, LadeOnderdeelInfoBepalerMock)
 
 	Do ProductMock.IndienMethodCall("GeefHalffabItemsBoom", "").DanReturn(..HalffabItemsBoom)
 	Do ProductMock.IndienMethodCall("GeefProductSpecificatie").DanReturn(##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(..IngegevenKenmerken.GeefFamilie(), ..IngegevenKenmerken.GeefVariant(), ..IngegevenKenmerken))
-	Do ToeleveringMock.IndienMethodCall("GeefAantalProducten").DanReturn(4)
+	Do ToeleveringMock.IndienMethodCall("GeefAantalProducten").DanReturn($$$DummyInteger)
 	Do ProductAPIMock.IndienMethodCall("GeefProduct", ..UitvoeringInfo.ProductID).DanReturn(ProductMock)
 	Do ToeleveringAPIMock.IndienMethodCall("GeefToelevering", ..UitvoeringInfo.ToeleveringID).DanReturn(ToeleveringMock)
 
@@ -133,12 +134,25 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Lijn 1 - Lengte en breedte voor LadeOnderdeel-platen">
+<Method name="Test: Lijn 1 - PlaatDimensieStringBepaler wordt opgeroepen">
 <Implementation><![CDATA[
-	Do ..AssertAfmetingenVoorPlaat(##class(vhTest.Dummy.DOM.PM.Maatwerk.LadeInfo.impl.TAX.Bodem).%New(), "505x607")
-	Do ..AssertAfmetingenVoorPlaat(##class(vhTest.Dummy.DOM.PM.Maatwerk.LadeInfo.impl.TAX.Front).%New(), "600x155")
-	Do ..AssertAfmetingenVoorPlaat(##class(vhTest.Dummy.DOM.PM.Maatwerk.LadeInfo.impl.TAX.Rug).%New(), "505x155")
-	Do ..AssertAfmetingenVoorPlaat(##class(vhTest.Dummy.DOM.PM.Maatwerk.LadeInfo.impl.TAX.Zijkant).%New(), "505x155")
+	#dim ProductAPIMock As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance()
+	#dim ToeleveringAPIMock As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
+	#dim ProductMock As vhTest.Mock.DOM.PM.MaatwerkProduct = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
+	#dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New()
+
+	#dim PlaatDimensieStringBepalerMock As vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler = ##class(vhTest.Mock.APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler.PlaatDimensieStringBepaler).%New()
+	#dim EtiketInfoBepaler As APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler).%New(..AssemblageKarRepository, ..PartijAPI, "", PlaatDimensieStringBepalerMock)
+	
+	Do ProductMock.IndienMethodCall("GeefHalffabItemsBoom", "").DanReturn(..HalffabItemsBoom)
+	Do ProductMock.IndienMethodCall("GeefProductSpecificatie").DanReturn(##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%New(..IngegevenKenmerken.GeefFamilie(), ..IngegevenKenmerken.GeefVariant(), ..IngegevenKenmerken))
+	Do ToeleveringMock.IndienMethodCall("GeefAantalProducten").DanReturn($$$DummyInteger)
+	Do ProductAPIMock.IndienMethodCall("GeefProduct", ..UitvoeringInfo.ProductID).DanReturn(ProductMock)
+	Do ToeleveringAPIMock.IndienMethodCall("GeefToelevering", ..UitvoeringInfo.ToeleveringID).DanReturn(ToeleveringMock)
+	
+	Do PlaatDimensieStringBepalerMock.VerwachtMethodCall("GeefDimensieString", ..LadeOnderdeel)
+	Do EtiketInfoBepaler.BepaalEtiketData(..UitvoeringInfo, ..LadeOnderdeel)
+	Do PlaatDimensieStringBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -362,16 +376,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="AssertAfmetingenVoorPlaat">
-<FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.impl.LadeOnderdeel,VerwachteWaarde:TECH.String</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	Set ..LadeOnderdeel = LadeOnderdeel
-	
-	Do ..AssertEtiketInfo("Lijn1", 3, VerwachteWaarde)
-]]></Implementation>
-</Method>
-
 <Method name="AssertKleurCodeVoorLadeOnderdeel">
 <FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.impl.LadeOnderdeel,VerwachteWaarde:TECH.String</FormalSpec>
 <Private>1</Private>
Index: vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml
===================================================================
diff -u -r34449 -r34460
--- vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml	(.../PlaatDimensieStringBepaler.cls.xml)	(revision 34449)
+++ vhTest/Fake/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml	(.../PlaatDimensieStringBepaler.cls.xml)	(revision 34460)
@@ -9,7 +9,8 @@
 
 <Method name="GeefDimensieString">
 <FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel</FormalSpec>
-<Implementation><![CDATA[
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml
===================================================================
diff -u -r34449 -r34460
--- vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml	(.../PlaatDimensieStringBepaler.cls.xml)	(revision 34449)
+++ vhTest/Mock/APPS/Halux/PPS/Activiteit/impl/TAOR/common/EtiketInfoBepaler/PlaatDimensieStringBepaler.cls.xml	(.../PlaatDimensieStringBepaler.cls.xml)	(revision 34460)
@@ -11,7 +11,8 @@
 
 <Method name="GeefDimensieString">
 <FormalSpec>LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("GeefDimensieString",LadeOnderdeel)
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefDimensieString",LadeOnderdeel)
 ]]></Implementation>
 </Method>
 </Class>