Index: DOM/PM/TBX/impl/TOBSetEenheidBepaler.cls.xml
===================================================================
diff -u -r33912 -r33939
--- DOM/PM/TBX/impl/TOBSetEenheidBepaler.cls.xml	(.../TOBSetEenheidBepaler.cls.xml)	(revision 33912)
+++ DOM/PM/TBX/impl/TOBSetEenheidBepaler.cls.xml	(.../TOBSetEenheidBepaler.cls.xml)	(revision 33939)
@@ -1,7 +1,8 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="24">
+<Export generator="Cache" version="9">
 <Class name="DOM.PM.TBX.impl.TOBSetEenheidBepaler">
-<Super>TECH.RegisteredObject</Super>
+<Super>%RegisteredObject</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="BepaalEenheidIdentificatie">
 <FormalSpec>DesignCode:%String,LadeHoogte:%String,LadeDiepte:%Numeric,InternBreedte:%Numeric,Draagkracht:%Numeric</FormalSpec>
@@ -14,14 +15,14 @@
 		Do ..GooiTOBEenheidExceptie("Ongeldige DesignCode '"_DesignCode_"'.")
 	}
 	
-	#dim TOBIdentificatie As %String = ""
+	Set TOBIdentificatie = ""
 	
-	If (Draagkracht = ##class(DOM.PM.enu.TBXDraagkracht).Draagkracht65()) {
+	If (Draagkracht = 65) {
 		
 		Set TOBIdentificatie = "3560"
 		
 	}
-	ElseIf (Draagkracht = ##class(DOM.PM.enu.TBXDraagkracht).Draagkracht30()) {
+	ElseIf (Draagkracht = 30) {
 		
 		// Hoogte M en N 
 		If ##class(TECH.StringUtils).Equals(LadeHoogte, "M", "N") {
@@ -108,6 +109,4 @@
 ]]></Implementation>
 </Method>
 </Class>
-
-
 </Export>