From 71429d97c429fd095f4df3ac12b6e9c3a7fd6496 Mon Sep 17 00:00:00 2001
From: Yuelin Wang <y.wang@schoenenberger.de>
Date: Mon, 22 Apr 2024 11:56:32 +0200
Subject: [PATCH] neue Function GetHeightOfItem

---
 MAIN_SSG.rdx | 231 ++++++++++++++++++++++++++++++++++++---------------
 1 file changed, 164 insertions(+), 67 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index 40b2b5b..200f844 100644
--- a/MAIN_SSG.rdx
+++ b/MAIN_SSG.rdx
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="utf-8"?>
 <PROCESS Id="RDK:0001" Name="MAIN_SSG" ModernUI="True" Options="(GITSAVEMODE)(NOUPDATEINCLUDEFILES)" Expanded="True">
-	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="y.wang [ANGEBOT-NB02]" ModDate="2024-04-19T13:06:12" LanguageVersion="2014.1.3.635" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="y.wang [ANGEBOT-NB02]" ModDate="2024-04-22T11:48:25" LanguageVersion="2014.1.3.635" />
 	<GROUP Id="RDK:0002" Name="Declarations" SubType="Declarations" Expanded="True">
 		<GROUP Id="RDK:0003" Name="Types" SubType="TypeSet" IncludeDate="0">
 			<GROUP Id="RDK:26387" Name="SSG_Group" SubType="TypeSet" IncludeDate="0">
@@ -17,7 +17,7 @@
 					<FIELD Id="RDK:313476" Name="label" Type="string" />
 					<FIELD Id="RDK:721671" Name="aktiv" Type="boolean" />
 				</TYPE>
-				<TYPE Id="RDK:26388" Name="KreiselType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:26388" Name="KreiselType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:95024" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:26389" Name="AbstandMS" Type="double" />
@@ -50,7 +50,7 @@
 					<FIELD Id="RDK:1520421" Name="Drehung" Type="integer" DesignTimeNotes="1= im Uhrzeigersinn=rechts&#xD;&#xA;-1= Gegen Uhrzeigersinn=links" />
 					<FIELD Id="RDK:1520424" Name="Durchmesser" Type="double" />
 				</TYPE>
-				<TYPE Id="RDK:302581" Name="GefaelleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:302581" Name="GefaelleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:302571" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:880709" Name="L1" Type="double" />
@@ -64,7 +64,7 @@
 					<FIELD Id="RDK:302575" Name="n_Sep" Type="integer" />
 					<FIELD Id="RDK:302576" Name="n_Scan" Type="integer" />
 				</TYPE>
-				<TYPE Id="RDK:18732236" Name="StreckeType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:18732236" Name="StreckeType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18732225" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:18732226" Name="L1" Type="double" />
@@ -115,7 +115,7 @@
 					<FIELD Id="RDK:16525231" Name="Drehung" Type="integer" DesignTimeNotes="1= im Uhrzeigersinn=rechts&#xD;&#xA;-1= Gegen Uhrzeigersinn=links" />
 					<FIELD Id="RDK:16577441" Name="Beschreibung" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:79642" Name="SSG_ShapeType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:79642" Name="SSG_ShapeType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:79643" Name="SivasNummer" Type="string" />
 					<FIELD Id="RDK:1561689" Name="Rotationsklasse" Type="string" />
@@ -129,7 +129,7 @@
 					<FIELD Id="RDK:1652536" Name="BTMTBeladungDefinition" Type="BTMTBeladungType" />
 					<FIELD Id="RDK:16525361" Name="BTMTEntladungDefinition" Type="BTMTEntladungType" />
 				</TYPE>
-				<TYPE Id="RDK:18530527" Name="SSG_ShapeType_limit" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:18530527" Name="SSG_ShapeType_limit" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18530520" Name="KreiselDefinition" Type="KreiselType" />
 					<FIELD Id="RDK:18530521" Name="EckradDefinition" Type="EckradType" />
