From fb1c073150a3d0906eb7c67c7027123b214be144 Mon Sep 17 00:00:00 2001
From: Simon Schmutzler <s.schmutzler@schoenenberger.de>
Date: Fri, 1 Mar 2024 14:38:56 +0100
Subject: [PATCH] =?UTF-8?q?F=C3=B6rderer=20berechnung=20bei=20Verbindung?=
 =?UTF-8?q?=20von=20Kreisel=20und=20F=C3=B6rderern=20mit=20H=C3=B6hen?=
 =?UTF-8?q?=C3=BCbergabe?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 MAIN_SSG.rdx | 701 ++++++++++++++++++++++++++++++++++++++++++++-------
 1 file changed, 615 insertions(+), 86 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index ef700b3..a33d612 100644
--- a/MAIN_SSG.rdx
+++ b/MAIN_SSG.rdx
@@ -1,10 +1,10 @@
 <?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="m.stangl [ENTW-NB08]" ModDate="2024-02-27T15:52:50" LanguageVersion="2014.1.3.615" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-03-01T14:20:06" LanguageVersion="2014.1.3.627" />
 	<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">
-				<TYPE Id="RDK:313478" Name="SSGConnectionPoint" SubType="structure" HasArrayType="True">
+				<TYPE Id="RDK:313478" Name="SSGConnectionPoint" Expanded="True" SubType="structure" HasArrayType="True">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:609117" Name="id" Type="string" />
 					<FIELD Id="RDK:313462" Name="x_M" Type="double" />
@@ -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" SubType="structure">
+				<TYPE Id="RDK:26388" Name="KreiselType" Expanded="True" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:95024" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:26389" Name="AbstandMS" Type="double" />
@@ -54,7 +54,6 @@
 					<TYPE_VALUES />
 					<FIELD Id="RDK:302571" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:880709" Name="L1" Type="double" />
-					<FIELD Id="RDK:18320801" Name="L_th" Type="double" />
 					<FIELD Id="RDK:302584" Name="winkel" Type="integer" />
 					<FIELD Id="RDK:302573" Name="HoeheOben" Type="double" />
 					<FIELD Id="RDK:302583" Name="HoeheUnten" Type="double" />
@@ -724,7 +723,7 @@
 					<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: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" />
@@ -924,10 +923,9 @@
 			<VAR Id="RDK:1712885" Name="gefaellestrecke" Type="Editor2DShapeType" DesignTimeRemark="Generated by RD" />
 			<VAR Id="RDK:18115984" Name="foerderer" Type="Editor2DShapeType" />
 			<VAR Id="RDK:1732132" Name="label" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
-			<VAR Id="RDK:1745170" Name="Var2" Type="variant" DesignTimeRemark="Generated by RD" />
 			<VAR Id="RDK:1759312" Name="cp_label" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
 			<VAR Id="RDK:1783790" Name="stringList" Type="string" DesignTimeRemark="Generated by RD" />
-			<VAR Id="RDK:18295767" Name="L_s" Type="string" DesignTimeRemark="Generated by RD" />
+			<VAR Id="RDK:18295767" Name="L_s" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
 		</GROUP>
 		<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
 			<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -5519,7 +5517,6 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 						<VAR Id="RDK:18150246" Name="HoeheOben" Type="double" DesignTimeRemark="Höhe am oberen Anschlusspunkt" />
 						<VAR Id="RDK:18150248" Name="HoeheUnten" Type="double" DesignTimeRemark="Höhe am unteren Anschlusspunkt" />
 					</GROUP>
-					<COMMENTS Id="RDK:18146464" DesignTimeRemark="Shape_Prototype.FoerdererDefinition.L1" />
 					<SET Id="RDK:18150201" VarRef="winkel_s">
 						<EXP><![CDATA[$=$Shape_Prototype.FoerdererDefinition.winkel_s]]></EXP>
 						<PAR Name="AdvancedOptions" />
@@ -6139,6 +6136,268 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 						</GROUP>
 					</IFTHENELSE>
 				</FUNCTION>
