Index: vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml
===================================================================
diff -u -r51366 -r51367
--- vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml	(.../TestEtiketBuilder.cls.xml)	(revision 51366)
+++ vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml	(.../TestEtiketBuilder.cls.xml)	(revision 51367)
@@ -133,6 +133,29 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Maak MaatwerkProduct Via Order met OorsprongKetting">
+<Implementation><![CDATA[
+	#dim StandaardOrder As DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrder()
+	Do StandaardOrder.IndienMethodCall("GeefOorsprongKetting").DanReturn("((1, ""K||7833"", 255025))")
+	Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
+	Do OrderApiStub.IndienMethodCall("GeefOrder",$$$ElkeWaarde).DanReturn(StandaardOrder)
+	
+	#dim EtiketStub = ##class(BL.Etiket.LadeKlantEtiket).%New(..StandaardPartij2.GeefID())
+	Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",..#ProductID,..StandaardPartij2,..#Aantal).DanReturn(EtiketStub)
+	Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInOrderInfo",EtiketStub,StandaardOrder,..StandaardPartij2,StandaardOrder.GeefOrderLijnViaVolgnummer(..#ToeleveringLijnID)).DanReturn(EtiketStub)
+	
+	Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(OrderApiStub, ..ToeleveringApiStub, ..LadeKlantEtiketBuilderMock, ..PartijApiStub)
+	#dim Etiket As APPS.common.Print.AbstractLabel = EtiketBuilder.MaakMaatwerkProductViaOrder(StandaardOrder.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 Via Toelevering">
 <Implementation><![CDATA[
 	Do ..ToeleveringMetLijn.IndienMethodCall("GeefOorsprongKetting").DanReturn("")