Index: BL/Flow/Levering/LabelLogoBepaler.cls.xml
===================================================================
diff -u -r71662 -r74485
--- BL/Flow/Levering/LabelLogoBepaler.cls.xml (.../LabelLogoBepaler.cls.xml) (revision 71662)
+++ BL/Flow/Levering/LabelLogoBepaler.cls.xml (.../LabelLogoBepaler.cls.xml) (revision 74485)
@@ -23,9 +23,9 @@
} Else {
#dim TweedePersonality As %String = $Piece($List(OorsprongKettingLijst, 2),",", 1)
- If (TweedePersonality = ##class(DOM.common.enu.Personality).BlumPL()) {
+ If ..IsEenBlumPersonality(TweedePersonality) {
#dim DistributeurId = $Piece($List(OorsprongKettingLijst, 1),",", 1)
- #dim LogoRef As %String = "_BPL_" _ DistributeurId
+ #dim LogoRef As %String = ..GeefLogoReferentieInfix(TweedePersonality) _ DistributeurId
Do ..ZetLogoMetReferentie(LogoRef)
} Else {
Do ..ZetLogoMetReferentie(KlantNummer)
@@ -58,6 +58,22 @@
Quit ##class(TECH.ListUtils).PiecesToListbuild(OorsprongKettingString, "), (")
]]>
+
+
+PersonalityId:%String
+
+
+
+
+PersonalityId:%String
+
+