Index: DOM/PM/TBX/impl/TOBSetEenheidBepaler.cls.xml =================================================================== diff -u -r38952 -r44709 --- DOM/PM/TBX/impl/TOBSetEenheidBepaler.cls.xml (.../TOBSetEenheidBepaler.cls.xml) (revision 38952) +++ DOM/PM/TBX/impl/TOBSetEenheidBepaler.cls.xml (.../TOBSetEenheidBepaler.cls.xml) (revision 44709) @@ -14,7 +14,7 @@ #define KB550mm 518 #define KB800mm 768 - If (DesignCode '= ##class(DOM.PM.enu.TBXDesigncode).Antaro()) { + If $$$Not(##class(TECH.StringUtils).Equals(DesignCode, ##class(DOM.PM.enu.TBXDesigncode).Antaro(), ##class(DOM.PM.enu.TBXDesigncode).MengvormADesign() )) { Do ..GooiTOBEenheidExceptie("Ongeldige DesignCode '"_DesignCode_"'.") }