Index: APPS/common/impl/KlantInstellingenService.cls.xml =================================================================== diff -u -r71063 -r73875 --- APPS/common/impl/KlantInstellingenService.cls.xml (.../KlantInstellingenService.cls.xml) (revision 71063) +++ APPS/common/impl/KlantInstellingenService.cls.xml (.../KlantInstellingenService.cls.xml) (revision 73875) @@ -193,7 +193,7 @@ %Boolean @@ -206,6 +206,15 @@ ]]> + +PartijID:%String +%Boolean + + + KLNr:%String %Boolean Index: BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml =================================================================== diff -u -r73634 -r73875 --- BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 73634) +++ BL/Flow/Proxy/impl/LeverbonHoofdingBepaler.cls.xml (.../LeverbonHoofdingBepaler.cls.xml) (revision 73875) @@ -102,6 +102,8 @@ Do ..VerwerkHaefeleNO(##class(DOM.common.HaefeleNOPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality. } ElseIf ..IsBlumPolen(KLNr) { Do ..VerwerkBlumPL(##class(DOM.common.BlumPLPersonality).Instance()) // De LeverbonHoofding mag voor klant dezelfde zijn als i.g.v. multipersonality. + } ElseIf ..IsBlumTsjechie(KLNr) { + Do ..VerwerkBlumCZ(##class(DOM.common.BlumCZPersonality).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. ")) @@ -229,6 +231,14 @@ ]]> + +KLNr:%Integer +1 +%Boolean + + + VanHoeckePersonality:DOM.common.VanHoeckePersonality