Index: DOM/CRM/impl/DataM/DataMKlantBase.cls.xml
===================================================================
diff -u -r1075 -r1328
--- DOM/CRM/impl/DataM/DataMKlantBase.cls.xml	(.../DataMKlantBase.cls.xml)	(revision 1075)
+++ DOM/CRM/impl/DataM/DataMKlantBase.cls.xml	(.../DataMKlantBase.cls.xml)	(revision 1328)
@@ -43,6 +43,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="Node7Data">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="ActiefChanged">
 <Type>%Boolean</Type>
 <InitialExpression>0</InitialExpression>
@@ -142,6 +147,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefBestelGedrag">
+<ReturnType>DOM.CRM.enu.BestelGedrag</ReturnType>
+<Implementation><![CDATA[	Quit $piece(..BetalingsGegevens1,"\",18)
+]]></Implementation>
+</Method>
+
 <Method name="GeefBTWNr">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit $piece(..AlgemeneGegevens,"\",16)
@@ -246,6 +257,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefURL">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $Piece(..Node7Data,"\",2)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantIndexKKL">
 <Description>
 Index voor KKL via KK1 ophalen.  </Description>
@@ -308,6 +325,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetNode7DataGegevens">
+<FormalSpec>Piece:%Integer,Waarde:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set Temp = ..Node7Data
+	Set $Piece(Temp,"\",Piece) = Waarde
+	Set ..Node7Data = Temp
+	Do ..Node7Gewijzigd()
+]]></Implementation>
+</Method>
+
 <Method name="ZetActiefStatus">
 <FormalSpec>Status:DOM.CRM.enu.ActiefStatus</FormalSpec>
 <Implementation><![CDATA[
@@ -372,6 +400,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetURL">
+<FormalSpec>URL:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..ZetNode7DataGegevens(2,URL)
+]]></Implementation>
+</Method>
+
 <UDLText name="T">
 <Content><![CDATA[
 /************
@@ -395,5 +429,13 @@
 <Method name="BetalingsGegevens1Gewijzigd">
 <Abstract>1</Abstract>
 </Method>
+
+<Method name="Opmerkingen2Gewijzigd">
+<Abstract>1</Abstract>
+</Method>
+
+<Method name="Node7Gewijzigd">
+<Abstract>1</Abstract>
+</Method>
 </Class>
 </Export>