Index: BL/Flow/Proxy/pxLevering.cls.xml =================================================================== diff -u -r71017 -r71063 --- BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 71017) +++ BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 71063) @@ -342,7 +342,7 @@ #dim HeeftEigenHoofding As %Boolean = $$$False - Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleCH, HoofdingType.HaefeleSE,HoofdingType.HaefeleFI, HoofdingType.HaefeleNO,HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.HaefeleAT,HoofdingType.HaefeleIT,HoofdingType.HaefeleCH ,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.VanRaemdonck, HoofdingType.CampeTonny,HoofdingType.OPO) + Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleCH, HoofdingType.HaefeleSE,HoofdingType.HaefeleFI, HoofdingType.HaefeleNO,HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.HaefeleAT,HoofdingType.HaefeleIT,HoofdingType.HaefeleCH ,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.VanRaemdonck, HoofdingType.CampeTonny,HoofdingType.OPO,HoofdingType.BlumPolen) If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefHeinNaarEindklant()) { Set HeeftEigenHoofding = HeeftEigenHoofding || (AfzenderHoofdingDto.HeaderType = HoofdingType.Hein) @@ -539,6 +539,11 @@ Set ..KlantTelefoon = "" Set ..BTWNR = "" Set ..HeaderType = HoofdingType.Custom + } ElseIf ..HeaderType = HoofdingType.BlumPolen { + Set ..KlantTelefoon = "" + Set ..BTWNR = "" + Set ..HeaderType = HoofdingType.Custom + } Else { Set ..KlantTelefoon=$P($$$KLRec(0),"\",13) Set ..CheckSumBon= "" ;CheckSumBon