Index: DOM/PM/impl/DataM/DataMSubgroepClassificatie.cls.xml
===================================================================
diff -u -r1725 -r2084
--- DOM/PM/impl/DataM/DataMSubgroepClassificatie.cls.xml	(.../DataMSubgroepClassificatie.cls.xml)	(revision 1725)
+++ DOM/PM/impl/DataM/DataMSubgroepClassificatie.cls.xml	(.../DataMSubgroepClassificatie.cls.xml)	(revision 2084)
@@ -69,9 +69,15 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefUniekeCode">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $P(..DataKlas,"\",5)_"/"_$P(..DataKlas,"\",6)_"/"_$P(..DataKlas,"\",7)
+]]></Implementation>
+</Method>
+
 <Method name="GeefCode">
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $P(..Data,"\",7)
+<Implementation><![CDATA[	Quit $P(..DataKlas,"\",7)
 ]]></Implementation>
 </Method>