Index: vhUnitTest/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder/Test.cls.xml
===================================================================
diff -u -r39166 -r54180
--- vhUnitTest/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder/Test.cls.xml	(.../Test.cls.xml)	(revision 39166)
+++ vhUnitTest/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder/Test.cls.xml	(.../Test.cls.xml)	(revision 54180)
@@ -188,6 +188,26 @@
 ]]></Implementation>
 </Method>
 
+<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)
+	
+	Do ProductOrderLijn.ZetPakketReferentie("UT PakketRef")
+	Do ProductOrderLijn.ZetProjectReferentie("0000105973917 / 201811966 / Eggo Roeselare")
+	
+	#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 ..Data.VerwijderDataOrder(Order.GeefID())
+]]></Implementation>
+</Method>
+
 <Method name="TestToonKlantNummerIpvKlantNaam">
 <Implementation><![CDATA[
 	#dim PartijMetToonKlantNummer As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(##class(DOM.VKP.enu.Klant).GroupNivelles())
Index: vhTest/Fake/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml
===================================================================
diff -u -r51323 -r54180
--- vhTest/Fake/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml	(.../LadeKlantEtiketBuilder.cls.xml)	(revision 51323)
+++ vhTest/Fake/APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml	(.../LadeKlantEtiketBuilder.cls.xml)	(revision 54180)
@@ -30,14 +30,12 @@
 
 <Method name="VoegToeInfoItems">
 <FormalSpec>Etiket:BL.Etiket.LadeKlantEtiket,Partij:DOM.PARTIJ.Partij,InfoItems:%ListOfObjects</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VulAanProjectReferentieMetLadeNaamIndienSpaceTower">
 <FormalSpec><![CDATA[ProductOrderLijn:DOM.VKP.ProductOrderlijn,ToeleveringLijn:DOM.AKP.ProductToeleveringLijn,&ProjectRefInfoItem:APPS.Halux.Docs.impl.InfoItem]]></FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VulInOrderInfo">
Index: APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml
===================================================================
diff -u -r51323 -r54180
--- APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml	(.../LadeKlantEtiketBuilder.cls.xml)	(revision 51323)
+++ APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml	(.../LadeKlantEtiketBuilder.cls.xml)	(revision 54180)
@@ -136,11 +136,11 @@
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(Partij.GeefID())
 	
 	Set Etiket.KlantBarcode = ..GeefKlantBarcode(Partij,ProductOrderLijn)
-	If Etiket.KlantBarcode '= "" {
+	If $$$HasLength(Etiket.KlantBarcode) {
 		Set Etiket.Layout = $$$If((Partij.GeefID()=##class(DOM.VKP.enu.Klant).Labonorm()),"MaatwerkProduct 5x10","MaatwerkProductBAR 8x11")
 	}
 	
-	If ProductOrderLijn.GeefToeleveringID() '= "" {
+	If $$$HasLength(ProductOrderLijn.GeefToeleveringID()) {
 		Set Etiket.LblToelevering = ..GeefVertalingLabel("DOSSIER",Partij.GeefTaal(),"Dossier")
 		Set Etiket.ToeleveringID = ProductOrderLijn.GeefToeleveringID()
 	}
@@ -194,6 +194,9 @@
 	   (Partij.GeefID() = ##class(DOM.VKP.enu.Klant).Labonorm()) {
 		Set KlantBarcode = ProjectReferentie
 	}
+	If (Partij.GeefID() = ##class(DOM.VKP.enu.Klant).Noteborn()) {
+		Set KlantBarcode = $Extract(ProjectReferentie,1,13)
+	}
 	Quit KlantBarcode
 ]]></Implementation>
 </Method>