Index: vhUnitTest/DOM/PM/impl/TestIKCanonischeWaarde.cls.xml =================================================================== diff -u -r1852 -r1899 --- vhUnitTest/DOM/PM/impl/TestIKCanonischeWaarde.cls.xml (.../TestIKCanonischeWaarde.cls.xml) (revision 1852) +++ vhUnitTest/DOM/PM/impl/TestIKCanonischeWaarde.cls.xml (.../TestIKCanonischeWaarde.cls.xml) (revision 1899) @@ -129,9 +129,11 @@ Set TBXKenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).N() Set TBXKenmerken.RugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Hout() Set TBXKenmerken.SpoelbakBinnenzijwandHoogte = "M" - Set TBXKenmerken.SpoelbakZijkantKleur = "SZK" + Set TBXKenmerken.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Staal() + Set TBXKenmerken.UitsparingZijkantKleur = "SZK" Set TBXKenmerken.Stabilisator = 1 - Set TBXKenmerken.UitsparingBreedte = 102 + Set TBXKenmerken.UitsparingBreedte1 = 102 + Set TBXKenmerken.UitsparingBreedte2 = 106 Set TBXKenmerken.UitsparingDiepte = 103 Set TBXKenmerken.UitsparingPositie1 = 104 Set TBXKenmerken.UitsparingPositie2 = 105 @@ -153,7 +155,7 @@ Do TBXKenmerken.Accept(IKCanonischeWaardeGenerator) - Do $$$AssertEquals(IKCanonischeWaardeGenerator.GeefCanonischeWaarde(),";Volledig;\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;SZK;1;102;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(),";Volledig;\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") ]]>