Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLMeblolux.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLMeblolux.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLMeblolux.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>323.99</AankoopPrijs>
+  <VerkoopPrijs>324</VerkoopPrijs>
+  <LijstPrijs>324</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLWiP.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLWiP.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLWiP.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>323.99</AankoopPrijs>
+  <VerkoopPrijs>324</VerkoopPrijs>
+  <LijstPrijs>324</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: vhUnitTest/APPS/CRM/impl/KlantIDValidator/Test.cls.xml
===================================================================
diff -u -r72516 -r72598
--- vhUnitTest/APPS/CRM/impl/KlantIDValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 72516)
+++ vhUnitTest/APPS/CRM/impl/KlantIDValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 72598)
@@ -33,8 +33,10 @@
 		If ($$$Not(Personality.%Extends(##class(DOM.common.DemoPersonality).%ClassName($$$True)))) {
 			continue:(Personality.GeefID() = ..Enum.Personality.VanHoeckeVoorHalux)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLAbler)
+			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLBiuroStyl)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLCMeube)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLDemo)
+			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLDrewno)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLDrewTrans)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLMeble)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLMebloa)
@@ -43,6 +45,7 @@
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLPakdrew)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLSAS)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLSchach)
+			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLWior)
 			continue:(Personality.GeefID() = ..Enum.Personality.BlumPLWiP)
 		
 		do ..AssertIsGeldigKlantId(Personality)
