Index: BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml
===================================================================
diff -u -r57691 -r75106
--- BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml	(.../LeverbonHoofdingBepaler.cls.xml)	(revision 57691)
+++ BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml	(.../LeverbonHoofdingBepaler.cls.xml)	(revision 75106)
@@ -13,30 +13,232 @@
 <Private>1</Private>
 </Property>
 
+<Property name="KlantInstellingenService">
+<Type>APPS.common.KlantInstellingenService</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="OorsprongKetting">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
+<FormalSpec>KlantInstellingenService:APPS.common.KlantInstellingenService,OorsprongKetting:%String=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
-<Implementation><![CDATA[	Quit $$$OK
+<Implementation><![CDATA[
+	Set ..KlantInstellingenService = $$$Inject(KlantInstellingenService, ##class(APPS.common.impl.KlantInstellingenService).%New())
+	Set ..OorsprongKetting = OorsprongKetting
+	
+	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="BepaalLeverbonHoofding">
-<FormalSpec>Personality:DOM.common.Personality</FormalSpec>
+<FormalSpec>Personality:DOM.common.Personality,KLNr:%Integer</FormalSpec>
 <ReturnType>BL.Flow.Proxy.dto.AfzenderHoofdingDto</ReturnType>
 <Implementation><![CDATA[
 	Set HoofdingDto = ##class(BL.Flow.Proxy.dto.AfzenderHoofdingDto).%New()
 	Set ..LeverbonHoofding = ##class(BL.FOP.Derde.pxAfzenderHoofding).%New()
-	Do Personality.Accept($This)
-	If $IsObject(..LeverbonHoofding) {
-		Set HoofdingDto.AfzenderHoofding = ..LeverbonHoofding
+	
+	If ..IsVanHoeckePersonality(Personality) {
+		Do ..VerwerkKlantVanVanHoecke(KLNr)
+	} Else {
+		Do Personality.Accept($This)
 	}
+	
+	Set HoofdingDto.AfzenderHoofding = ..LeverbonHoofding
 	Set HoofdingDto.HeaderType = ..HeaderType
+	
 	Quit HoofdingDto
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkKlantVanVanHoecke">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (..KlantInstellingenService.HeeftEigenLeverbonHoofding(KLNr)) {
+		Do ..VerwerkKlant(KLNr)
+	} Else {
+		Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).VanHoecke()
+		Set ..LeverbonHoofding = ""
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkKlant">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If ..IsSFS(KLNr) {
+		Do ..VerwerkSFS(##class(DOM.common.enu.Personality).SFS()) // De LeverbonHoofding mag voor SFS als klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsDupont(KLNr) {
+		Do ..VerwerkDupont(##class(DOM.common.enu.Personality).Dupont()) // De LeverbonHoofding mag voor Dupont als klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleIT(KLNr) {
+		Do ..VerwerkHaefeleIT(##class(DOM.common.HaefeleITPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleBE(KLNr) {
+		Do ..VerwerkHaefeleBE(##class(DOM.common.HaefeleBEPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleFR(KLNr) {
+		Do ..VerwerkHaefeleFR(##class(DOM.common.HaefeleFRPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleDK(KLNr) {
+		Do ..VerwerkHaefeleDK(##class(DOM.common.HaefeleDKPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleNL(KLNr) {
+		Do ..VerwerkHaefeleNL(##class(DOM.common.HaefeleNLPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleDE(KLNr) {
+		Do ..VerwerkHaefeleDE(##class(DOM.common.HaefeleDEPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleAT(KLNr) {
+		Do ..VerwerkHaefeleAT(##class(DOM.common.HaefeleATPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleCH(KLNr) {
+		Do ..VerwerkHaefeleCH(##class(DOM.common.HaefeleCHPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleSE(KLNr) {
+		Do ..VerwerkHaefeleSE(##class(DOM.common.HaefeleCHPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleFI(KLNr) {
+		Do ..VerwerkHaefeleFI(##class(DOM.common.HaefeleCHPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsHaefeleNO(KLNr) {
+		Do ..VerwerkHaefeleNO(##class(DOM.common.HaefeleNOPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsBlumPolen(KLNr) {
+		Do ..VerwerkBlumPL(##class(DOM.common.BlumPLPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	} ElseIf ..IsBlumTsjechie(KLNr) {
+		Do ..VerwerkBlumCZ(##class(DOM.common.BlumCZPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality.
+	}
+	Else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.UnimplementedException).%New("Voor KLNr '"_KLNr_"' is er nog geen eigen LeverbonHoofding voorzien i.g.v. niet-multipersonality. "))
+	}
+]]></Implementation>
+</Method>
+
+<Method name="IsVanHoeckePersonality">
+<FormalSpec>Personality:DOM.common.Personality</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (Personality.GeefID() = ##class(DOM.common.enu.Personality).VanHoecke())
+]]></Implementation>
+</Method>
+
+<Method name="IsSFS">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 12486)
+]]></Implementation>
+</Method>
+
+<Method name="IsDupont">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 1736)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleIT">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 35412)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleFR">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 35698)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleDK">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 35697)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleBE">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 4875)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleNL">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 2671)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleDE">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 32672)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleAT">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 35415)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleCH">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 35864)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleSE">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 36412)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleFI">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 36413)
+]]></Implementation>
+</Method>
+
+<Method name="IsHaefeleNO">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 36605)
+]]></Implementation>
+</Method>
+
+<Method name="IsBlumPolen">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 37598)
+]]></Implementation>
+</Method>
+
+<Method name="IsBlumTsjechie">
+<FormalSpec>KLNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (KLNr = 39580)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkVanHoecke">
 <FormalSpec>VanHoeckePersonality:DOM.common.VanHoeckePersonality</FormalSpec>
 <Implementation><![CDATA[
@@ -50,6 +252,77 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkBiemarBois">
+<FormalSpec>BiemarBoisPersonality:DOM.common.BiemarBoisPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkCampeTonny">
+<FormalSpec>CampeTonnyPersonality:DOM.common.CampeTonnyPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).CampeTonny()
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+	
+	#dim URL As %String = ""
+
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).CampeTonny())
+	If Klant.HeeftEigenLogo(){
+		Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+		Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+		Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}
+	Set ..LeverbonHoofding.NAAM = 			"Tonny Campe NV"
+	Set ..LeverbonHoofding.STRAATNRBUS = 	"Vaart Rechteroever 260, Industriezone 8 (Bachte)"    
+	Set ..LeverbonHoofding.WOONPLAATS = 	"Deinze"
+	Set ..LeverbonHoofding.POSTCODE = 		"BE 9800"
+	Set ..LeverbonHoofding.TELEFOON = 		"Tel: +32(0)9 386 59 91"
+	Set ..LeverbonHoofding.FAX = 			"Fax: +32(0)9 386 39 19"
+	Set ..LeverbonHoofding.EMAIL = 			"info@campe-metaalwaren.be"
+	Set ..LeverbonHoofding.T1 = 			"BTW-nr.: BE 0456.262.363"
+	Set ..LeverbonHoofding.T2 = 			"RPR Gent"
+	Set ..LeverbonHoofding.T3 = 			"ING: IBAN BE23 3900 4596 2291"
+	Set ..LeverbonHoofding.T4 = 			"     BIC BBRUBEBB"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkRini">
+<FormalSpec>RiniPersonality:DOM.common.RiniPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkDSGroup">
+<FormalSpec>DSGroupPersonality:DOM.common.DSGroupPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkDeBisschop">
+<FormalSpec>DeBisschopPersonality:DOM.common.DeBisschopPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkDeceuninckDeforce">
+<FormalSpec>DeceuninckDeforcePersonality:DOM.common.DeceuninckDeforcePersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkPierard">
+<FormalSpec>PierardPersonality:DOM.common.PierardPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkFurnifit">
+<FormalSpec>FurnifitPersonality:DOM.common.FurnifitPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkMartens">
+<FormalSpec>MartensPersonality:DOM.common.MartensPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkMeurer">
+<FormalSpec>MeurerPersonality:DOM.common.MeurerPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkYachtSupplier">
+<FormalSpec>YachtSupplierPersonality:DOM.common.YachtSupplierPersonality</FormalSpec>
+</Method>
+
 <Method name="VerwerkDupont">
 <FormalSpec>DupontPersonality:DOM.common.DupontPersonality</FormalSpec>
 <Implementation><![CDATA[
@@ -60,18 +333,18 @@
     
 	#dim URL As %String = ""
 	
-	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(DupontPersonality.GeefKlantID())
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).DuPont())
 	If Klant.HeeftEigenLogo(){
-    	Set URL = "\\fop\Resources\Media\KlantLogos\Logo\"
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\Logo\"
 		#dim Bestand As %String = "Logo Du Pont 1736 levbon.jpg"
 		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
     	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
     	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
 	}	    
     Set ..LeverbonHoofding.NAAM = "DU PONT BVBA"