+				<FUNCTION Id="RDK:18462370" Name="Calculate Foerderer Data" InputTypeName="string" ResultTypeName="SSGParameter[]">
+					<GROUP Id="RDK:18462326" Name="Local Variables" SubType="VarSet" IncludeDate="0">
+						<VAR Id="RDK:18462319" Name="shape_item" Type="Editor2DShapeType" />
+						<VAR Id="RDK:18462320" Name="x_verhaeltnis" Type="double" DesignTimeRemark="Verhältnis von Förderstrecke und Gesamtlänge" />
+						<VAR Id="RDK:18462321" Name="winkel_f" Type="double" DesignTimeRemark="Winkel von Förderstrecke" />
+						<VAR Id="RDK:18462322" Name="winkel_s" Type="double" DesignTimeRemark="Winkel von Gefällestrecke" />
+						<VAR Id="RDK:18462323" Name="L1" Type="double" DesignTimeRemark="Gesamtlänge" />
+						<VAR Id="RDK:18462324" Name="HoeheOben" Type="double" DesignTimeRemark="Höhe am oberen Anschlusspunkt" />
+						<VAR Id="RDK:18462325" Name="HoeheUnten" Type="double" DesignTimeRemark="Höhe am unteren Anschlusspunkt" />
+						<VAR Id="RDK:18474052" Name="RueckgabeListe" Type="SSGParameter[]" />
+					</GROUP>
+					<IFTHENELSE Id="RDK:18462329">
+						<VALUECONDITION Value="true">
+							<EXP><![CDATA[$=$IsEmpty(Param.Input)]]></EXP>
+						</VALUECONDITION>
+						<GROUP Id="RDK:18462328" SubType="Then">
+							<SET Id="RDK:18474082" VarRef="Param.Result">
+								<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+							<EXIT_PROCESS Id="RDK:18462327" BreakType="4" ExitStatus="0" />
+						</GROUP>
+					</IFTHENELSE>
+					<SET Id="RDK:18462330" VarRef="shape_item">
+						<EXP><![CDATA[$=$ShapeList["id="+Param.Input]]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<SET Id="RDK:18462331" VarRef="winkel_s">
+						<EXP><![CDATA[$=$shape_item.FoerdererDefinition.winkel_s]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<SET Id="RDK:18462332" VarRef="winkel_f">
+						<EXP><![CDATA[$=$shape_item.FoerdererDefinition.winkel_f]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<SET Id="RDK:18462333" VarRef="L1">
+						<EXP><![CDATA[$=$shape_item.FoerdererDefinition.L1]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<SET Id="RDK:18462334" VarRef="HoeheOben">
+						<EXP><![CDATA[$=$shape_item.FoerdererDefinition.HoeheOben]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<SET Id="RDK:18462335" VarRef="HoeheUnten">
+						<EXP><![CDATA[$=$shape_item.FoerdererDefinition.HoeheUnten]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<IFTHENELSE Id="RDK:18462338">
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$IsEmpty(HoeheOben)]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true">
+							<EXP><![CDATA[$=$IsEmpty(HoeheUnten)]]></EXP>
+						</VALUECONDITION>
+						<GROUP Id="RDK:18462337" SubType="Then">
+							<SET Id="RDK:18474080" VarRef="Param.Result">
+								<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+							<EXIT_PROCESS Id="RDK:18462336" BreakType="4" ExitStatus="0" />
+						</GROUP>
+					</IFTHENELSE>
+					<IFTHENELSE Id="RDK:18462369">
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$winkel_s < -89]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$winkel_s > 89]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$winkel_f < -89]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$winkel_f > 89]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$L1 < 0]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true" Oper="OR">
+							<EXP><![CDATA[$=$IsEmpty(HoeheOben)]]></EXP>
+						</VALUECONDITION>
+						<VALUECONDITION Value="true">
+							<EXP><![CDATA[$=$IsEmpty(HoeheUnten)]]></EXP>
+						</VALUECONDITION>
+						<GROUP Id="RDK:18462341" SubType="Then">
+							<ACTION_CALL Id="RDK:18462339" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
+								<PAR Name="RDLibraryName">
+									<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
+								</PAR>
+								<PAR Name="MsgText">
+									<EXP><![CDATA[$C$Die Winkel dürfen 90 Grad nicht überschreiten und die Gesamtlänge des Elements muss positiv sein.]]></EXP>
+								</PAR>
+								<PAR Name="MsgStyle" />
+								<PAR Name="BtnLayout" />
+								<PAR Name="MsgCaption" />
+								<PAR Name="BaloonType" />
+								<PAR Name="BtnPressed">
+									<EXP><![CDATA[$V$]]></EXP>
+								</PAR>
+							</ACTION_CALL>
+							<SET Id="RDK:18474078" VarRef="Param.Result">
+								<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+							<EXIT_PROCESS Id="RDK:18462340" BreakType="4" ExitStatus="0" />
+						</GROUP>
+						<GROUP Id="RDK:18462368" SubType="Else">
+							<SET Id="RDK:18462342" VarRef="x_verhaeltnis">
+								<EXP><![CDATA[$=$(Tan(DegToRad(winkel_f))+Tan(DegToRad(winkel_s)))/((HoeheOben-HoeheUnten)/L1+Tan(DegToRad(winkel_s)))]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+							<IFTHENELSE Id="RDK:18462367">
+								<VALUECONDITION Value="true">
+									<EXP><![CDATA[$=$x_verhaeltnis > 1]]></EXP>
+								</VALUECONDITION>
+								<GROUP Id="RDK:18462356" SubType="Then">
+									<SET_STRUCT Id="RDK:18474064" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$Delta_hf]]></EXP>
+										</PAR>
+										<PAR Name="Str" />
+										<PAR Name="Dbl">
+											<EXP><![CDATA[$=$Round(Tan(DegToRad(winkel_f))*L1/x_verhaeltnis, 2)]]></EXP>
+										</PAR>
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474066" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$Delta_hs]]></EXP>
+										</PAR>
+										<PAR Name="Str" />
+										<PAR Name="Dbl">
+											<EXP><![CDATA[$=$Round(Tan(DegToRad(winkel_s))*L1*(x_verhaeltnis-1)/x_verhaeltnis, 2)]]></EXP>
+										</PAR>
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474068" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$L_s]]></EXP>
+										</PAR>
+										<PAR Name="Str" />
+										<PAR Name="Dbl">
+											<EXP><![CDATA[$=$Round(L1-L1/x_verhaeltnis, 2)]]></EXP>
+										</PAR>
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474070" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$L_f]]></EXP>
+										</PAR>
+										<PAR Name="Str" />
+										<PAR Name="Dbl">
+											<EXP><![CDATA[$=$Round(L1/x_verhaeltnis, 2)]]></EXP>
+										</PAR>
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474072" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$Delta_h]]></EXP>
+										</PAR>
+										<PAR Name="Str" />
+										<PAR Name="Dbl">
+											<EXP><![CDATA[$=$HoeheOben-HoeheUnten]]></EXP>
+										</PAR>
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET Id="RDK:18474076" VarRef="Param.Result">
+										<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
+										<PAR Name="AdvancedOptions" />
+									</SET>
+									<EXIT_PROCESS Id="RDK:18481557" BreakType="4" ExitStatus="0" />
+								</GROUP>
+								<GROUP Id="RDK:18462366" SubType="Else">
+									<ACTION_CALL Id="RDK:18462357" Name="RDEngineering_MsgBox" Suppressed="True" DesignTimeRemark="{Text}">
+										<PAR Name="RDLibraryName">
+											<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
+										</PAR>
+										<PAR Name="MsgText">
+											<EXP><![CDATA[$C$Das Verhältnis Förderlänge und Höhendifferenz ist zu groß]]></EXP>
+										</PAR>
+										<PAR Name="MsgStyle">
+											<EXP><![CDATA[$C$-1]]></EXP>
+										</PAR>
+										<PAR Name="BtnLayout">
+											<EXP><![CDATA[$C$-1]]></EXP>
+										</PAR>
+										<PAR Name="MsgCaption" />
+										<PAR Name="BaloonType" />
+										<PAR Name="BtnPressed">
+											<EXP><![CDATA[$V$]]></EXP>
+										</PAR>
+									</ACTION_CALL>
+									<SET_STRUCT Id="RDK:18474054" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$Delta_hf]]></EXP>
+										</PAR>
+										<PAR Name="Str">
+											<EXP><![CDATA[$=$]]></EXP>
+										</PAR>
+										<PAR Name="Dbl" />
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474056" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$Delta_hs]]></EXP>
+										</PAR>
+										<PAR Name="Str">
+											<EXP><![CDATA[$=$]]></EXP>
+										</PAR>
+										<PAR Name="Dbl" />
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474058" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$L_s]]></EXP>
+										</PAR>
+										<PAR Name="Str">
+											<EXP><![CDATA[$=$]]></EXP>
+										</PAR>
+										<PAR Name="Dbl" />
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474062" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$L_f]]></EXP>
+										</PAR>
+										<PAR Name="Str">
+											<EXP><![CDATA[$=$]]></EXP>
+										</PAR>
+										<PAR Name="Dbl" />
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:18474060" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
+										<PAR Name="Key">
+											<EXP><![CDATA[$C$Delta_h]]></EXP>
+										</PAR>
+										<PAR Name="Str" />
+										<PAR Name="Dbl">
+											<EXP><![CDATA[$=$HoeheOben-HoeheUnten]]></EXP>
+										</PAR>
+										<PAR Name="Int" />
+										<PAR Name="Boo" />
+									</SET_STRUCT>
+									<SET Id="RDK:18474074" VarRef="Param.Result">
+										<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
+										<PAR Name="AdvancedOptions" />
+									</SET>
+									<EXIT_PROCESS Id="RDK:18481559" BreakType="4" ExitStatus="0" />
+								</GROUP>
+							</IFTHENELSE>
+						</GROUP>
+					</IFTHENELSE>
+				</FUNCTION>
 				<FUNCTION Id="RDK:1653110" Name="CreatePrototype_BTMTBeladung">
 					<GROUP Id="RDK:1653106" Name="Local Variables" SubType="VarSet" IncludeDate="0" />
 					<COMMENTS Id="RDK:1653107" DesignTimeRemark="Angle definition in GS2D" DesignTimeNotes="           0&#xD;&#xA;            |&#xD;&#xA;270 &lt;-------&gt;90&#xD;&#xA;            |&#xD;&#xA;          180&#xD;&#xA;" />