Index: vhUnitTest/APPS/EC/Transport/impl/Factory/GeefTransportFirmaBepaler/Test.cls.xml
===================================================================
diff -u -r72516 -r72598
--- vhUnitTest/APPS/EC/Transport/impl/Factory/GeefTransportFirmaBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 72516)
+++ vhUnitTest/APPS/EC/Transport/impl/Factory/GeefTransportFirmaBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 72598)
@@ -88,8 +88,10 @@
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).Dozon())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPL())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLAbler())
+	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLBiuroStyl())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLCMeube())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLDemo())
+	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLDrewno())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLDrewTrans())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLMeble())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLMebloa())
@@ -98,6 +100,7 @@
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLPakdrew())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLSAS())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLSchach())
+	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLWior())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).BlumPLWiP())
 	Do VerwachteBepalers.SetAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.common.enu.Personality).Meurer())
 
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_Meurer.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_Meurer.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_Meurer.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>58.93</AankoopPrijs>
+  <VerkoopPrijs>84.18</VerkoopPrijs>
+  <LijstPrijs>84.18</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: DOM/common/enu/Personality.cls.xml
===================================================================
diff -u -r72516 -r72598
--- DOM/common/enu/Personality.cls.xml	(.../Personality.cls.xml)	(revision 72516)
+++ DOM/common/enu/Personality.cls.xml	(.../Personality.cls.xml)	(revision 72598)
@@ -445,6 +445,34 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HaefeleSP">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit 62
+]]></Implementation>
+</Method>
+
+<Method name="BlumPLWior">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit 63
+]]></Implementation>
+</Method>
+
+<Method name="BlumPLDrewno">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit 64
+]]></Implementation>
+</Method>
+
+<Method name="BlumPLBiuroStyl">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit 65
+]]></Implementation>
+</Method>
+
 <Method name="RandomValue">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>ValueToBeIgnored...:TECH.String</FormalSpec>
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_Meurer.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_Meurer.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_Meurer.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>113.4</AankoopPrijs>
+  <VerkoopPrijs>162</VerkoopPrijs>
+  <LijstPrijs>162.00</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: DOM/common/BlumPLBiuroStylPersonality.cls.xml
===================================================================
diff -u
--- DOM/common/BlumPLBiuroStylPersonality.cls.xml	(revision 0)
+++ DOM/common/BlumPLBiuroStylPersonality.cls.xml	(revision 72598)
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.common.BlumPLBiuroStylPersonality">
+<Super>DOM.common.impl.HandelPersonality</Super>
+
+<Method name="Instance">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.impl.Personality</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(##class(DOM.common.enu.Personality).BlumPLBiuroStyl())
+]]></Implementation>
+</Method>
+
+<Method name="GeefTaal">
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	quit ##class(DOM.enu.Taal).Pools()
+]]></Implementation>
+</Method>
+
+<Method name="Accept">
+<FormalSpec>Visitor:DOM.common.PersonalityVisitor</FormalSpec>
+<Implementation><![CDATA[	do Visitor.VerwerkBlumPL($this)
+]]></Implementation>
+</Method>
+
+<Method name="GeefLeverancierData">
+<ReturnType>DOM.common.LeverancierPersonalityData</ReturnType>
+<Implementation><![CDATA[	quit ##class(DOM.common.LeverancierPersonalityData).%New(##class(DOM.common.enu.Personality).VanHoecke(),##class(DOM.VKP.enu.Klant).BlumPolen())
+]]></Implementation>
+</Method>
+
+<Method name="IsHandel">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit 1
+]]></Implementation>
+</Method>
+
+<Method name="GeefNaam">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "Blum Poland"
+]]></Implementation>
+</Method>
+
+<Method name="GeefPrefix">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "BPLD_"
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLAbler.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLAbler.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLAbler.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>170.77</AankoopPrijs>
+  <VerkoopPrijs>168.36</VerkoopPrijs>
+  <LijstPrijs>168.36</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: vhDeploy/Deploy20240216xAanmakenNieuweDistributeursBlumPolen.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20240216xAanmakenNieuweDistributeursBlumPolen.cls.xml	(revision 0)
+++ vhDeploy/Deploy20240216xAanmakenNieuweDistributeursBlumPolen.cls.xml	(revision 72598)
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20240216xAanmakenNieuweDistributeursBlumPolen">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Aanmaken van personality Blum Polen Wior, Drewno en BiuroStyl</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..MaakBlumPLPersonality(63, ##class(DOM.common.BlumPLWiorPersonality).%ClassName($$$True))
+	Do ..MaakBlumPLPersonality(64, ##class(DOM.common.BlumPLDrewnoPersonality).%ClassName($$$True))
+	Do ..MaakBlumPLPersonality(65, ##class(DOM.common.BlumPLBiuroStylPersonality).%ClassName($$$True))
+]]></Implementation>
+</Method>
+
+<Method name="MaakBlumPLPersonality">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>PersonalityId:%Integer,PersonalityClassname:%String</FormalSpec>
+<Implementation><![CDATA[	Do ##class(DOM.common.impl.PersonalityCreator).%New().StelInNieuwePersonality(PersonalityId, PersonalityClassname, ##class(DOM.VKP.enu.Klant).BlumPolen())
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLAbler.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLAbler.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestTAXMPprijzen/TAX_BlumPLAbler.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>323.99</AankoopPrijs>
+  <VerkoopPrijs>324</VerkoopPrijs>
+  <LijstPrijs>324</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: vhUnitTest/APPS/EC/Transport/impl/Factory/GeefVerkoopprijsBerekenaar/Test.cls.xml
===================================================================
diff -u -r72516 -r72598
--- vhUnitTest/APPS/EC/Transport/impl/Factory/GeefVerkoopprijsBerekenaar/Test.cls.xml	(.../Test.cls.xml)	(revision 72516)
+++ vhUnitTest/APPS/EC/Transport/impl/Factory/GeefVerkoopprijsBerekenaar/Test.cls.xml	(.../Test.cls.xml)	(revision 72598)
@@ -89,8 +89,10 @@
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).Dozon())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPL())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLAbler())
+	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLBiuroStyl())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLCMeube())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLDemo())
+	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLDrewno())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLDrewTrans())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLMeble())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLMebloa())
@@ -99,6 +101,7 @@
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLPakdrew())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLSAS())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLSchach())
+	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLWior())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).BlumPLWiP())
 	Do VerwachteBepalers.SetAt(..VanHoeckeVerkoopprijsBerekenaarClassName,##class(DOM.common.enu.Personality).Meurer())
 
Index: DOM/common/BlumPLWiorPersonality.cls.xml
===================================================================
diff -u
--- DOM/common/BlumPLWiorPersonality.cls.xml	(revision 0)
+++ DOM/common/BlumPLWiorPersonality.cls.xml	(revision 72598)
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.common.BlumPLWiorPersonality">
+<Super>DOM.common.impl.HandelPersonality</Super>
+
+<Method name="Instance">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.impl.Personality</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(##class(DOM.common.enu.Personality).BlumPLWior())
+]]></Implementation>
+</Method>
+
+<Method name="GeefTaal">
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	quit ##class(DOM.enu.Taal).Pools()
+]]></Implementation>
+</Method>
+
+<Method name="Accept">
+<FormalSpec>Visitor:DOM.common.PersonalityVisitor</FormalSpec>
+<Implementation><![CDATA[	do Visitor.VerwerkBlumPL($this)
+]]></Implementation>
+</Method>
+
+<Method name="GeefLeverancierData">
+<ReturnType>DOM.common.LeverancierPersonalityData</ReturnType>
+<Implementation><![CDATA[	quit ##class(DOM.common.LeverancierPersonalityData).%New(##class(DOM.common.enu.Personality).VanHoecke(),##class(DOM.VKP.enu.Klant).BlumPolen())
+]]></Implementation>
+</Method>
+
+<Method name="IsHandel">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit 1
+]]></Implementation>
+</Method>
+
+<Method name="GeefNaam">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "Blum Poland"
+]]></Implementation>
+</Method>
+
+<Method name="GeefPrefix">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "BPLD_"
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: DOM/common/enu/Personality/AutoComplete.cls.xml
===================================================================
diff -u -r72516 -r72598
--- DOM/common/enu/Personality/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 72516)
+++ DOM/common/enu/Personality/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 72598)
@@ -44,6 +44,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="BlumPLBiuroStyl">
+<Type>%String</Type>
+<InitialExpression>"65"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="BlumPLCMeube">
 <Type>%String</Type>
 <InitialExpression>"50"</InitialExpression>