-    Set ..LeverbonHoofding.STRAATNRBUS = "Kleinheide 24G"    
-    Set ..LeverbonHoofding.WOONPLAATS = "Pulderbos"
-    Set ..LeverbonHoofding.POSTCODE = "BE 2242"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Bouwelven 16"    
+    Set ..LeverbonHoofding.WOONPLAATS = "Grobbendonk"
+    Set ..LeverbonHoofding.POSTCODE = "BE 2280"
 	Set ..LeverbonHoofding.TELEFOON = "Tel.: +32 3 464 00 91"	
 	Set ..LeverbonHoofding.FAX = "Fax.: +32 3 464 00 92"	
 	Set ..LeverbonHoofding.EMAIL = "info@du-pont.be"
@@ -84,7 +357,33 @@
 
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
-<Implementation><![CDATA[]]></Implementation>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleBE()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleBEPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele Begium NV"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Lindestraat 5"
+    Set ..LeverbonHoofding.WOONPLAATS = "Zele"
+    Set ..LeverbonHoofding.POSTCODE = "B - 9240"
+	Set ..LeverbonHoofding.TELEFOON = "052-45 01 14"
+	Set ..LeverbonHoofding.EMAIL = "Info@hafele.be"
+	Set ..LeverbonHoofding.T1 = "BTW: BE 0861.691.283"
+	Set ..LeverbonHoofding.T2 = "RPR: GENT, afdeling Dendermonde"
+	;Set ..LeverbonHoofding.T3 = "Rabobank: IBAN NL12RABO0393150151 BIC: RABONL2U"
+	;Set ..LeverbonHoofding.T4 = "Deutsche Bank: IBAN NL74DEUT0531622495 BIC: DEUTNL2N"
+]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleNL">
@@ -99,16 +398,16 @@
 	
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleNLPersonality.GeefKlantID())
 	If Klant.HeeftEigenLogo(){
-    	Set URL = "\\fop\Resources\Media\KlantLogos\"
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
 		#dim Bestand As %String = Klant.GeefLogo()
 		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
     	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
     	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
 	}	    
     Set ..LeverbonHoofding.NAAM = "Häfele Nederland BV"
