From 4fdac82c763af6788d72abd7ac0fbc7f977bce7b Mon Sep 17 00:00:00 2001
From: Simon Schmutzler <s.schmutzler@schoenenberger.de>
Date: Mon, 17 Jun 2024 11:57:02 +0200
Subject: [PATCH] =?UTF-8?q?InheritHeight=20Funktion=20vereinfacht;=20Nicht?=
 =?UTF-8?q?=20notwendige=20Aufrufe=20unterdr=C3=BCckt?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 MAIN_SSG.rdx | 39 +++++++++++++++++++++++++++++++--------
 1 file changed, 31 insertions(+), 8 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index 8442131..5ed82d4 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="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-06-17T11:44:40" LanguageVersion="2014.1.3.674" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-06-17T11:54:03" LanguageVersion="2014.1.3.674" />
 	<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">
@@ -8024,7 +8024,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 						<EXP><![CDATA[$C$NOTHING]]></EXP>
 						<PAR Name="AdvancedOptions" />
 					</SET>
-					<GROUP Id="RDK:1128703" Name="Find Children" SubType="Generic">
+					<GROUP Id="RDK:1128703" Name="Find Children" SubType="Generic" Suppressed="True">
 						<SET Id="RDK:1128698" VarRef="LinkedShapeIDs">
 							<EXP><![CDATA[$C$NOTHING]]></EXP>
 							<PAR Name="AdvancedOptions" />
@@ -8060,7 +8060,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 							<PAR Name="Options" />
 						</CALLFUNCTION>
 					</GROUP>
-					<GROUP Id="RDK:1194828" Name="Set ConnectedGefaellestreckeList" SubType="Generic" DesignTimeNotes="Collect all Gefällestrecke that are connected to this Element (Kreisel)">
+					<GROUP Id="RDK:1194828" Name="Set ConnectedGefaellestreckeList" SubType="Generic" Suppressed="True" DesignTimeNotes="Collect all Gefällestrecke that are connected to this Element (Kreisel)">
 						<FOREACHLOOP Id="RDK:1194838" ItemVarRef="Link">
 							<PAR Name="ArrayValueExp">
 								<EXP><![CDATA[$=$LinkedShapeIDs]]></EXP>
@@ -8104,7 +8104,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 						</PAR>
 						<PAR Name="Options" />
 					</CALLFUNCTION>
-					<CALLFUNCTION Id="RDK:1458675">
+					<CALLFUNCTION Id="RDK:1458675" Suppressed="True">
 						<PAR Name="FuncName">
 							<EXP><![CDATA[$C$CollectKreiselGroup]]></EXP>
 						</PAR>
@@ -8186,7 +8186,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 							</FOREACHLOOP>
 						</FOREACHLOOP>
 					</GROUP>
-					<GROUP Id="RDK:1543998" Name="Set IndirectConnKreiselList" SubType="Generic">
+					<GROUP Id="RDK:1543998" Name="Set IndirectConnKreiselList" SubType="Generic" Suppressed="True">
 						<VALUECONDITION Value="true">
 							<EXP><![CDATA[$=$Shape_Prototype.family = "Gefaellestrecke"]]></EXP>
 						</VALUECONDITION>
@@ -8227,7 +8227,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 							</FOREACHLOOP>
 						</FOREACHLOOP>
 					</GROUP>
-					<FOREACHLOOP Id="RDK:1128707" ItemVarRef="Link">
+					<FOREACHLOOP Id="RDK:1128707" Suppressed="True" ItemVarRef="Link">
 						<PAR Name="ArrayValueExp">
 							<EXP><![CDATA[$=$LinkedShapeIDs]]></EXP>
 						</PAR>
@@ -9073,7 +9073,7 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
 							</GROUP>
 						</GROUP>
 					</FOREACHLOOP>
-					<GROUP Id="RDK:1502770" Name="Set RemovedKreiselGroupList to GELB" SubType="Generic">
+					<GROUP Id="RDK:1502770" Name="Set RemovedKreiselGroupList to GELB" SubType="Generic" Suppressed="True">
 						<FOREACHLOOP Id="RDK:1502776" ItemVarRef="Link">
 							<PAR Name="ArrayValueExp">
 								<EXP><![CDATA[$=$RemovedKreiselGroupList]]></EXP>
@@ -9173,6 +9173,18 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
 								</PAR>
 								<PAR Name="Options" />
 							</CALLFUNCTION>
+							<CALLFUNCTION Id="RDK:19812538">
+								<PAR Name="FuncName">
+									<EXP><![CDATA[$C$SetStatus]]></EXP>
+								</PAR>
+								<PAR Name="InputExp">
+									<EXP><![CDATA[$=$TempKreiselLink]]></EXP>
+								</PAR>
+								<PAR Name="ResultRef">
+									<EXP><![CDATA[$V$]]></EXP>
+								</PAR>
+								<PAR Name="Options" />
+							</CALLFUNCTION>
 						</FOREACHLOOP>
 					</GROUP>
 					<GROUP Id="RDK:19795603" Name="Set IndirectConnHeights" SubType="Generic" DesignTimeNotes="20231011 -1-">
@@ -9243,8 +9255,19 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
 											</PAR>
 											<PAR Name="Options" />
 										</CALLFUNCTION>
+										<CALLFUNCTION Id="RDK:19812540">
+											<PAR Name="FuncName">
+												<EXP><![CDATA[$C$SetStatus]]></EXP>
+											</PAR>
+											<PAR Name="InputExp">
+												<EXP><![CDATA[$=$shape_item.id]]></EXP>
+											</PAR>
+											<PAR Name="ResultRef">
+												<EXP><![CDATA[$V$]]></EXP>
+											</PAR>
+											<PAR Name="Options" />
+										</CALLFUNCTION>
 									</GROUP>
-									<GROUP Id="RDK:19795599" SubType="Else" />
 								</IFTHENELSE>
 							</FOREACHLOOP>
 						</FOREACHLOOP>