Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml =================================================================== diff -u -r38637 -r38650 --- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38637) +++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38650) @@ -61,8 +61,9 @@ Set TBXKenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Leder() Set TBXKenmerken.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).DiamantGezuurd() Set TBXKenmerken.ZijwandVerhogingAantal = 2 + Set TBXKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Lichtgrijs() - Do $$$AssertEquals(IKCanonischeWaardeGenerator.GeefCanonischeWaarde(TBXKenmerken),";;\Bodem;Rug\;\Zijkant->Links;Zijkant->Rechts\;200;250;TBX_Plus;1;Z;1;0;LG;30;3;S;SW;1;FrontSteun;0;SP2;1;0;HS;DG;RHK;N;Hout;M;Staal;SZK;1;102;106;103;104;105;V;P;0;1;Reling;Metaal;FZ;F;K;IN;G;Boxside;Leder;DFZ;2","De canonische waarde voor KAD") + Do $$$AssertEquals(IKCanonischeWaardeGenerator.GeefCanonischeWaarde(TBXKenmerken),";;\Bodem;Rug\;\Zijkant->Links;Zijkant->Rechts\;200;250;TBX_Plus;1;Z;1;0;LG;30;3;S;SW;1;FrontSteun;0;SP2;1;0;HS;DG;RHK;N;Hout;M;Staal;SZK;1;102;106;103;104;105;V;P;0;1;Reling;Metaal;FZ;F;K;IN;G;Boxside;Leder;DFZ;2;LG","De canonische waarde voor KAD") ]]> Index: DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml =================================================================== diff -u -r38637 -r38650 --- DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38637) +++ DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38650) @@ -94,6 +94,7 @@ _ ";" _ TBXKenmerken.ZijwandVerhogingMateriaal _ ";" _ TBXKenmerken.ZijwandVerhogingKleur _ ";" _ TBXKenmerken.ZijwandVerhogingAantal + _ ";" _ TBXKenmerken.OpvullijstKleur ]]>