-    Set ..LeverbonHoofding.STRAATNRBUS = "Nagelpoelweg 30"    
+    Set ..LeverbonHoofding.STRAATNRBUS = "Tweelingenlaan 46"    
     Set ..LeverbonHoofding.WOONPLAATS = "Apeldoorn"
-    Set ..LeverbonHoofding.POSTCODE = "7333 NZ"
+    Set ..LeverbonHoofding.POSTCODE = "7324 AN"
 	Set ..LeverbonHoofding.TELEFOON = "+31 (0)55 - 5384600"	
 	Set ..LeverbonHoofding.EMAIL = "Info@hafele.nl"
 	Set ..LeverbonHoofding.T1 = "BTW: NL008044211B01"
@@ -118,6 +417,264 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHaefeleDE">
+<FormalSpec>HaefeleDEPersonality:DOM.common.HaefeleDEPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleDE()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleDEPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele SE & Co KG"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Adolf-Häfele-Str. 1"    
+    Set ..LeverbonHoofding.WOONPLAATS = "Nagold"
+    Set ..LeverbonHoofding.POSTCODE = "72202"
+	Set ..LeverbonHoofding.TELEFOON = "+49 745 29 50"	
+	Set ..LeverbonHoofding.EMAIL = "Info@hafele.de"
+	Set ..LeverbonHoofding.T1 = "USt-ID: DE144425382"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleIT">
+<FormalSpec>HaefeleITPersonality:DOM.common.HaefeleITPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleIT()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleITPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "VAN HOECKE NV"
+    Set ..LeverbonHoofding.STRAATNRBUS = "EUROPARK-NOORD 9"    
+    Set ..LeverbonHoofding.WOONPLAATS = "SINT-NIKLAAS"
+    Set ..LeverbonHoofding.POSTCODE = "B-9100"
+    Set ..LeverbonHoofding.EMAIL = "VAT BE 0440.085.040"
+
+    Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ $$$CRLF _ "On behalf of:"
+    Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ "Häfele Italia S.R.L."
+    Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ "Via Della Valle 67 bis"    
+    Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ "Carate Brianza (MB)"
+    Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ "IT-20841"
+	Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ "+39 0362/577 41"	
+	Set ..LeverbonHoofding.EMAIL = ..LeverbonHoofding.EMAIL _ $$$CRLF _ "Info@hafele.it"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleAT">
+<FormalSpec>HaefeleATPersonality:DOM.common.HaefeleATPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleAT()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleATPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele Austria GmbH"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Römerstraße 4"    
+    Set ..LeverbonHoofding.WOONPLAATS = "Hof bei Salzburg"
+    Set ..LeverbonHoofding.POSTCODE = "AT-5322"
+	Set ..LeverbonHoofding.TELEFOON = "+43 6229 390 39-0"	
+	Set ..LeverbonHoofding.EMAIL = "Info@haefele.at"
+	Set ..LeverbonHoofding.T1 = "UID-Nr.: ATU 50113201"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleFR">
+<FormalSpec>HaefeleFRPersonality:DOM.common.HaefeleFRPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleFR()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleFRPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele France SARL"
+    Set ..LeverbonHoofding.STRAATNRBUS = "10 allée Benoist Dubost"
+    Set ..LeverbonHoofding.WOONPLAATS = "TAVERNY"
+    Set ..LeverbonHoofding.POSTCODE = "95157"
+	Set ..LeverbonHoofding.TELEFOON = "01 30 40 54 50"
+	Set ..LeverbonHoofding.EMAIL = "Info@haefele.fr"
+	Set ..LeverbonHoofding.T1 = "N° TVA : FR 45 331 692 772"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleDK">
+<FormalSpec>HaefeleDKPersonality:DOM.common.HaefeleDKPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleDK()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleDKPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele Danmark A/S"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Elskjærbakken 3"
+    Set ..LeverbonHoofding.WOONPLAATS = "Skive"
+    Set ..LeverbonHoofding.POSTCODE = "7800"
+	Set ..LeverbonHoofding.TELEFOON = "+45 97 51 15 22"	
+	Set ..LeverbonHoofding.EMAIL = "Info@haefele.dk"
+	Set ..LeverbonHoofding.T1 = "CVR-nr.: 21 28 79 03"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleCH">
+<FormalSpec>HaefeleCHPersonality:DOM.common.HaefeleCHPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleCH()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleCHPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele Schweiz AG"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Dammstrasse 29"
+    Set ..LeverbonHoofding.WOONPLAATS = "Kreuzlingen"
+    Set ..LeverbonHoofding.POSTCODE = "8280"
+	Set ..LeverbonHoofding.TELEFOON = "+41 (0)71/6868200"
+	Set ..LeverbonHoofding.EMAIL = "Info@haefele.ch"
+	Set ..LeverbonHoofding.T1 = "UID: CHE-107.089.958"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleSE">
+<FormalSpec>HaefeleSEPersonality:DOM.common.HaefeleSEPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleSE()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleSEPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele SE & Co KG"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Adolf-Häfele-Str. 1"    
+    Set ..LeverbonHoofding.WOONPLAATS = "Nagold"
+    Set ..LeverbonHoofding.POSTCODE = "72202"
+	Set ..LeverbonHoofding.TELEFOON = "+49 745 29 50"	
+	Set ..LeverbonHoofding.EMAIL = "Info@hafele.de"
+	Set ..LeverbonHoofding.T1 = "USt-ID: DE144425382"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleFI">
+<FormalSpec>HaefeleFIPersonality:DOM.common.HaefeleFIPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleFI()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleFIPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+    Set ..LeverbonHoofding.NAAM = "Häfele SE & Co KG"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Adolf-Häfele-Str. 1"    
+    Set ..LeverbonHoofding.WOONPLAATS = "Nagold"
+    Set ..LeverbonHoofding.POSTCODE = "72202"
+	Set ..LeverbonHoofding.TELEFOON = "+49 745 29 50"	
+	Set ..LeverbonHoofding.EMAIL = "Info@hafele.de"
+	Set ..LeverbonHoofding.T1 = "USt-ID: DE144425382"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleNO">
+<FormalSpec>HaefeleNOPersonality:DOM.common.HaefeleNOPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleNO()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+    Set ..LeverbonHoofding.ColRightWidth = "73mm"
+    
+	#dim URL As %String = ""
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HaefeleNOPersonality.GeefKlantID())
+	If Klant.HeeftEigenLogo(){
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}
+    Set ..LeverbonHoofding.NAAM = "Häfele SE & Co KG"
+    Set ..LeverbonHoofding.STRAATNRBUS = "Adolf-Häfele-Str. 1"    
+    Set ..LeverbonHoofding.WOONPLAATS = "Nagold"
+    Set ..LeverbonHoofding.POSTCODE = "72202"
+	Set ..LeverbonHoofding.TELEFOON = "+49 745 29 50"	
+	Set ..LeverbonHoofding.EMAIL = "Info@hafele.de"
+	Set ..LeverbonHoofding.T1 = "USt-ID: DE144425382"
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkKisch">
 <FormalSpec>KischPersonality:DOM.common.KischPersonality</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
