Index: APPS/VisiDot/impl/Tech.cls.xml
===================================================================
diff -u -r58849 -r62888
--- APPS/VisiDot/impl/Tech.cls.xml	(.../Tech.cls.xml)	(revision 58849)
+++ APPS/VisiDot/impl/Tech.cls.xml	(.../Tech.cls.xml)	(revision 62888)
@@ -191,6 +191,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefFrameIdAndereZijkant">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>FrameId:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Type As %String = $Extract(FrameId,1,2) 
+	#dim ZijkantId As %String = $Extract(FrameId,3,3)
+	#dim VHossNr As %String = $Extract(FrameId,4,10) 
+	
+	#dim AndereZijkantId As %String = ""
+	If ZijkantId = "1" {
+		Set AndereZijkantId = "2"
+	}
+	If ZijkantId = "2" {
+		Set AndereZijkantId = "1"
+	}
+	
+	Quit Type_AndereZijkantId_VHossNr
+]]></Implementation>
+</Method>
+
 <Method name="GeefVHossVolgNrVanLadeID">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>LadeID:%String</FormalSpec>