@@ -145,7 +145,7 @@
 					<FIELD Id="RDK:1783800" Name="Int" Type="integer" />
 					<FIELD Id="RDK:1783798" Name="Boo" Type="boolean" />
 				</TYPE>
-				<TYPE Id="RDK:18530545" Name="SSG_Limits" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:18530545" Name="SSG_Limits" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18530548" Name="Kreisel_top" Type="KreiselType" />
 					<FIELD Id="RDK:18530546" Name="Kreisel_bot" Type="KreiselType" />
@@ -757,18 +757,18 @@
 					<FIELD Id="RDK:952180" Name="Anzahl der Rampen" Type="string" />
 					<FIELD Id="RDK:1065211" Name="Höhe in m" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:903598" Name="GefaellestreckeMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:903598" Name="GefaellestreckeMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:903599" Name="Anzahl Zusatzseparatoren" Type="string" />
 					<FIELD Id="RDK:18131152" Name="Gesamtanzahl Separatoren" Type="string" />
 					<FIELD Id="RDK:903600" Name="Länge in Meter" Type="string" />
 					<FIELD Id="RDK:1674242" Name="Anzahl der Scanner" Type="integer" />
 				</TYPE>
-				<TYPE Id="RDK:18732296" Name="StreckeMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:18732296" Name="StreckeMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18732294" Name="Länge in Meter" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:18111807" Name="FoerdererMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:18111807" Name="FoerdererMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18131140" Name="Höhe ETF oben in Meter" Type="string" />
 					<FIELD Id="RDK:18131142" Name="Höhe ETF unten in Meter" Type="string" />
@@ -817,7 +817,7 @@
 				<FIELD Id="RDK:1345489" Name="NewHoeheUnten" Type="double" />
 				<FIELD Id="RDK:1370529" Name="Text" Type="string" />
 			</TYPE>
-			<TYPE Id="RDK:1529401" Name="IndirectConnGefaellestreckeType" Expanded="True" SubType="structure" HasArrayType="True" DesignTimeNotes="20231011 -1-">
+			<TYPE Id="RDK:1529401" Name="IndirectConnGefaellestreckeType" SubType="structure" HasArrayType="True" DesignTimeNotes="20231011 -1-">
 				<TYPE_VALUES />
 				<FIELD Id="RDK:1529402" Name="Id" Type="string" />
 				<FIELD Id="RDK:1529403" Name="Cp" Type="string" />
@@ -980,6 +980,8 @@
 			<VAR Id="RDK:1783790" Name="stringList" Type="string" DesignTimeRemark="Generated by RD" />
 			<VAR Id="RDK:18295767" Name="L_s" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
 			<VAR Id="RDK:18732561" Name="kreiselhoehe" Type="string" DesignTimeRemark="Generated by RD" />
+			<VAR Id="RDK:18741955" Name="stohoehe" Type="string" DesignTimeRemark="Generated by RD" />
+			<VAR Id="RDK:18741969" Name="cpId" Type="string" DesignTimeRemark="Generated by RD" />
 		</GROUP>
 		<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
 			<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -13043,39 +13045,76 @@ me.x
 									</GROUP>
 								</IFTHENELSE>
 							</GROUP>
-							<GROUP Id="RDK:18737218" SubType="Else">
-								<ACTION_CALL Id="RDK:18737222" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
-									<PAR Name="RDLibraryName">
-										<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
+						</IFTHENELSE>
+						<IFTHENELSE Id="RDK:18740477">
+							<VALUECONDITION Value="true" Oper="OR">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Strecke"]]></EXP>
+							</VALUECONDITION>
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Strecke"]]></EXP>
+							</VALUECONDITION>
+							<GROUP Id="RDK:18740494" SubType="Then">
+								<CALLFUNCTION Id="RDK:18740496">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
 									</PAR>