@@ -135,7 +692,7 @@
 	
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(NotebornPersonality.GeefKlantID())
 	If Klant.HeeftEigenLogo(){
-    	Set URL = "\\fop\Resources\Media\KlantLogos\"
+    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
 		#dim Bestand As %String = Klant.GeefLogo()
 		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
     	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
@@ -158,45 +715,125 @@
 <FormalSpec>SFSPersonality:DOM.common.SFSPersonality</FormalSpec>
 <Implementation><![CDATA[
 	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).SFS()
-	
+
 	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
-    Set ..LeverbonHoofding.ColRightWidth = "73mm"
-    
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+
 	#dim URL As %String = ""
-	
+
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).SFS())
 	If Klant.HeeftEigenLogo(){
-    	Set URL = "\\fop\Resources\Media\KlantLogos\"
-    	
-    	// LET OP: ScaleFactor en AspectRatio veldjes op pxAttribType blijken geen effect te hebben (toch minstens al niet voor het SFS JPG logo)!!!
-    	// Daarom minstens tijdelijk hardcoded afwijkend ("hoger") logo-bitmap.
-		#dim Bestand As %String = "Logo\Logo SFS Unimarket 12486 hoger.JPG" // Klant.GeefLogo()
-		
+		Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
 		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
-    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
-    	Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),1.5,)
+		Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+		Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
 	}	    
