Index: DOM/VKP/impl/DataM/DataMAdres.cls.xml
===================================================================
diff -u -r36474 -r47647
--- DOM/VKP/impl/DataM/DataMAdres.cls.xml	(.../DataMAdres.cls.xml)	(revision 36474)
+++ DOM/VKP/impl/DataM/DataMAdres.cls.xml	(.../DataMAdres.cls.xml)	(revision 47647)
@@ -74,6 +74,12 @@
 <Private>1</Private>
 </Property>
 
+<Property name="Type">
+<Type>%String</Type>
+<InitialExpression>"L"</InitialExpression>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>Naam:%String,Toenaam:%String,Aanspreking:%String,Straat:%String,Postcode:%String,Gemeente:%String,LandNr:%Integer,Taal:%String,KlantAdresNr:%String,Opmerking1:%String</FormalSpec>
 <Private>1</Private>
@@ -196,6 +202,18 @@
 <Implementation><![CDATA[	Quit ..GeefAanspreking()_" "_..GeefNaam()_" "_..GeefToenaam()_" - "_..GeefStraat()_" "_..GeefPostcode()_" "_..GeefGemeente()
 ]]></Implementation>
 </Method>
+
+<Method name="GeefType">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..Type
+]]></Implementation>
+</Method>
+
+<Method name="ZetType">
+<FormalSpec>Type:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..Type = Type
+]]></Implementation>
+</Method>
 </Class>