Index: vhUnitTest/DOM/PM/Maatwerk/TBXProduct/TestTBXLade.cls.xml =================================================================== diff -u -r1923 -r1993 --- vhUnitTest/DOM/PM/Maatwerk/TBXProduct/TestTBXLade.cls.xml (.../TestTBXLade.cls.xml) (revision 1923) +++ vhUnitTest/DOM/PM/Maatwerk/TBXProduct/TestTBXLade.cls.xml (.../TestTBXLade.cls.xml) (revision 1993) @@ -177,15 +177,15 @@ Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(1).GeefAfstandTotBodemRechts(),537-69,"Sifon zit 468mm van rechts van de bodem") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(1).GeefDiepte(),360,"Sifon is 360mm diep") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(1).GeefZijkantKleur(),"MG","Kleur van de binnenzijkant") - Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(1).GeefTussenrugMateriaal(),##class(DOM.PM.enu.TBXRugMateriaal).Staal(),"Tussenrugmateriaal is hout") + Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(1).GeefTussenrugMateriaal(),##class(DOM.PM.enu.TBXRugMateriaal).Hout(),"Tussenrugmateriaal is hout") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefAfstandTotZijkantLinks(),61+69+263+144,"Sifon zit 606.5mm van links van de zijkant") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefAfstandTotZijkantRechts(),81+69,"Sifon zit 162.5mm van rechts van de zijkant") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefAfstandTotBodemLinks(),61+263+144,"Sifon zit 162.5mm van links van de bodem") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefAfstandTotBodemRechts(),81,"Sifon zit 81mm van rechts van de bodem") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefDiepte(),360,"Sifon is 360mm diep") Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefZijkantKleur(),"MG","Kleur van de binnenzijkant") - Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefTussenrugMateriaal(),##class(DOM.PM.enu.TBXRugMateriaal).Staal(),"Tussenrugmateriaal is hout") + Do $$$AssertEquals(Product.GeefUitsparingen().GetAt(2).GeefTussenrugMateriaal(),##class(DOM.PM.enu.TBXRugMateriaal).Hout(),"Tussenrugmateriaal is hout") ]]>