-    Set ..LeverbonHoofding.NAAM = "SFS UNIMARKET AG"
-    Set ..LeverbonHoofding.STRAATNRBUS = "Rosenbergsaustrasse 10"    
-    Set ..LeverbonHoofding.WOONPLAATS = "Heerbrugg"
-    Set ..LeverbonHoofding.POSTCODE = "9435"
+	Set ..LeverbonHoofding.NAAM = "SFS UNIMARKET AG"
+	Set ..LeverbonHoofding.STRAATNRBUS = "Rosenbergsaustrasse 10"    
+	Set ..LeverbonHoofding.WOONPLAATS = "Heerbrugg"
+	Set ..LeverbonHoofding.POSTCODE = "9435"
 	Set ..LeverbonHoofding.TELEFOON = "+41 (0)71 727 58 69"	
-	Set ..LeverbonHoofding.EMAIL = "Info@hafele.nl"
+	Set ..LeverbonHoofding.EMAIL = ""
 	Set ..LeverbonHoofding.T1 = "VAT: CHE116276910"
 	Set ..LeverbonHoofding.T3 = "Deutsche Bank: "
 	Set ..LeverbonHoofding.T4 = "IBAN DE08690700320041581000 "
 	Set ..LeverbonHoofding.T5 = "BIC: DEUTDE6F690"
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkOPO">
+<FormalSpec>OPOPersonality:DOM.common.OPOPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).OPO()
+
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+
+	#dim URL As %String = ""
+
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).OPO())
+	If Klant.HeeftEigenLogo(){
+		Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+		Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+		Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+	Set ..LeverbonHoofding.NAAM = "OPO Oeschger AG"
+	Set ..LeverbonHoofding.STRAATNRBUS = "Steinackerstrasse 68"
+	Set ..LeverbonHoofding.WOONPLAATS = "Kloten"
+	Set ..LeverbonHoofding.POSTCODE = "8302"
+	;Set ..LeverbonHoofding.T1 = "VAT: CHE 105956389"
+	Set ..LeverbonHoofding.T3 = "" ;"Deutsche Bank: "
+	Set ..LeverbonHoofding.T4 = "" ;"IBAN DE08690700320041581000 "
+	Set ..LeverbonHoofding.T5 = "" ;"BIC: DEUTDE6F690"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkOPODuitsland">
+<FormalSpec>OPODePersonality:DOM.common.OPODePersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).OPO()
+
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+
+	#dim URL As %String = ""
+
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).OPODuitsland())
+	If Klant.HeeftEigenLogo(){
+		Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+		Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+		Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}	    
+	Set ..LeverbonHoofding.NAAM = "OPO Oeschger GmbH"
+	Set ..LeverbonHoofding.STRAATNRBUS = "Albertistrasse 16"
+	Set ..LeverbonHoofding.WOONPLAATS = "Villingen-Schwenningen"
+	Set ..LeverbonHoofding.POSTCODE = "78056"
+	;Set ..LeverbonHoofding.T1 = "VAT: CHE 105956389"
+	Set ..LeverbonHoofding.T3 = "" ;"Deutsche Bank: "
+	Set ..LeverbonHoofding.T4 = "" ;"IBAN DE08690700320041581000 "
+	Set ..LeverbonHoofding.T5 = "" ;"BIC: DEUTDE6F690"
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkVanHoeckeVoorHalux">
 <FormalSpec>VanHoeckVoorHaluxPersonality:DOM.common.VanHoeckeVoorHaluxPersonality</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanRaemdonck">
 <FormalSpec>VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality</FormalSpec>
