Index: BL/Flow/Proxy/pxLevering.cls.xml =================================================================== diff -u -r54193 -r54884 --- BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 54193) +++ BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 54884) @@ -519,7 +519,7 @@ Set KLRec5=$$$KLRec(5) For I=3:1:5 Do:($L($P(KLRec5,"\",I))) ..Opmerkingen.Insert($P(KLRec5,"\",I)) - if ((KlantID = ##class(DOM.VKP.enu.Klant).HaefeleBelgie()) || (KlantID = ##class(DOM.VKP.enu.Klant).HaefeleNederland()) ) { + if ((KlantID = ##class(DOM.VKP.enu.Klant).HaefeleBelgie()) || (KlantID = ##class(DOM.VKP.enu.Klant).HaefeleNederland()) || (KlantID = ##class(DOM.VKP.enu.Klant).IHCHolland()) ) { #Dim DragerIDs as %ArrayOfDataTypes Set DragerIDs = ..GeefDragerIDsVanBon(MogelijkeDragersVoorKlant,.DragerLookup) if DragerIDs.Count(){ Index: APPS/common/impl/KlantInstellingenService.cls.xml =================================================================== diff -u -r51826 -r54884 --- APPS/common/impl/KlantInstellingenService.cls.xml (.../KlantInstellingenService.cls.xml) (revision 51826) +++ APPS/common/impl/KlantInstellingenService.cls.xml (.../KlantInstellingenService.cls.xml) (revision 54884) @@ -124,7 +124,8 @@ quit ##class(TECH.StringUtils).Equals( PartijID, ##class(DOM.VKP.enu.Klant).Planofurn(), ##class(DOM.VKP.enu.Klant).WilsInterieurbouw(), - ##class(DOM.VKP.enu.Klant).HaefeleBelgie() ) + ##class(DOM.VKP.enu.Klant).HaefeleBelgie(), + ##class(DOM.VKP.enu.Klant).IHCHolland() ) ]]>