@@ -65,6 +72,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="BlumPLDrewno">
+<Type>%String</Type>
+<InitialExpression>"64"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="BlumPLMeble">
 <Type>%String</Type>
 <InitialExpression>"56"</InitialExpression>
@@ -121,6 +135,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="BlumPLWior">
+<Type>%String</Type>
+<InitialExpression>"63"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="CampeTonny">
 <Type>%String</Type>
 <InitialExpression>"22"</InitialExpression>
@@ -282,6 +303,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="HaefeleSP">
+<Type>%String</Type>
+<InitialExpression>"62"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="HahleOy">
 <Type>%String</Type>
 <InitialExpression>"36"</InitialExpression>
Index: DOM/common/BlumPLDrewnoPersonality.cls.xml
===================================================================
diff -u
--- DOM/common/BlumPLDrewnoPersonality.cls.xml	(revision 0)
+++ DOM/common/BlumPLDrewnoPersonality.cls.xml	(revision 72598)
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.common.BlumPLDrewnoPersonality">
+<Super>DOM.common.impl.HandelPersonality</Super>
+
+<Method name="Instance">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.common.impl.Personality</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(##class(DOM.common.enu.Personality).BlumPLDrewno())
+]]></Implementation>
+</Method>
+
+<Method name="GeefTaal">
+<ReturnType>DOM.enu.Taal</ReturnType>
+<Implementation><![CDATA[	quit ##class(DOM.enu.Taal).Pools()
+]]></Implementation>
+</Method>
+
+<Method name="Accept">
+<FormalSpec>Visitor:DOM.common.PersonalityVisitor</FormalSpec>
+<Implementation><![CDATA[	do Visitor.VerwerkBlumPL($this)
+]]></Implementation>
+</Method>
+
+<Method name="GeefLeverancierData">
+<ReturnType>DOM.common.LeverancierPersonalityData</ReturnType>
+<Implementation><![CDATA[	quit ##class(DOM.common.LeverancierPersonalityData).%New(##class(DOM.common.enu.Personality).VanHoecke(),##class(DOM.VKP.enu.Klant).BlumPolen())
+]]></Implementation>
+</Method>
+
+<Method name="IsHandel">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit 1
+]]></Implementation>
+</Method>
+
+<Method name="GeefNaam">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "Blum Poland"
+]]></Implementation>
+</Method>
+
+<Method name="GeefPrefix">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "BPLD_"
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLWiP.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLWiP.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLWiP.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>170.77</AankoopPrijs>
+  <VerkoopPrijs>168.36</VerkoopPrijs>
+  <LijstPrijs>168.36</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml
===================================================================
diff -u -r72516 -r72598
--- vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml	(.../Test.cls.xml)	(revision 72516)
+++ vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml	(.../Test.cls.xml)	(revision 72598)
@@ -34,7 +34,7 @@
 
 	while PersonalityIterator.HasNext() {
 		#dim PersonalityId as %String = PersonalityIterator.Next()
-		if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleAT,..Personality.HaefeleIT,..Personality.HaefeleFR,..Personality.HaefeleDK,..Personality.HaefeleCH, ..Personality.HaefeleNO, ..Personality.Martens, ..Personality.Dozon, ..Personality.BlumPL, ..Personality.DeceuninckDeforce, ..Personality.BlumPLCMeube, ..Personality.BlumPLDemo, ..Personality.BlumPLMeble, ..Personality.BlumPLMebloa, ..Personality.BlumPLMerkur, ..Personality.BlumPLPakdrew, ..Personality.BlumPLSAS, ..Personality.BlumPLSchach, ..Personality.BlumPLMeblolux, ..Personality.BlumPLAbler, ..Personality.BlumPLWiP, ..Personality.BlumPLDrewTrans, ..Personality.Meurer){
+		if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleAT,..Personality.HaefeleIT,..Personality.HaefeleFR,..Personality.HaefeleDK,..Personality.HaefeleCH, ..Personality.HaefeleNO, ..Personality.Martens, ..Personality.Dozon, ..Personality.BlumPL, ..Personality.DeceuninckDeforce, ..Personality.BlumPLCMeube, ..Personality.BlumPLDemo, ..Personality.BlumPLMeble, ..Personality.BlumPLMebloa, ..Personality.BlumPLMerkur, ..Personality.BlumPLPakdrew, ..Personality.BlumPLSAS, ..Personality.BlumPLSchach, ..Personality.BlumPLMeblolux, ..Personality.BlumPLAbler, ..Personality.BlumPLWiP, ..Personality.BlumPLDrewTrans, ..Personality.Meurer, ..Personality.BlumPLWior, ..Personality.BlumPLDrewno, ..Personality.BlumPLBiuroStyl){
 			Do $$$AssertTrue(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout")
 		} ElseIf ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.VanHoecke,..Personality.VanHoeckeVoorHalux,..Personality.SFS,..Personality.OPO,..Personality.Kisch,..Personality.Destil,..Personality.HaefeleBE,..Personality.VanRaemdonck,..Personality.Noteborn,..Personality.Daro,..Personality.BeslagDesign,..Personality.Demo,..Personality.Galimberti,..Personality.Pavanello,..Personality.Ferexpert,..Personality.Beslagteknikk,..Personality.YachtSupplier,..Personality.DeceuninckDeforce,..Personality.Pierard,..Personality.HahleOy,..Personality.BiemarBois,..Personality.CampeTonny, ..Personality.Dupont) {
 			Do $$$AssertFalse(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout")
@@ -61,7 +61,7 @@
 
 	while PersonalityIterator.HasNext() {
 		#dim PersonalityId as %String = PersonalityIterator.Next()
-		if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer, ..Personality.Dupont,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleBE,..Personality.VanRaemdonck,..Personality.Pavanello,..Personality.Ferexpert,,..Personality.HaefeleAT,..Personality.HaefeleIT,..Personality.HaefeleDK,..Personality.HaefeleFR,..Personality.HaefeleCH, ..Personality.HaefeleNO, ..Personality.Martens, ..Personality.Dozon, ..Personality.BlumPL, ..Personality.DeceuninckDeforce, ..Personality.BlumPLCMeube, ..Personality.BlumPLDemo, ..Personality.BlumPLMeble, ..Personality.BlumPLMebloa, ..Personality.BlumPLMerkur, ..Personality.BlumPLPakdrew, ..Personality.BlumPLSAS, ..Personality.BlumPLSchach, ..Personality.BlumPLMeblolux, ..Personality.BlumPLAbler, ..Personality.BlumPLWiP, ..Personality.BlumPLDrewTrans, ..Personality.Meurer){
+		if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer, ..Personality.Dupont,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleBE,..Personality.VanRaemdonck,..Personality.Pavanello,..Personality.Ferexpert,,..Personality.HaefeleAT,..Personality.HaefeleIT,..Personality.HaefeleDK,..Personality.HaefeleFR,..Personality.HaefeleCH, ..Personality.HaefeleNO, ..Personality.Martens, ..Personality.Dozon, ..Personality.BlumPL, ..Personality.DeceuninckDeforce, ..Personality.BlumPLCMeube, ..Personality.BlumPLDemo, ..Personality.BlumPLMeble, ..Personality.BlumPLMebloa, ..Personality.BlumPLMerkur, ..Personality.BlumPLPakdrew, ..Personality.BlumPLSAS, ..Personality.BlumPLSchach, ..Personality.BlumPLMeblolux, ..Personality.BlumPLAbler, ..Personality.BlumPLWiP, ..Personality.BlumPLDrewTrans, ..Personality.Meurer, ..Personality.BlumPLWior, ..Personality.BlumPLDrewno, ..Personality.BlumPLBiuroStyl){
 			Do $$$AssertTrue(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout")
 		} ElseIf ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.VanHoecke,..Personality.VanHoeckeVoorHalux,..Personality.SFS,..Personality.OPO,..Personality.Kisch,..Personality.Destil,..Personality.Noteborn,..Personality.Daro,..Personality.BeslagDesign,..Personality.Demo,..Personality.Galimberti,..Personality.Beslagteknikk,..Personality.YachtSupplier,..Personality.DeceuninckDeforce,..Personality.Pierard,..Personality.HahleOy,..Personality.BiemarBois,..Personality.CampeTonny) {
 			Do $$$AssertFalse(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout")
Index: DOM/common/impl/PersonalityService.cls.xml
===================================================================
diff -u -r72516 -r72598
--- DOM/common/impl/PersonalityService.cls.xml	(.../PersonalityService.cls.xml)	(revision 72516)
+++ DOM/common/impl/PersonalityService.cls.xml	(.../PersonalityService.cls.xml)	(revision 72598)
@@ -129,8 +129,10 @@
 	Quit:(PersonalityID = Personality.Dozon) $$$True
 	Quit:(PersonalityID = Personality.BlumPL) $$$True
 	Quit:(PersonalityID = Personality.BlumPLAbler) $$$True
+	Quit:(PersonalityID = Personality.BlumPLBiuroStyl) $$$True
 	Quit:(PersonalityID = Personality.BlumPLCMeube) $$$True
 	Quit:(PersonalityID = Personality.BlumPLDemo) $$$True
+	Quit:(PersonalityID = Personality.BlumPLDrewno) $$$True
 	Quit:(PersonalityID = Personality.BlumPLDrewTrans) $$$True
 	Quit:(PersonalityID = Personality.BlumPLMeble) $$$True
 	Quit:(PersonalityID = Personality.BlumPLMebloa) $$$True
@@ -139,6 +141,7 @@
 	Quit:(PersonalityID = Personality.BlumPLPakdrew) $$$True
 	Quit:(PersonalityID = Personality.BlumPLSAS) $$$True
 	Quit:(PersonalityID = Personality.BlumPLSchach) $$$True
+	Quit:(PersonalityID = Personality.BlumPLWior) $$$True
 	Quit:(PersonalityID = Personality.BlumPLWiP) $$$True
 	Quit:(PersonalityID = Personality.DeceuninckDeforce) $$$True
 	Quit:(PersonalityID = Personality.Meurer) $$$True
Index: vhUnitTest/DOM/VKP/impl/KlantDataFactory/Test.cls.xml
===================================================================
diff -u -r72516 -r72598
--- vhUnitTest/DOM/VKP/impl/KlantDataFactory/Test.cls.xml	(.../Test.cls.xml)	(revision 72516)
+++ vhUnitTest/DOM/VKP/impl/KlantDataFactory/Test.cls.xml	(.../Test.cls.xml)	(revision 72598)
@@ -80,8 +80,10 @@
 	
 	// alle distributeurs van Blum Polen hebben dezelfde prefix: _BPLD
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLAbler())
+	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLBiuroStyl())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLCMeube())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLDemo())
+	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLDrewno())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLDrewTrans())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLMeble())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLMebloa())
@@ -90,6 +92,7 @@
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLPakdrew())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLSAS())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLSchach())
+	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLWior())
 	Do Uitzonderingen.Insert(##class(DOM.common.enu.Personality).BlumPLWiP())
 	
 	Quit Uitzonderingen
Index: DOM/common/enu/Personality/Verwerker.cls.xml
===================================================================
diff -u -r72516 -r72598
--- DOM/common/enu/Personality/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 72516)
+++ DOM/common/enu/Personality/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 72598)
@@ -22,12 +22,16 @@
 		Do ..VerwerkBlumPL()
 	} ElseIf Personality = "58" {
 		Do ..VerwerkBlumPLAbler()
+	} ElseIf Personality = "65" {
+		Do ..VerwerkBlumPLBiuroStyl()
 	} ElseIf Personality = "50" {
 		Do ..VerwerkBlumPLCMeube()
 	} ElseIf Personality = "52" {
 		Do ..VerwerkBlumPLDemo()
 	} ElseIf Personality = "61" {
 		Do ..VerwerkBlumPLDrewTrans()
+	} ElseIf Personality = "64" {
+		Do ..VerwerkBlumPLDrewno()
 	} ElseIf Personality = "56" {
 		Do ..VerwerkBlumPLMeble()
 	} ElseIf Personality = "55" {
@@ -44,6 +48,8 @@
 		Do ..VerwerkBlumPLSchach()
 	} ElseIf Personality = "59" {
 		Do ..VerwerkBlumPLWiP()
+	} ElseIf Personality = "63" {
+		Do ..VerwerkBlumPLWior()
 	} ElseIf Personality = "22" {
 		Do ..VerwerkCampeTonny()
 	} ElseIf Personality = "28" {
@@ -90,6 +96,8 @@
 		Do ..VerwerkHaefeleNO()
 	} ElseIf Personality = "37" {
 		Do ..VerwerkHaefeleSE()
+	} ElseIf Personality = "62" {
+		Do ..VerwerkHaefeleSP()
 	} ElseIf Personality = "36" {
 		Do ..VerwerkHahleOy()
 	} ElseIf Personality = "11" {
@@ -167,6 +175,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkBlumPLBiuroStyl">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkBlumPLCMeube">
 <Abstract>1</Abstract>
 <Private>1</Private>
@@ -185,6 +199,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkBlumPLDrewno">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkBlumPLMeble">
 <Abstract>1</Abstract>
 <Private>1</Private>
@@ -233,6 +253,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkBlumPLWior">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkCampeTonny">
 <Abstract>1</Abstract>
 <Private>1</Private>
@@ -371,6 +397,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkHaefeleSP">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkHahleOy">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: vhDeploy/Deploy20240216xLogosNieuweDistributeursBlumPolen.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20240216xLogosNieuweDistributeursBlumPolen.cls.xml	(revision 0)
+++ vhDeploy/Deploy20240216xLogosNieuweDistributeursBlumPolen.cls.xml	(revision 72598)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20240216xLogosNieuweDistributeursBlumPolen">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Nieuwe mapping voor logos van Meurer en BlumPLDrewTrans, voor alle etiketten en leverbon.</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set ^IPCom("CS","LOGO_BPL_63",0) = "Logo BlumPL Wior.jpg"
+	Set ^IPCom("CS","LOGO_BPL_64",0) = "Logo BlumPL Drewno.jpg"
+	Set ^IPCom("CS","LOGO_BPL_65",0) = "Logo BlumPL BiuroStyl.jpg"
+	
+	Set ^IPCom("CS","LOGO_BPL_63",0,"LogoOpAlleBeslagEtiketten")=1
+	Set ^IPCom("CS","LOGO_BPL_64",0,"LogoOpAlleBeslagEtiketten")=1
+	Set ^IPCom("CS","LOGO_BPL_65",0,"LogoOpAlleBeslagEtiketten")=1
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLMeblolux.txt
===================================================================
diff -u
--- vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLMeblolux.txt	(revision 0)
+++ vhTestFiles/UnitTests/APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler/MPTest/TestLBXMPprijzen/LBX_BlumPLMeblolux.txt	(revision 72598)
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PrijsBerekeningPrijzen>
+  <AankoopPrijs>170.77</AankoopPrijs>
+  <VerkoopPrijs>168.36</VerkoopPrijs>
+  <LijstPrijs>168.36</LijstPrijs>
+</PrijsBerekeningPrijzen>
\ No newline at end of file
Index: vhUnitTest/APPS/EC/Transport/impl/Factory/GeefLandenBepaler/Test.cls.xml
===================================================================
diff -u -r72516 -r72598
--- vhUnitTest/APPS/EC/Transport/impl/Factory/GeefLandenBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 72516)
+++ vhUnitTest/APPS/EC/Transport/impl/Factory/GeefLandenBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 72598)
@@ -86,8 +86,10 @@
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).Dozon())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPL())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLAbler())
+	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLBiuroStyl())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLCMeube())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLDemo())
+	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLDrewno())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLDrewTrans())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLMeble())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLMebloa())
@@ -96,6 +98,7 @@
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLPakdrew())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLSAS())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLSchach())
+	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLWior())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).BlumPLWiP())
 	Do VerwachteBepalers.SetAt(..VanHoeckeLandenBepalerClassName,##class(DOM.common.enu.Personality).Meurer())