Index: vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml
===================================================================
diff -u -r51349 -r51350
--- vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml	(.../TestEtiketBuilder.cls.xml)	(revision 51349)
+++ vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml	(.../TestEtiketBuilder.cls.xml)	(revision 51350)
@@ -49,18 +49,49 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TestMaakMaatwerkProductViaToelevering">
+<Method name="Test: Maak MaatwerkProduct Via Toelevering">
 <Implementation><![CDATA[
+	#dim ProductID = 1000
+	#dim ToeleveringLijnID = 101
+	#dim Aantal = 1
+	
 	Do ..Data.MaakData(..OorsprongKetting)
 	Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New()
 	#dim ToeleveringID = ..Data.Order.GeefOrderLijnViaVolgnummer(101).GeefToelevering().GeefID()
-	#dim Etiket As APPS.common.Print.AbstractLabel = EtiketBuilder.MaakMaatwerkProductViaToelevering(ToeleveringID,101,1)
+	//#dim Etiket As APPS.common.Print.AbstractLabel = EtiketBuilder.MaakMaatwerkProductViaToelevering(ToeleveringID,101,1)
+
+	#dim ToeleveringMetLijn As DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).ToeleveringMetLijn()
+	Do ToeleveringMetLijn.IndienMethodCall("GeefDueOutTime").DanReturn(##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).%New().CurrentTimeStamp())
+	Do ToeleveringMetLijn.IndienMethodCall("GeefOorsprongKetting").DanReturn("")
+	#dim ToeleveringApiStub = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).%New()
+	Do ToeleveringApiStub.IndienMethodCall("GeefToelevering",$$$ElkeWaarde).DanReturn(ToeleveringMetLijn)
+
+	#dim PartijApiStub = ##class(vhTest.Mock.DOM.PARTIJ.PartijAPI).%New()
+	#dim StandaardPartij1 As DOM.PARTIJ.Partij = ##class(vhTest.Utils.DOM.PARTIJ.Partij).StandaardPartij()
+	Do PartijApiStub.IndienMethodCall("GeefPartij","K||1234").DanReturn(StandaardPartij1)
+	#dim StandaardPartij2 As DOM.PARTIJ.Partij = ##class(vhTest.Utils.DOM.PARTIJ.Partij).StandaardPartij()
+	Do PartijApiStub.IndienMethodCall("GeefPartij","K||4682").DanReturn(StandaardPartij2)
 	
+	Set Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do Product.IndienMethodCall("GeefKleurVanKorttekst").DanReturn("Z")
+	#dim ProductApi As DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApi.IndienMethodCall("GeefProduct",ProductID).DanReturn(Product)
+	
+	#dim EtiketStub = ##class(BL.Etiket.LadeKlantEtiket).%New(StandaardPartij1.GeefID())
+	#dim LadeKlantEtiketBuilderMock As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ##class(vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New(,ProductApi)
+	Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",ProductID,StandaardPartij1,Aantal).DanReturn(EtiketStub)
+	Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,ToeleveringMetLijn,ToeleveringMetLijn.GeefToeleveringLijn(ToeleveringLijnID),StandaardPartij1).DanReturn(EtiketStub)
+	Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("FormateerProductieWeek",ToeleveringMetLijn.GeefDueOutTime()).DanReturn("ProductieWeek")
+	
+	Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ToeleveringApiStub, LadeKlantEtiketBuilderMock, PartijApiStub)
+	#dim Etiket As BL.Etiket.LadeKlantEtiket = EtiketBuilder.MaakMaatwerkProductViaToelevering(ToeleveringMetLijn.GeefID(),ToeleveringLijnID,Aantal)
+	
 	If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){
 		Do $$$AssertEquals(Etiket.%ClassName(1),##class(BL.Etiket.LadeKlantEtiket).%ClassName(1))
-		Do ..ControleEtiket(Etiket)
-		Do $$$AssertEquals(Etiket.ToeleveringID,ToeleveringID)
+		Do $$$AssertEquals(Etiket.ProductieWeek,"ProductieWeek")
 	}
+	
+	Do LadeKlantEtiketBuilderMock.Verifieer()
 ]]></Implementation>
 </Method>