@@ -11126,7 +11385,7 @@ me.x
 							</PAR>
 							<PAR Name="Options" />
 						</CALLFUNCTION>
-						<IFTHENELSE Id="RDK:18397858">
+						<IFTHENELSE Id="RDK:18397858" Suppressed="True">
 							<VALUECONDITION Value="false">
 								<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
 							</VALUECONDITION>
@@ -11149,6 +11408,109 @@ me.x
 								</CALLFUNCTION>
 							</GROUP>
 						</IFTHENELSE>
+						<IFTHENELSE Id="RDK:18466094">
+							<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:18466091" SubType="Then">
+								<IFTHENELSE Id="RDK:18503552">
+									<VALUECONDITION Value="true">
+										<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Foerderer"]]></EXP>
+									</VALUECONDITION>
+									<GROUP Id="RDK:18503553" SubType="Then">
+										<CALLFUNCTION Id="RDK:18474084">
+											<PAR Name="FuncName">
+												<EXP><![CDATA[$C$Calculate Foerderer Data]]></EXP>
+											</PAR>
+											<PAR Name="InputExp">
+												<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
+											</PAR>
+											<PAR Name="ResultRef">
+												<EXP><![CDATA[$V$RückgabeListe]]></EXP>
+											</PAR>
+											<PAR Name="Options" />
+										</CALLFUNCTION>
+										<IFTHENELSE Id="RDK:18479093">
+											<VALUECONDITION Value="false">
+												<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
+											</VALUECONDITION>
+											<GROUP Id="RDK:18479094" SubType="Then">
+												<SET_STRUCT Id="RDK:18479090" VarRef="SSGParameter" ClearAll="True" ListRef="RückgabeListe">
+													<PAR Name="Key">
+														<EXP><![CDATA[$C$shapeID]]></EXP>
+													</PAR>
+													<PAR Name="Str">
+														<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
+													</PAR>
+													<PAR Name="Dbl" />
+													<PAR Name="Int" />
+													<PAR Name="Boo" />
+												</SET_STRUCT>
+												<CALLFUNCTION Id="RDK:18474195">
+													<PAR Name="FuncName">
+														<EXP><![CDATA[$C$WriteShapeDataFoerderer]]></EXP>
+													</PAR>
+													<PAR Name="InputExp">
+														<EXP><![CDATA[$=$RückgabeListe]]></EXP>
+													</PAR>
+													<PAR Name="ResultRef">
+														<EXP><![CDATA[$V$]]></EXP>
+													</PAR>
+													<PAR Name="Options" />
+												</CALLFUNCTION>
+											</GROUP>
+										</IFTHENELSE>
+									</GROUP>
+									<GROUP Id="RDK:18503554" SubType="Else">
+										<CALLFUNCTION Id="RDK:18474199">
+											<PAR Name="FuncName">
+												<EXP><![CDATA[$C$Calculate Foerderer Data]]></EXP>
+											</PAR>
+											<PAR Name="InputExp">
+												<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
+											</PAR>
+											<PAR Name="ResultRef">
+												<EXP><![CDATA[$V$RückgabeListe]]></EXP>
+											</PAR>
+											<PAR Name="Options" />
+										</CALLFUNCTION>
+										<IFTHENELSE Id="RDK:18479111">
+											<VALUECONDITION Value="false">
+												<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
+											</VALUECONDITION>
+											<GROUP Id="RDK:18479110" SubType="Then">
+												<SET_STRUCT Id="RDK:18479108" VarRef="SSGParameter" ClearAll="True" ListRef="RückgabeListe">
+													<PAR Name="Key">
+														<EXP><![CDATA[$C$shapeID]]></EXP>
+													</PAR>
+													<PAR Name="Str">
+														<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
+													</PAR>
+													<PAR Name="Dbl" />
+													<PAR Name="Int" />
+													<PAR Name="Boo" />
+												</SET_STRUCT>
+												<CALLFUNCTION Id="RDK:18479109">
+													<PAR Name="FuncName">
+														<EXP><![CDATA[$C$WriteShapeDataFoerderer]]></EXP>
+													</PAR>
+													<PAR Name="InputExp">
+														<EXP><![CDATA[$=$RückgabeListe]]></EXP>
+													</PAR>
+													<PAR Name="ResultRef">
+														<EXP><![CDATA[$V$]]></EXP>
+													</PAR>
+													<PAR Name="Options" />
+												</CALLFUNCTION>
+											</GROUP>
+										</IFTHENELSE>
+									</GROUP>
+								</IFTHENELSE>
+							</GROUP>
+						</IFTHENELSE>
 					</CASEGROUP>
 					<CASEGROUP Id="RDK:1576710" CaseType="0">
 						<EXP><![CDATA[$C$Eckrad]]></EXP>