-<Implementation><![CDATA[]]></Implementation>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).VanRaemdonck()
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+	
+	#dim URL As %String = ""
+
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).VanRaemdonck())
+	If Klant.HeeftEigenLogo(){
+		Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Bestand As %String = Klant.GeefLogo()
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
+		Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
+		Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}
+	Set ..LeverbonHoofding.NAAM = 			"VAN RAEMDONCK & CO NV"
+	Set ..LeverbonHoofding.STRAATNRBUS = 	"Montignystraat 81-85"    
+	Set ..LeverbonHoofding.WOONPLAATS = 	"Antwerpen"
+	Set ..LeverbonHoofding.POSTCODE = 		"BE 2018"
+	Set ..LeverbonHoofding.TELEFOON = 		"Tel.: +32 3 216 94 62"
+	Set ..LeverbonHoofding.FAX = 			"Fax.: +32 3 216 94 62"
+	Set ..LeverbonHoofding.EMAIL = 			"antwerpen@donckers.biz"
+	Set ..LeverbonHoofding.T1 = 			"BTW-nr.: BE 0419.430.176"
+	Set ..LeverbonHoofding.T2 = 			"RPR Antwerpen"
+	Set ..LeverbonHoofding.T3 = 			"KBC: IBAN BE66 4033 1304 5143"
+	Set ..LeverbonHoofding.T4 = 			"BIC KREDBEBB"
+]]></Implementation>
 </Method>
 
 <Method name="VerwerkDaro">
