Index: BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml =================================================================== diff -u -r58282 -r58438 --- BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 58282) +++ BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 58438) @@ -187,21 +187,17 @@ #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() - + #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 ..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.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 "