Index: vhUnitTest/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder/Test.cls.xml
===================================================================
diff -u -r65394 -r65395
--- vhUnitTest/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder/Test.cls.xml	(.../Test.cls.xml)	(revision 65394)
+++ vhUnitTest/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder/Test.cls.xml	(.../Test.cls.xml)	(revision 65395)
@@ -259,20 +259,18 @@
 <Method name="Test: Voor Noteborn moeten de eerste 13 karakters van de ProjectReferentie in de KlantBarcode gezet worden">
 <Implementation><![CDATA[
 	#dim PartijMetKlantBarcode As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(##class(DOM.VKP.enu.Klant).Noteborn())
-	#dim Order As DOM.VKP.Order = ..Data.MaaktDataOrder(##class(DOM.VKP.enu.Klant).Noteborn())	
-	#dim ProductOrderLijn As DOM.VKP.ProductOrderlijn = Order.GeefOrderLijnViaVolgnummer(101)
+	#dim Order As vhTest.Mock.DOM.VKP.Order = ..GeefStandaardOrder(PartijMetKlantBarcode)
+	#dim ProductOrderLijn As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ..GeefStandaardProductOrderLijn(Order, "0000105973917 / 201811966 / Eggo Roeselare")
 	
-	Do ProductOrderLijn.ZetPakketReferentie("UT PakketRef")
-	Do ProductOrderLijn.ZetProjectReferentie("0000105973917 / 201811966 / Eggo Roeselare")
+	#dim EtiketBuilder As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ..GeefLadeKlantEtiketBuilder(PartijMetKlantBarcode, ..#ProductId, $$$True, $$$False, 1000)
+	#dim Etiket As BL.Etiket.LadeKlantEtiket = EtiketBuilder.MaakBasisMaatwerkProductEtiket(..#ProductId, PartijMetKlantBarcode, 1)
+	Do EtiketBuilder.VulInOrderInfo(Etiket, Order, PartijMetKlantBarcode, ProductOrderLijn, "")
 	
-	#dim Etiket As BL.Etiket.LadeKlantEtiket = ..EtiketBuilder.MaakBasisMaatwerkProductEtiket(..Data.ProductID, PartijMetKlantBarcode, 1)
-	Do ..EtiketBuilder.VulInOrderInfo(Etiket, Order, PartijMetKlantBarcode, ProductOrderLijn, "")
-	
 	Do $$$AssertEquals(Etiket.KlantBarcode, "0000105973917")
 	Do $$$AssertEquals(Etiket.Layout, "MaatwerkProductBAR 8x11")
-	Do $$$AssertEquals(Etiket.ProductImg, "GENERIEK\TBX\tbx_DY2_BD_x2.JPG")
+	Do $$$AssertEquals(Etiket.ProductImg, "UT ProductImageURL")
 	
-	Do ..Data.VerwijderDataOrder(Order.GeefID())
+	Do ..VerifieerMocks()
 ]]></Implementation>
 </Method>