-									<PAR Name="MsgText">
-										<EXP><![CDATA[$C$Die zwei Shapes können nicht verbunden werden.]]></EXP>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$Param.Input]]></EXP>
 									</PAR>
-									<PAR Name="MsgStyle" />
-									<PAR Name="BtnLayout" />
-									<PAR Name="MsgCaption" />
-									<PAR Name="BaloonType" />
-									<PAR Name="BtnPressed">
-										<EXP><![CDATA[$V$]]></EXP>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$RückgabeListe]]></EXP>
 									</PAR>
-								</ACTION_CALL>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
 							</GROUP>
 						</IFTHENELSE>
 					</CASEGROUP>
 					<CASEGROUP Id="RDK:18732456" CaseType="0">
 						<EXP><![CDATA[$C$Strecke]]></EXP>
-						<CALLFUNCTION Id="RDK:18732445">
-							<PAR Name="FuncName">
-								<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
-							</PAR>
-							<PAR Name="InputExp">
-								<EXP><![CDATA[$=$Param.Input]]></EXP>
-							</PAR>
-							<PAR Name="ResultRef">
-								<EXP><![CDATA[$V$RückgabeListe]]></EXP>
-							</PAR>
-							<PAR Name="Options" />
-						</CALLFUNCTION>
+						<IFTHENELSE Id="RDK:18740516">
+							<VALUECONDITION Value="true" Oper="OR">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Foerderer"]]></EXP>
+							</VALUECONDITION>
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Foerderer"]]></EXP>
+							</VALUECONDITION>
+							<GROUP Id="RDK:18740515" SubType="Then">
+								<CALLFUNCTION Id="RDK:18740514">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
+									</PAR>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$Param.Input]]></EXP>
+									</PAR>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$RückgabeListe]]></EXP>
+									</PAR>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
+							</GROUP>
+						</IFTHENELSE>
+						<IFTHENELSE Id="RDK:18740525">
+							<VALUECONDITION Value="true" Oper="OR">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Gefaellestrecke"]]></EXP>
+							</VALUECONDITION>
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Gefaellestrecke"]]></EXP>
+							</VALUECONDITION>
+							<GROUP Id="RDK:18740524" SubType="Then">
+								<CALLFUNCTION Id="RDK:18740523">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
+									</PAR>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$Param.Input]]></EXP>
+									</PAR>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$RückgabeListe]]></EXP>
+									</PAR>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
+							</GROUP>
+						</IFTHENELSE>
 					</CASEGROUP>
 					<CASEGROUP Id="RDK:18221764" CaseType="0">
 						<EXP><![CDATA[$C$Foerderer]]></EXP>
@@ -14544,7 +14583,6 @@ ShapeList["id="+Param.Input[1].shapeID].name
 					<GROUP Id="RDK:18732508" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
 						<VAR Id="RDK:18732500" Name="item_0" Type="Editor2DShapeType" />
 						<VAR Id="RDK:18732501" Name="item_1" Type="Editor2DShapeType" />
-						<VAR Id="RDK:18732502" Name="cpId" Type="string" />
 						<VAR Id="RDK:18732503" Name="cp_gefaellestrecke" Type="SSGConnectionPoint" />
 						<VAR Id="RDK:18732563" Name="streckenhoehe" Type="double" />
 						<VAR Id="RDK:18732504" Name="sto" Type="double" />
@@ -14562,54 +14600,31 @@ ShapeList["id="+Param.Input[1].shapeID].name
 					</SET>
 					<IFTHENELSE Id="RDK:18732533">
 						<VALUECONDITION Value="true">
-							<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Gefaellestrecke"]]></EXP>
+							<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Strecke"]]></EXP>
 						</VALUECONDITION>
 						<GROUP Id="RDK:18732521" SubType="Then">
 							<COMMENTS Id="RDK:18732511" DesignTimeRemark="//Gefällestrecke Index == 1" />