@@ -11327,7 +11689,7 @@ me.x
 									<EXP><![CDATA[$=$RückgabeListe["key=ShapeId"].Str]]></EXP>
 									<PAR Name="AdvancedOptions" />
 								</SET>
-								<CALLFUNCTION Id="RDK:18399137">
+								<CALLFUNCTION Id="RDK:18399137" Suppressed="True">
 									<PAR Name="FuncName">
 										<EXP><![CDATA[$C$CalcGFTheoretischeLänge]]></EXP>
 									</PAR>
@@ -11368,6 +11730,99 @@ me.x
 							</PAR>
 							<PAR Name="Options" />
 						</CALLFUNCTION>
+						<IFTHENELSE Id="RDK:18462393">
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Foerderer"]]></EXP>
+							</VALUECONDITION>
+							<GROUP Id="RDK:18462394" SubType="Then">
+								<CALLFUNCTION Id="RDK:18503573">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$Calculate Foerderer Data]]></EXP>
+									</PAR>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
+									</PAR>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$RückgabeListe]]></EXP>
+									</PAR>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
+								<IFTHENELSE Id="RDK:18503589">
+									<VALUECONDITION Value="false">
+										<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
+									</VALUECONDITION>
+									<GROUP Id="RDK:18503588" SubType="Then">
+										<SET_STRUCT Id="RDK:18503586" VarRef="SSGParameter" ClearAll="True" ListRef="RückgabeListe">
+											<PAR Name="Key">
+												<EXP><![CDATA[$C$shapeID]]></EXP>
+											</PAR>
+											<PAR Name="Str">
+												<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
+											</PAR>
+											<PAR Name="Dbl" />
+											<PAR Name="Int" />
+											<PAR Name="Boo" />
+										</SET_STRUCT>
+										<CALLFUNCTION Id="RDK:18503587">
+											<PAR Name="FuncName">
+												<EXP><![CDATA[$C$WriteShapeDataFoerderer]]></EXP>
+											</PAR>
+											<PAR Name="InputExp">
+												<EXP><![CDATA[$=$RückgabeListe]]></EXP>
+											</PAR>
+											<PAR Name="ResultRef">
+												<EXP><![CDATA[$V$]]></EXP>
+											</PAR>
+											<PAR Name="Options" />
+										</CALLFUNCTION>
+									</GROUP>
+								</IFTHENELSE>
+							</GROUP>
+							<GROUP Id="RDK:18462395" SubType="Else">
+								<CALLFUNCTION Id="RDK:18503593">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$Calculate Foerderer Data]]></EXP>
+									</PAR>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
+									</PAR>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$RückgabeListe]]></EXP>
+									</PAR>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
+								<IFTHENELSE Id="RDK:18503603">
+									<VALUECONDITION Value="false">
+										<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
+									</VALUECONDITION>
+									<GROUP Id="RDK:18503602" SubType="Then">
+										<SET_STRUCT Id="RDK:18503600" VarRef="SSGParameter" ClearAll="True" ListRef="RückgabeListe">
+											<PAR Name="Key">
+												<EXP><![CDATA[$C$shapeID]]></EXP>
+											</PAR>
+											<PAR Name="Str">
+												<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
+											</PAR>
+											<PAR Name="Dbl" />
+											<PAR Name="Int" />
+											<PAR Name="Boo" />
+										</SET_STRUCT>
+										<CALLFUNCTION Id="RDK:18503601">
+											<PAR Name="FuncName">
+												<EXP><![CDATA[$C$WriteShapeDataFoerderer]]></EXP>
+											</PAR>
+											<PAR Name="InputExp">
+												<EXP><![CDATA[$=$RückgabeListe]]></EXP>
+											</PAR>
+											<PAR Name="ResultRef">
+												<EXP><![CDATA[$V$]]></EXP>
+											</PAR>
+											<PAR Name="Options" />
+										</CALLFUNCTION>
+									</GROUP>
+								</IFTHENELSE>
+							</GROUP>
+						</IFTHENELSE>
 					</CASEGROUP>
 					<CASEGROUP Id="RDK:1653223" CaseType="0">
 						<EXP><![CDATA[$C$BTMTBeladung]]></EXP>
