Index: BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml =================================================================== diff -u -r62301 -r62357 --- BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 62301) +++ BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 62357) @@ -326,19 +326,7 @@ #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),,) - } - - ;TODO: aanvullen met juiste gegevens -- mailtje gestuurd naar Brian - 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 = "" - Set ..LeverbonHoofding.T1 = "VAT: CHE116276910" - Set ..LeverbonHoofding.T3 = "Deutsche Bank: " - Set ..LeverbonHoofding.T4 = "IBAN DE08690700320041581000 " - Set ..LeverbonHoofding.T5 = "BIC: DEUTDE6F690" + } ]]> Index: BL/Flow/Levering/Label.cls.xml =================================================================== diff -u -r62306 -r62357 --- BL/Flow/Levering/Label.cls.xml (.../Label.cls.xml) (revision 62306) +++ BL/Flow/Levering/Label.cls.xml (.../Label.cls.xml) (revision 62357) @@ -165,7 +165,6 @@ If KLNr="" Quit $$$ERROR($$$GeneralError,"Verkeerd bonnummer "_..BONNr_": geen data in de global.") Set ..pxLabelKlant=##class(BL.Flow.Levering.sub.pxKlantPallet).Create() If $L($TR($P(xAdres,"\",1,10),"\",""))<5 Set xAdres=^KKL(^KK1(KLNr),0) - Set ..pxLabelKlant.Logo = ..LabelLogoBepaler.GeefLogo(KLNr) Set ..pxLabelKlant.KlantNaam=$Piece(xAdres,"\",2) Set ..pxLabelKlant.Toenaam=$Piece(xAdres,"\",3)