-							<SET Id="RDK:18732512" VarRef="cpId">
-								<EXP><![CDATA[$=$Param.Input[1].connectionPointID]]></EXP>
-								<PAR Name="AdvancedOptions" />
-							</SET>
-							<SET Id="RDK:18732513" VarRef="sto">
-								<EXP><![CDATA[$=$item_0.GefaellestreckeDefinition.HoeheOben]]></EXP>
-								<PAR Name="AdvancedOptions" />
-							</SET>
-							<SET Id="RDK:18732567" VarRef="stu">
-								<EXP><![CDATA[$=$item_0.GefaellestreckeDefinition.HoeheUnten]]></EXP>
-								<PAR Name="AdvancedOptions" />
-							</SET>
 							<SET Id="RDK:18732514" VarRef="cp_gefaellestrecke" DesignTimeNotes="ShapeList[&quot;id=&quot;+Param.Input[0].shapeID].connectionPoints[&quot;cpId=&quot;+cpId]">
 								<EXP><![CDATA[$=$FromJSON(ShapeList["id="+Param.Input[1].shapeID].connectionPoints)["cpId="+cpId]]]></EXP>
 								<PAR Name="AdvancedOptions" />
 							</SET>
 							<SET_STRUCT Id="RDK:18732515" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
 								<PAR Name="Key">
-									<EXP><![CDATA[$C$Label]]></EXP>
+									<EXP><![CDATA[$C$itemID]]></EXP>
 								</PAR>
 								<PAR Name="Str">
-									<EXP><![CDATA[$=$cp_gefaellestrecke.label]]></EXP>
+									<EXP><![CDATA[$=$Param.Input[1].shapeID]]]></EXP>
 								</PAR>
 								<PAR Name="Dbl" />
 								<PAR Name="Int" />
 								<PAR Name="Boo" />
 							</SET_STRUCT>
-							<SET_STRUCT Id="RDK:18732516" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$Hoehe]]></EXP>
-								</PAR>
-								<PAR Name="Str" />
-								<PAR Name="Dbl">
-									<EXP><![CDATA[$=$streckenhoehe]]></EXP>
-								</PAR>
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
 							<SET_STRUCT Id="RDK:18732517" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
 								<PAR Name="Key">
-									<EXP><![CDATA[$C$ShapeId]]></EXP>
+									<EXP><![CDATA[$C$cpId]]></EXP>
 								</PAR>
 								<PAR Name="Str">
-									<EXP><![CDATA[$=$item_1.id]]></EXP>
+									<EXP><![CDATA[$=$Param.Input[0].connectionPointID]]></EXP>
 								</PAR>
 								<PAR Name="Dbl" />
 								<PAR Name="Int" />
@@ -14617,7 +14632,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
 							</SET_STRUCT>
 							<CALLFUNCTION Id="RDK:18732518">
 								<PAR Name="FuncName">
-									<EXP><![CDATA[$C$SetStreckeHeight]]></EXP>
+									<EXP><![CDATA[$C$GetHeightOfItem]]></EXP>
 								</PAR>
 								<PAR Name="InputExp">
 									<EXP><![CDATA[$=$UebergabeListe]]></EXP>
@@ -14640,7 +14655,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
 							</SET>
 							<CALLFUNCTION Id="RDK:18732529">
 								<PAR Name="FuncName">
-									<EXP><![CDATA[$C$SetStreckeHeight]]></EXP>
+									<EXP><![CDATA[$C$GetHeightOfItem]]></EXP>
 								</PAR>
 								<PAR Name="InputExp">
 									<EXP><![CDATA[$=$UebergabeListe]]></EXP>
@@ -14666,6 +14681,88 @@ ShapeList["id="+Param.Input[1].shapeID].name
 					<PAR Name="AdvancedOptions" />
 				</SET>
 			</FUNCTION>
