Index: vhUnitTest/DOM/OV/TestOrder.cls.xml
===================================================================
diff -u -r1585 -r2423
--- vhUnitTest/DOM/OV/TestOrder.cls.xml	(.../TestOrder.cls.xml)	(revision 1585)
+++ vhUnitTest/DOM/OV/TestOrder.cls.xml	(.../TestOrder.cls.xml)	(revision 2423)
@@ -40,7 +40,7 @@
 	Do $$$AssertEquals(Adres.GeefStraat(),"Europark noord 9","Straat")
 	Do $$$AssertEquals(Adres.GeefPostcode(),9100,"Postcode")
 	Do $$$AssertEquals(Adres.GeefGemeente(),"Sint-Niklaas","Gemeente")
-	Do $$$AssertEquals(Adres.GeefLandNr(),"1019","Land")
+	Do $$$AssertEquals(Adres.GeefLand().GeefID(),"1019","Land")
 	
 	Set Orderlijn = Order.GeefOrderLijn(103)
 	Do $$$AssertTrue($IsObject(Orderlijn),"De orderlijn is een object")