Index: BL/Flow/Proxy/pxLevering.cls.xml =================================================================== diff -u -r62183 -r62302 --- BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 62183) +++ BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 62302) @@ -334,9 +334,9 @@ #dim HeeftEigenHoofding As %Boolean = $$$False If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefHeinNaarEindklant()) { - Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.Hein) + Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.VanRaemdonck, HoofdingType.Hein,) } Else { - Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.Noteborn,HoofdingType.SFS) + Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.VanRaemdonck) } If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefDuPontNaarEindklant()){ Set HeeftEigenHoofding = HeeftEigenHoofding || (AfzenderHoofdingDto.HeaderType = HoofdingType.Dupont) @@ -512,6 +512,10 @@ } ElseIf ..HeaderType = HoofdingType.SFS { Set ..KlantTelefoon = ..AfzenderHoofding.TELEFOON Set ..HeaderType = HoofdingType.Custom + } ElseIf ..HeaderType = HoofdingType.VanRaemdonck { + Set ..KlantTelefoon = "" + Set ..BTWNR = "" + Set ..HeaderType = HoofdingType.Custom } Else { Set ..KlantTelefoon=$P($$$KLRec(0),"\",13) Set ..CheckSumBon= "" ;CheckSumBon