@@ -217,7 +854,7 @@
 		
 		#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(HeinPersonality.GeefKlantID())
 		If Klant.HeeftEigenLogo(){
-	    	Set URL = "\\fop\Resources\Media\KlantLogos\"
+	    	Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
 			#dim Bestand As %String = Klant.GeefLogo()
 			#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Bestand,".")
 	    	Set URL = ##class(TECH.Files).AppendFile(URL,Bestand)
@@ -238,6 +875,72 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkBlumPL">
+<FormalSpec>BlumPLPersonality:DOM.common.BlumPLPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).BlumPolen()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+	
+	#dim URL As %String = ""
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(BlumPLPersonality.GeefKlantID())
+	#dim LogoBepaler = ##class(BL.Flow.Levering.LabelLogoBepaler).%New()
+	#dim Logo As %String = LogoBepaler.GeefLogo(..OorsprongKetting, Klant.GeefCode()) // Logo voor distributeur van Blum Polen (indien relevant)
+	
+	If ##class(TECH.StringUtils).Equals(Logo, "", "LOGO4682") {
+		Set Logo = Klant.GeefLogo() // Indien distributeur geen eigen logo heeft: logo van Blum Polen zelf gebruiken
+	}
+	
+	If Klant.HeeftEigenLogo() {
+	    Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Logo,".")
+	    Set URL = ##class(TECH.Files).AppendFile(URL,Logo)
+	    Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}
+	
+	Set ..LeverbonHoofding.NAAM = "Blum Polska SP. Z O.O"
+	Set ..LeverbonHoofding.STRAATNRBUS = "ul. Poznanska 16"
+	Set ..LeverbonHoofding.WOONPLAATS = "Swarzedza"
+	Set ..LeverbonHoofding.POSTCODE = "62-020"
+	Set ..LeverbonHoofding.TELEFOON = "+61 895 19 00"
+	Set ..LeverbonHoofding.EMAIL = "info.pl@blum.com"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBlumCZ">
+<FormalSpec>BlumCZPersonality:DOM.common.BlumCZPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).BlumPolen()
+	
+	Set ..LeverbonHoofding.ColLeftWidth = "40mm"
+	Set ..LeverbonHoofding.ColRightWidth = "73mm"
+	
+	#dim URL As %String = ""
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(BlumCZPersonality.GeefKlantID())
+	#dim LogoBepaler = ##class(BL.Flow.Levering.LabelLogoBepaler).%New()
+	#dim Logo As %String = LogoBepaler.GeefLogo(..OorsprongKetting, Klant.GeefCode()) // Logo voor distributeur van Blum Tsjechie (indien relevant)
+	
+	If ##class(TECH.StringUtils).Equals(Logo, "", "LOGO4682") {
+		Set Logo = Klant.GeefLogo() // Indien distributeur geen eigen logo heeft: logo van Blum Polen zelf gebruiken
+	}
+	
+	If Klant.HeeftEigenLogo() {
+	    Set URL = "\\Notes01\FOP\DocFamily7\Resources\Media\KlantLogos\"
+		#dim Extensie As %String = ##class(TECH.StringUtils).GetLastPart(Logo,".")
+	    Set URL = ##class(TECH.Files).AppendFile(URL,Logo)
+	    Set ..LeverbonHoofding.LOGO = ##class(BL.FOP.Basis.pxAttribType).Create(URL,##class(TECH.StringUtils).ToUpper(Extensie),,)
+	}
+	
+	Set ..LeverbonHoofding.NAAM = "Blum, s.r.o."
+	Set ..LeverbonHoofding.STRAATNRBUS = "Kolbenova 1041/19"
+	Set ..LeverbonHoofding.WOONPLAATS = "PRAHA 9"
+	Set ..LeverbonHoofding.POSTCODE = "190 00"
+	Set ..LeverbonHoofding.TELEFOON = "+420 281 090 161"
+	Set ..LeverbonHoofding.EMAIL = "posta.cz@blum.com"
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkBeslagDesign">
 <FormalSpec>BeslagDesignPersonality:DOM.common.BeslagDesignPersonality</FormalSpec>
 </Method>
@@ -253,6 +956,46 @@
 <Method name="VerwerkFerexpert">
 <FormalSpec>FerexpertPersonality:DOM.common.FerexpertPersonality</FormalSpec>
 </Method>
+
+<Method name="VerwerkBeslagteknikk">
+<FormalSpec>BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkJBarth">
+<FormalSpec>JBarthPersonality:DOM.common.JBarthPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkZweygart">
+<FormalSpec>ZweygartPersonality:DOM.common.ZweygartPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkKleiner">
+<FormalSpec>KleinerPersonality:DOM.common.KleinerPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkLayer">
+<FormalSpec>LayerPersonality:DOM.common.LayerPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkHahleOy">
+<FormalSpec>HahleOyPersonality:DOM.common.HahleOyPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkDozon">
+<FormalSpec>DozonPersonality:DOM.common.DozonPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkOstermannBE">
+<FormalSpec>OstermannBEPersonality:DOM.common.OstermannBEPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkOstermannNL">
+<FormalSpec>OstermannNLPersonality:DOM.common.OstermannNLPersonality</FormalSpec>
+</Method>
+
+<Method name="VerwerkOstermannDE">
+<FormalSpec>OstermannDEPersonality:DOM.common.OstermannDEPersonality</FormalSpec>
+</Method>
 </Class>