Index: vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml
===================================================================
diff -u -r51350 -r51351
--- vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml	(.../TestEtiketBuilder.cls.xml)	(revision 51350)
+++ vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml	(.../TestEtiketBuilder.cls.xml)	(revision 51351)
@@ -58,7 +58,6 @@
 	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 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())
@@ -95,6 +94,51 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Maak MaatwerkProduct Via Toelevering met OorsprongKetting">
+<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 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("((1, ""K||7833"", 255025))")
+	#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(StandaardPartij2.GeefID())
+	#dim LadeKlantEtiketBuilderMock As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ##class(vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New(,ProductApi)
+	Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",ProductID,StandaardPartij2,Aantal).DanReturn(EtiketStub)
+	Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,ToeleveringMetLijn,ToeleveringMetLijn.GeefToeleveringLijn(ToeleveringLijnID),StandaardPartij2).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 $$$AssertEquals(Etiket.ProductieWeek,"ProductieWeek")
+	}
+	
+	Do LadeKlantEtiketBuilderMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Maak MaatwerkProduct In VHoss Via Toelevering">
 <Implementation><![CDATA[
 	#dim ProductID = 1000