Bug bei Funktion CalculateGefällestrecke behoben

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="2026-03-10T15:58:22" LanguageVersion="2014.1.3.714" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="y.wang [ANGEBOT-NB02]" ModDate="2026-03-27T10:43:52" LanguageVersion="2014.1.3.714" />
 	<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">
@@ -1029,7 +1029,7 @@
 					<FIELD Id="RDK:22305681" Name="Höhe Ende" Type="string" />
 					<FIELD Id="RDK:25719740" Name="Drehung" Type="double" />
 				</TYPE>
-				<TYPE Id="RDK:21693243" Name="KurveFoerdererMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:21693243" Name="KurveFoerdererMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:21693241" Name="Länge in Meter" Type="string" />
 					<FIELD Id="RDK:22010911" Name="Kurvenrichtung" Type="string" DesignTimeRemark="rechts oder links, je nach Wahl des Nutzers" />
@@ -1039,7 +1039,7 @@
 					<FIELD Id="RDK:22305686" Name="Höhe Ende" Type="string" />
 					<FIELD Id="RDK:25719738" Name="Drehung" Type="double" />
 				</TYPE>
-				<TYPE Id="RDK:26514233" Name="KettenFoerdererMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:26514233" Name="KettenFoerdererMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:26514226" Name="Höhe" Type="string" />
 					<FIELD Id="RDK:26514230" Name="Höhe Anfang" Type="string" />
@@ -1108,7 +1108,7 @@
 					<FIELD Id="RDK:24365630" Name="Drehung" Type="double" />
 					<FIELD Id="RDK:24300973" Name="SivasNummer" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:23017792" Name="OFBogenMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:23017792" Name="OFBogenMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:23017787" Name="Länge in Meter" Type="string" />
 					<FIELD Id="RDK:23017789" Name="Kurvenwinkel" Type="double" />
@@ -1130,7 +1130,7 @@
 					<FIELD Id="RDK:23221899" Name="Antrieb Kurve" Type="boolean" />
 					<FIELD Id="RDK:23221888" Name="SivasNummer" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:23747545" Name="TEFGeradeMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:23747545" Name="TEFGeradeMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:23747540" Name="Länge in Meter" Type="string" />
 					<FIELD Id="RDK:23747543" Name="Höhe oben" Type="string" />
@@ -1138,7 +1138,7 @@
 					<FIELD Id="RDK:26502199" Name="Drehung" Type="double" />
 					<FIELD Id="RDK:27154098" Name="Sivasnummer" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:23747553" Name="TEFUmlenkMerkmaleType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:23747553" Name="TEFUmlenkMerkmaleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:23747550" Name="Richtung" Type="string" />
 					<FIELD Id="RDK:23747551" Name="Höhe" Type="string" />
@@ -22636,7 +22636,7 @@ SSGConnectionPoint.x_M
 								</IFTHENELSE>
 								<COMMENTS Id="RDK:21069355" DesignTimeRemark="Es werden die Länge, Winkel und Höhen als gegeben angsehen. Jetzt nur noch rechnen ob die Angaben passen. " />
 								<SET Id="RDK:21069358" VarRef="winkel_th">
-									<EXP><![CDATA[$=$Round(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/shape_item.GefaelleDefinition.L1)),0)]]></EXP>
+									<EXP><![CDATA[$=$Round(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/L1)),0)]]></EXP>
 									<PAR Name="AdvancedOptions" />
 								</SET>
 								<SET Id="RDK:21069362" VarRef="LH_fits">
@@ -23277,6 +23277,10 @@ SSGConnectionPoint.x_M
 													<EXP><![CDATA[$=$Round(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/L1)),1)]]></EXP>
 													<PAR Name="AdvancedOptions" />
 												</SET>
+												<SET Id="RDK:27466581" VarRef="L_th">
+													<EXP><![CDATA[$=$Round(Abs(HoeheOben-HoeheUnten)/Tan(DegToRad(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/L1)))),0)]]></EXP>
+													<PAR Name="AdvancedOptions" />
+												</SET>
 											</GROUP>
 										</IFTHENELSE>
 										<IFTHENELSE Id="RDK:23134059" DesignTimeRemark="HöheOben UND HöheUnten haben Werte und sind fixiert">
@@ -23291,6 +23295,10 @@ SSGConnectionPoint.x_M
 													<EXP><![CDATA[$=$Abs(HoeheOben-HoeheUnten)]]></EXP>
 													<PAR Name="AdvancedOptions" />
 												</SET>
+												<SET Id="RDK:27482165" VarRef="L_th">
+													<EXP><![CDATA[$=$Round(Abs(HoeheOben-HoeheUnten)/Tan(DegToRad(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/L1)))),0)]]></EXP>
+													<PAR Name="AdvancedOptions" />
+												</SET>
 											</GROUP>
 											<GROUP Id="RDK:26481438" SubType="Else">
 												<IFTHENELSE Id="RDK:23697502" DesignTimeRemark="Es gibt zwei Höhenangaben, aber keine ist fest gegeben: Winkel und Länge zählen">
@@ -23380,12 +23388,12 @@ SSGConnectionPoint.x_M
 														</IFTHENELSE>
 													</GROUP>
 												</IFTHENELSE>
+												<SET Id="RDK:27482167" VarRef="L_th">
+													<EXP><![CDATA[$=$Round(Abs(HoeheOben-HoeheUnten)/Tan(DegToRad(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/L1)))),0)]]></EXP>
+													<PAR Name="AdvancedOptions" />
+												</SET>
 											</GROUP>
 										</IFTHENELSE>
-										<SET Id="RDK:23134031" VarRef="L_th">
-											<EXP><![CDATA[$=$Round(Abs(HoeheOben-HoeheUnten)/Tan(DegToRad(winkel)),0)]]></EXP>
-											<PAR Name="AdvancedOptions" />
-										</SET>
 										<SET Id="RDK:23134033" VarRef="winkel_th">
 											<EXP><![CDATA[$=$Round(RadToDeg(ATAN(Abs(HoeheOben-HoeheUnten)/L1)),1)]]></EXP>
 											<PAR Name="AdvancedOptions" />