@@ -11485,6 +11940,126 @@ me.x
 			<FUNCTION Id="RDK:302" Name="OnEditor2DRedo" Options="(TYPEFUNCTION)" />
 			<FUNCTION Id="RDK:529790" Name="OnEditor2DEditConnectionPoints" InputTypeName="Editor2DShapeType" Options="(TYPEFUNCTION)" />
 			<FUNCTION Id="RDK:529791" Name="OnEditor2DCreateCategory" Options="(TYPEFUNCTION)" />
+			<FUNCTION Id="RDK:18474112" Name="WriteShapeDataFoerderer" InputTypeName="SSGParameter[]">
+				<GROUP Id="RDK:18474116" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
+					<VAR Id="RDK:18474115" Name="ÜbergabeListe" Type="SSGParameter[]" />
+					<VAR Id="RDK:18474151" Name="shape_id" Type="string" />
+					<VAR Id="RDK:18474166" Name="ind" Type="integer" />
+					<VAR Id="RDK:18474167" Name="shape_item" Type="Editor2DShapeType" />
+				</GROUP>
+				<SET Id="RDK:18474121" VarRef="ÜbergabeListe">
+					<EXP><![CDATA[$=$Param.Input]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<IFTHENELSE Id="RDK:18474143">
+					<VALUECONDITION Value="false">
+						<EXP><![CDATA[$=$IsEmpty(ÜbergabeListe)]]></EXP>
+					</VALUECONDITION>
+					<GROUP Id="RDK:18474142" SubType="Then">
+						<SET Id="RDK:18474140" VarRef="shape_id">
+							<EXP><![CDATA[$=$ÜbergabeListe["key=shapeID"].Str]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18474171" VarRef="shape_item">
+							<EXP><![CDATA[$=$ShapeList["id=" + shape_id]]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18474186" VarRef="shape_item.FoerdererDefinition.L_s">
+							<EXP><![CDATA[$=$Param.Input["key=L_s"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18474188" VarRef="shape_item.FoerdererDefinition.L_f">
+							<EXP><![CDATA[$=$Param.Input["key=L_f"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18474190" VarRef="shape_item.FoerdererDefinition.Delta_hs">
+							<EXP><![CDATA[$=$Param.Input["key=Delta_hs"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18474194" VarRef="shape_item.FoerdererDefinition.Delta_hf">
+							<EXP><![CDATA[$=$Param.Input["key=Delta_hf"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:18474192" VarRef="shape_item.FoerdererDefinition.Delta_h">
+							<EXP><![CDATA[$=$Param.Input["key=Delta_h"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<GROUP Id="RDK:18474160" Name="Write Properties" SubType="Generic">
+							<SET Id="RDK:18474158" VarRef="ind">
+								<EXP><![CDATA[$=$IndexOfByFieldValue(ShapeList, "id", shape_item.id)]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+							<SET_STRUCT Id="RDK:18474159" VarRef="Shape_Prototype" ListRef="ShapeList" Options="$=$&quot;(REPLACEIDX=&quot;+i+&quot;)&quot;" DesignTimeNotes="Tan(winkel_f)*L1*x_verhaeltnis">
+								<PAR Name="SivasNummer" />
+								<PAR Name="Rotationsklasse" />
+								<PAR Name="IDCounter" />
+								<PAR Name="KreiselDefinition" />
+								<PAR Name="EckradDefinition" />
+								<PAR Name="GefaelleDefinition" />
+								<PAR Name="FoerdererDefinition">
+									<EXP><![CDATA[$=$shape_item.FoerdererDefinition]]></EXP>
+								</PAR>
+								<PAR Name="WeicheDefinition" />
+								<PAR Name="BTMTBeladungDefinition" />
+								<PAR Name="BTMTEntladungDefinition" />
+								<PAR Name="source">
+									<EXP><![CDATA[$=$shape_item.source]]></EXP>
+								</PAR>
+								<PAR Name="sourceLibrary">
+									<EXP><![CDATA[$=$GS2DLibraryName]]></EXP>
+								</PAR>
+								<PAR Name="signature" />
+								<PAR Name="id">
+									<EXP><![CDATA[$=$shape_item.id]]></EXP>
+								</PAR>
+								<PAR Name="name" />
+								<PAR Name="family" />
+								<PAR Name="description" />
+								<PAR Name="x" />
+								<PAR Name="y" />
+								<PAR Name="z" />
+								<PAR Name="width" />
+								<PAR Name="height" />
+								<PAR Name="depth" />
+								<PAR Name="rotation" />
+								<PAR Name="text" />
+								<PAR Name="behaviour" />
+								<PAR Name="datadump" />
+								<PAR Name="path" />
+								<PAR Name="ctrl1x" />
+								<PAR Name="ctrl1y" />
+								<PAR Name="ctrl2x" />
+								<PAR Name="ctrl2y" />
+								<PAR Name="shapeFromId" />
+								<PAR Name="shapeFromPointIndex" />
+								<PAR Name="shapeToId" />
+								<PAR Name="shapeToPointIndex" />
+								<PAR Name="dimStack" />
+								<PAR Name="dimType" />
+								<PAR Name="dimDriving" />
+								<PAR Name="dimValue" />
+								<PAR Name="color" />
+								<PAR Name="colorOpacity" />
+								<PAR Name="color3D" />
+								<PAR Name="colorOpacity3D" />
+								<PAR Name="lineWidth" />
+								<PAR Name="lineColor" />
+								<PAR Name="lineOpacity" />
+								<PAR Name="lineColor3D" />
+								<PAR Name="lineOpacity3D" />
+								<PAR Name="links" />
+								<PAR Name="group" />
+								<PAR Name="layer" />
+								<PAR Name="connectionPoints" />
+								<PAR Name="modified" />
+								<PAR Name="pinned" />
+								<PAR Name="selected" />
+								<PAR Name="includeInBOM" />
+							</SET_STRUCT>
+						</GROUP>
+					</GROUP>
+				</IFTHENELSE>
+			</FUNCTION>
 			<FUNCTION Id="RDK:1516909" Name="CSVExport" Bookmarked="True">
 				<GROUP Id="RDK:1516850" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 					<GROUP Id="RDK:1516849" Name="CSV Export" SubType="VarSet" IncludeDate="0">
@@ -12254,9 +12829,9 @@ ShapeList["id="+Param.Input[1].shapeID].name
 					</GROUP>
 				</IFTHENELSE>
 			</FUNCTION>
-			<FUNCTION Id="RDK:18326311" Name="CalcGFTheoretischeLänge" InputTypeName="string">
+			<FUNCTION Id="RDK:18326311" Name="CalcGFTheoretischeLänge" Suppressed="True" InputTypeName="string">
 				<GROUP Id="RDK:18329391" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
-					<VAR Id="RDK:18329384" Name="L_th" Type="double" />
+					<VAR Id="RDK:18329384" Name="L_f" Type="double" />
 					<VAR Id="RDK:18376628" Name="shape_item" Type="Editor2DShapeType" />
 				</GROUP>
 				<IFTHENELSE Id="RDK:18396608">
@@ -12274,54 +12849,60 @@ ShapeList["id="+Param.Input[1].shapeID].name
 				</SET>
 				<IFTHENELSE Id="RDK:18330617">
 					<VALUECONDITION Value="true" Oper="OR">
-						<EXP><![CDATA[$=$IsEmpty(shape_item.GefaelleDefinition.HoeheOben)]]></EXP>
+						<EXP><![CDATA[$=$IsEmpty(shape_item.FoerdererDefinition.HoeheOben)]]></EXP>
 					</VALUECONDITION>
 					<VALUECONDITION Value="true" Oper="OR">
-						<EXP><![CDATA[$=$IsEmpty(shape_item.GefaelleDefinition.HoeheUnten)]]></EXP>
+						<EXP><![CDATA[$=$IsEmpty(shape_item.FoerdererDefinition.HoeheUnten)]]></EXP>
+					</VALUECONDITION>
+					<VALUECONDITION Value="true" Oper="OR">
+						<EXP><![CDATA[$=$Abs(shape_item.FoerdererDefinition.winkel_f) < 0.0001]]></EXP>
 					</VALUECONDITION>
 					<VALUECONDITION Value="false">
-						<EXP><![CDATA[$=$shape_item.family = "Gefaellestrecke"]]></EXP>
+						<EXP><![CDATA[$=$shape_item.family = "Foerderer"]]></EXP>
 					</VALUECONDITION>
 					<GROUP Id="RDK:18330618" SubType="Then">
 						<EXIT_PROCESS Id="RDK:18330627" BreakType="4" ExitStatus="0" />
 					</GROUP>
 					<GROUP Id="RDK:18330619" SubType="Else">
-						<SET Id="RDK:18330638" VarRef="L_th">
-							<EXP><![CDATA[$=$(shape_item.GefaelleDefinition.HoeheOben-shape_item.GefaelleDefinition.HoeheUnten)/Tan(DegToRad(shape_item.GefaelleDefinition.winkel))]]></EXP>
+						<SET Id="RDK:18330638" VarRef="L_f">
+							<EXP><![CDATA[$=$(shape_item.FoerdererDefinition.HoeheOben-shape_item.FoerdererDefinition.HoeheUnten)/Tan(DegToRad(shape_item.FoerdererDefinition.winkel_f))]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
-						<SET Id="RDK:18330639" VarRef="ShapeList[&quot;id=&quot;+Param.Input].GefaelleDefinition.L_th">
-							<EXP><![CDATA[$=$Round(L_th, 0)]]></EXP>
+						<SET Id="RDK:18330639" VarRef="ShapeList[&quot;id=&quot;+Param.Input].FoerdererDefinition.L_f">
+							<EXP><![CDATA[$=$Round(L_f, 0)]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</GROUP>
 				</IFTHENELSE>
 			</FUNCTION>
-			<FUNCTION Id="RDK:18376615" Name="CalcGFTheoretischeLänge_Prototype" InputTypeName="string">
+			<FUNCTION Id="RDK:18376615" Name="CalcGFTheoretischeLänge_Prototype" Suppressed="True" InputTypeName="string">
 				<GROUP Id="RDK:18376607" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
-					<VAR Id="RDK:18376606" Name="L_th" Type="double" />
+					<VAR Id="RDK:18376606" Name="L_f" Type="double" />
 				</GROUP>
 				<COMMENTS Id="RDK:18376608" DesignTimeRemark="Param.Input" />
 				<IFTHENELSE Id="RDK:18376614">
-					<VALUECONDITION Value="true" Oper="OR">
-						<EXP><![CDATA[$=$IsEmpty(Shape_Prototype.GefaelleDefinition.HoeheOben)]]></EXP>
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$IsEmpty(shape_item.FoerdererDefinition.HoeheOben)]]></EXP>
 					</VALUECONDITION>
-					<VALUECONDITION Value="true" Oper="OR">
-						<EXP><![CDATA[$=$IsEmpty(Shape_Prototype.GefaelleDefinition.HoeheUnten)]]></EXP>
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$IsEmpty(shape_item.FoerdererDefinition.HoeheUnten)]]></EXP>
 					</VALUECONDITION>
-					<VALUECONDITION Value="false">
-						<EXP><![CDATA[$=$Shape_Prototype.family = "Gefaellestrecke"]]></EXP>
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$Abs(shape_item.FoerdererDefinition.winkel_f) < 0.0001]]></EXP>
+					</VALUECONDITION>
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$shape_item.family = "Foerderer"]]></EXP>
 					</VALUECONDITION>
 					<GROUP Id="RDK:18376610" SubType="Then">
 						<EXIT_PROCESS Id="RDK:18376609" BreakType="4" ExitStatus="0" />
 					</GROUP>
 					<GROUP Id="RDK:18376613" SubType="Else">
-						<SET Id="RDK:18376611" VarRef="L_th">
-							<EXP><![CDATA[$=$(Shape_Prototype.GefaelleDefinition.HoeheOben-Shape_Prototype.GefaelleDefinition.HoeheUnten)/Tan(DegToRad(Shape_Prototype.GefaelleDefinition.winkel))]]></EXP>
+						<SET Id="RDK:18376611" VarRef="L_f">
+							<EXP><![CDATA[$=$(Shape_Prototype.FoerdererDefinition.HoeheOben-Shape_Prototype.FoerdererDefinition.HoeheUnten)/Tan(DegToRad(Shape_Prototype.FoerdererDefinition.winkel_f))]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
-						<SET Id="RDK:18376612" VarRef="Shape_Prototype.GefaelleDefinition.L_th">
-							<EXP><![CDATA[$=$Round(L_th, 0)]]></EXP>
+						<SET Id="RDK:18376612" VarRef="Shape_Prototype.FoerdererDefinition.L_f">
+							<EXP><![CDATA[$=$Round(L_f, 0)]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</GROUP>
@@ -12524,6 +13105,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
 						<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
 						<PAR Name="AdvancedOptions" />
 					</SET>
+					<EXIT_PROCESS Id="RDK:18435232" BreakType="4" ExitStatus="0" />
 				</GROUP>
 				<GROUP Id="RDK:18396546" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:18396545" Name="RueckgabeListe" Type="SSGParameter[]" />
@@ -14676,59 +15258,6 @@ ShapeList["id="+Param.Input[1].shapeID].name
 							<PAR Name="DataSource" />
 							<PAR Name="Options" />
 						</ACTION_CALL>
-						<ACTION_CALL Id="RDK:18320798" Name="RDEngineering_ModernUIControl" DesignTimeRemark="{ActionType} {PanelName} &lt;-- {UIType}:{Field} {Id} {ParentID}">
-							<PAR Name="RDLibraryName">
-								<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
-							</PAR>
-							<PAR Name="RenderList">
-								<EXP><![CDATA[$=$Render_Gefaelle]]></EXP>
-							</PAR>
-							<PAR Name="PanelName">
-								<EXP><![CDATA[$C$0]]></EXP>
-							</PAR>
-							<PAR Name="CustomPanel" />
-							<PAR Name="ActionType">
-								<EXP><![CDATA[$C$0]]></EXP>
-							</PAR>
-							<PAR Name="Id">
-								<EXP><![CDATA[$C$L_th]]></EXP>
-							</PAR>
-							<PAR Name="ParentId" />
-							<PAR Name="Label">
-								<EXP><![CDATA[$C$Theoretische Länge durch Winkel und Höhendifferenz]]></EXP>
-							</PAR>
-							<PAR Name="Field">
-								<EXP><![CDATA[$C$L_th]]></EXP>
-							</PAR>
-							<PAR Name="Value" />
-							<PAR Name="Uom" />
-							<PAR Name="Tooltip" />
-							<PAR Name="Styles" />
-							<PAR Name="Classes">
-								<EXP><![CDATA[$C$col-3]]></EXP>
-							</PAR>
-							<PAR Name="Rules" />
-							<PAR Name="Image" />
-							<PAR Name="ControlType">
-								<EXP><![CDATA[$C$textbox]]></EXP>
-							</PAR>
-							<PAR Name="ButtonSubType" />
-							<PAR Name="DropdownSubType" />
-							<PAR Name="TextboxSubType" />
-							<PAR Name="Action" />
-							<PAR Name="Required" />
-							<PAR Name="Hidden" />
-							<PAR Name="ROnly">
-								<EXP><![CDATA[$C$True]]></EXP>
-							</PAR>
-							<PAR Name="Disabled" />
-							<PAR Name="Pressed" />
-							<PAR Name="AutoCommit" />
-							<PAR Name="ValidateFail" />
-							<PAR Name="ValidateMsg" />
-							<PAR Name="DataSource" />
-							<PAR Name="Options" />
-						</ACTION_CALL>
 						<ACTION_CALL Id="RDK:880711" Name="RDEngineering_ModernUIControl" DesignTimeRemark="{ActionType} {PanelName} &lt;-- {UIType}:{Field} {Id} {ParentID}">
 							<PAR Name="RDLibraryName">
 								<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -15713,10 +16242,10 @@ ShapeList["id="+Param.Input[1].shapeID].name
 							</PAR>
 							<PAR Name="ParentId" />
 							<PAR Name="Label">
-								<EXP><![CDATA[$C$projizierte Länge der Gefällestrecke]]></EXP>
+								<EXP><![CDATA[$C$projizierte Länge des Förderers]]></EXP>
 							</PAR>
 							<PAR Name="Field">
-								<EXP><![CDATA[$C$L_s]]></EXP>
+								<EXP><![CDATA[$C$L_f]]></EXP>
 							</PAR>
 							<PAR Name="Value" />
 							<PAR Name="Uom" />