Index: APPS/common/impl/KlantInstellingenService.cls.xml =================================================================== diff -u -r64673 -r64772 --- APPS/common/impl/KlantInstellingenService.cls.xml (.../KlantInstellingenService.cls.xml) (revision 64673) +++ APPS/common/impl/KlantInstellingenService.cls.xml (.../KlantInstellingenService.cls.xml) (revision 64772) @@ -193,10 +193,19 @@ %Boolean + +PartijID:%String +%Boolean + + + KLNr:%String %Boolean Index: BL/Flow/Proxy/pxLevering.cls.xml =================================================================== diff -u -r64745 -r64772 --- BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 64745) +++ BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 64772) @@ -342,7 +342,7 @@ #dim HeeftEigenHoofding As %Boolean = $$$False - Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleSE,HoofdingType.HaefeleFI,HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,,HoofdingType.HaefeleAT,HoofdingType.HaefeleIT,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.VanRaemdonck, HoofdingType.CampeTonny,HoofdingType.OPO) + Set HeeftEigenHoofding = ##class(TECH.StringUtils).Equals(AfzenderHoofdingDto.HeaderType, HoofdingType.HaefeleSE,HoofdingType.HaefeleFI,HoofdingType.HaefeleNL,HoofdingType.HaefeleDE,HoofdingType.HaefeleAT,HoofdingType.HaefeleIT,HoofdingType.Noteborn,HoofdingType.SFS,HoofdingType.VanRaemdonck, HoofdingType.CampeTonny,HoofdingType.OPO) If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefHeinNaarEindklant()) { Set HeeftEigenHoofding = HeeftEigenHoofding || (AfzenderHoofdingDto.HeaderType = HoofdingType.Hein) Index: BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml =================================================================== diff -u -r64703 -r64772 --- BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 64703) +++ BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 64772) @@ -72,6 +72,20 @@ 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. } 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. ")) } @@ -102,6 +116,62 @@ ]]> + +KLNr:%Integer +1 +%Boolean + + + + +KLNr:%Integer +1 +%Boolean + + + + +KLNr:%Integer +1 +%Boolean + + + + +KLNr:%Integer +1 +%Boolean + + + + +KLNr:%Integer +1 +%Boolean + + + + +KLNr:%Integer +1 +%Boolean + + + + +KLNr:%Integer +1 +%Boolean + + + VanHoeckePersonality:DOM.common.VanHoeckePersonality