Index: BL/Flow/Levering/LabelLogoBepaler.cls.xml
===================================================================
diff -u -r62280 -r62306
--- BL/Flow/Levering/LabelLogoBepaler.cls.xml	(.../LabelLogoBepaler.cls.xml)	(revision 62280)
+++ BL/Flow/Levering/LabelLogoBepaler.cls.xml	(.../LabelLogoBepaler.cls.xml)	(revision 62306)
@@ -18,7 +18,7 @@
 <Method name="WilLogoOpAlleEtiketten">
 <FormalSpec>KlantNummer:%Integer</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit $D(^IPCom("CS","LOGO"_KlantNummer,0,"AlleEtiketten"))
+<Implementation><![CDATA[	Quit $D(^IPCom("CS","LOGO"_KlantNummer,0,"LogoOpAlleBeslagEtiketten"))
 ]]></Implementation>
 </Method>
 </Class>
Index: BL/Flow/Levering/Label.cls.xml
===================================================================
diff -u -r62282 -r62306
--- BL/Flow/Levering/Label.cls.xml	(.../Label.cls.xml)	(revision 62282)
+++ BL/Flow/Levering/Label.cls.xml	(.../Label.cls.xml)	(revision 62306)
@@ -207,6 +207,7 @@
 <FormalSpec>Printer:%String="0",AantalStuks:%Numeric,AantalLabels:%Numeric=1</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	#dim KLNr As %String
     If ..BONNr="" Quit $$$ERROR($$$GeneralError,"BONNr is leeg")
     If ..PRNr="" Quit $$$ERROR($$$GeneralError,"PRNr is leeg")
     If Printer="" Quit $$$ERROR($$$GeneralError,"Printer is niet ingevuld")
@@ -235,7 +236,7 @@
 		Set ..pxLabelKlant.Logo = StandaardLogo
 	}
 	Else {
-		Set ..pxLabelKlant.Logo = ..LabelLogoBepaler.GeefLogo()
+		Set ..pxLabelKlant.Logo = ..LabelLogoBepaler.GeefLogo(KLNr)
 	}
 	
 	Set ..pxLabelProduct.Korttekst=$Piece(xPR0,"\")