+			<FUNCTION Id="RDK:18741851" Name="GetHeightOfItem" InputTypeName="Editor2DEventArgumentsTypeList" ResultTypeName="SSGParameter[]">
+				<GROUP Id="RDK:18741873" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
+					<VAR Id="RDK:18741864" Name="item" Type="Editor2DShapeType" />
+					<VAR Id="RDK:18732502" Name="cpId" Type="string" />
+					<VAR Id="RDK:18741867" Name="cp_gefaellestrecke" Type="SSGConnectionPoint" />
+					<VAR Id="RDK:18741868" Name="hoehe" Type="double" />
+					<VAR Id="RDK:18741871" Name="jsonValues" Type="string" />
+					<VAR Id="RDK:18741872" Name="UebergabeListe" Type="SSGParameter[]" />
+					<VAR Id="RDK:18741950" Name="RueckgabeListe" Type="SSGParameter[]" />
+					<VAR Id="RDK:18741959" Name="hoehe_oben" Type="double" />
+					<VAR Id="RDK:18741961" Name="hoehe_unten" Type="double" />
+				</GROUP>
+				<SET Id="RDK:18741948" VarRef="item">
+					<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<SET Id="RDK:18741899" VarRef="cpId">
+					<EXP><![CDATA[$=$Param.Input[1].connectionPointID]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<SELECTCASE Id="RDK:18741918">
+					<EXP><![CDATA[$C$ShapeList["id="+Param.Input[0].shapeID].family]]></EXP>
+					<CASEGROUP Id="RDK:18741919" CaseType="0">
+						<EXP><![CDATA[$C$Kreisel]]></EXP>
+						<SET Id="RDK:18741946" VarRef="hoehe">
+							<EXP><![CDATA[$=$item.KreiselDefinition.Hoehe]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</CASEGROUP>
+					<CASEGROUP Id="RDK:18741924" CaseType="0">
+						<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+						<SET Id="RDK:18741952" VarRef="hoehe_oben">
+							<EXP><![CDATA[$=$item.GefaellestreckeDefinition.HoeheOben]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18741954" VarRef="hoehe_unten">
+							<EXP><![CDATA[$=$item.GefaellestreckeDefinition.HoeheUnten]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</CASEGROUP>
+					<CASEGROUP Id="RDK:18741926" CaseType="0">
+						<EXP><![CDATA[$C$Foerderer]]></EXP>
+						<SET Id="RDK:18741963" VarRef="hoehe_oben">
+							<EXP><![CDATA[$=$item.FoerdererDefinition.HoeheOben]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18741965" VarRef="hoehe_unten">
+							<EXP><![CDATA[$=$item.FoerdererDefinition.HoeheUnten]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</CASEGROUP>
+					<CASEGROUP Id="RDK:18741920" CaseType="1">
+						<EXP />
+						<ACTION_CALL Id="RDK:18741966" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
+							<PAR Name="RDLibraryName">
+								<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
+							</PAR>
+							<PAR Name="MsgText">
+								<EXP><![CDATA[$C$das auslesende höhe ist nicht implementiert]]></EXP>
+							</PAR>
+							<PAR Name="MsgStyle" />
+							<PAR Name="BtnLayout" />
+							<PAR Name="MsgCaption" />
+							<PAR Name="BaloonType" />
+							<PAR Name="BtnPressed">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+						</ACTION_CALL>
+					</CASEGROUP>
+				</SELECTCASE>
+				<SET_STRUCT Id="RDK:18741938" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
+					<PAR Name="Key">
+						<EXP><![CDATA[$C$Hoehe]]></EXP>
+					</PAR>
+					<PAR Name="Str" />
+					<PAR Name="Dbl">
+						<EXP><![CDATA[$=$hoehe]]></EXP>
+					</PAR>
+					<PAR Name="Int" />
+					<PAR Name="Boo" />
+				</SET_STRUCT>
+			</FUNCTION>
 			<FUNCTION Id="RDK:18598214" Name="InitSystemLimits">
 				<GROUP Id="RDK:18598216" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:18598117" Name="jsonfilepath" Type="string">