From 490c2517b2b81a6d501a3c713e8fa2b018ee4392 Mon Sep 17 00:00:00 2001
From: Simon Hensch <s.hensch@schoenenberger.de>
Date: Tue, 23 Sep 2025 11:21:36 +0200
Subject: [PATCH] =?UTF-8?q?Funktion=20f=C3=BCr=20das=20holen=20von=20Wert?=
 =?UTF-8?q?=20f=C3=BCr=20BogenDefinition=20beim=20Einf=C3=BCgen=20auf=20Ba?=
 =?UTF-8?q?sis=20der=20Sivasnummer=20eingef=C3=BCgt.=20Analog=20zur=20OF?=
 =?UTF-8?q?=20Weiche.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 MAIN_SSG.rdx | 77 ++++++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 75 insertions(+), 2 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index c76bfe6..90d1302 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.hensch [ANGEBOT-NB06]" ModDate="2025-09-23T10:38:41" LanguageVersion="2014.1.3.712" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="s.hensch [ANGEBOT-NB06]" ModDate="2025-09-23T11:18:20" LanguageVersion="2014.1.3.712" />
 	<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">
@@ -21186,6 +21186,7 @@ SSGConnectionPoint.x_M
 								<EXP><![CDATA[$=$OFBogenItemList]]></EXP>
 							</PAR>
 							<PAR Name="Options" />
+							<PAR Name="WebviewSubType" />
 						</ACTION_CALL>
 					</FUNCTION>
 					<FUNCTION Id="RDK:23222151" Name="GetOFWeicheData" InputTypeName="string" ResultTypeName="OFWeicheType">
@@ -21248,6 +21249,66 @@ SSGConnectionPoint.x_M
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</FUNCTION>
+					<FUNCTION Id="RDK:25777780" Name="GetOFBogenData" InputTypeName="string" ResultTypeName="OFWeicheType">
+						<GROUP Id="RDK:25777772" Name="Local Variables" SubType="VarSet" IncludeDate="0">
+							<VAR Id="RDK:25777770" Name="SivasNummer" Type="string">
+								<SET Id="RDK:25777769" VarRef="Me">
+									<EXP><![CDATA[$=$Param.Input]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:25777771" Name="Ergebnis" Type="OFBogenType" />
+						</GROUP>
+						<FOREACHLOOP Id="RDK:25777777" ItemVarRef="Ergebnis">
+							<PAR Name="ArrayValueExp">
+								<EXP><![CDATA[$=$OFBogenData]]></EXP>
+							</PAR>
+							<PAR Name="ExitCondExp">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<IFTHENELSE Id="RDK:25777776">
+								<VALUECONDITION Value="true">
+									<EXP><![CDATA[$=$SivasNummer = Ergebnis.Sivasnr]]></EXP>
+								</VALUECONDITION>
+								<GROUP Id="RDK:25777775" SubType="Then">
+									<SET Id="RDK:25777773" VarRef="Param.Result">
+										<EXP><![CDATA[$=$Ergebnis]]></EXP>
+										<PAR Name="AdvancedOptions" />
+									</SET>
+									<EXIT_PROCESS Id="RDK:25777774" BreakType="4" ExitStatus="0" />
+								</GROUP>
+							</IFTHENELSE>
+						</FOREACHLOOP>
+						<SET_STRUCT Id="RDK:25777778" VarRef="Ergebnis" ClearAll="True">
+							<PAR Name="Beschreibung" />
+							<PAR Name="L1" />
+							<PAR Name="H_Anfang" />
+							<PAR Name="H_Ende" />
+							<PAR Name="Delta_h" />
+							<PAR Name="KurvenWinkel" />
+							<PAR Name="KurvenRichtung" />
+							<PAR Name="isOk" />
+							<PAR Name="Sivasnr" />
+							<PAR Name="ProfilTyp" />
+							<PAR Name="Radius" />
+							<PAR Name="AntriebInnen" />
+							<PAR Name="AntriebAussen" />
+							<PAR Name="WeichenTyp" />
+							<PAR Name="L2" />
+							<PAR Name="L3" />
+							<PAR Name="Hoehe" />
+							<PAR Name="Schaltungstyp" />
+							<PAR Name="AntriebKurve" />
+							<PAR Name="n_Sep" />
+							<PAR Name="n_Scan" />
+							<PAR Name="Länge" />
+							<PAR Name="Breite" />
+						</SET_STRUCT>
+						<SET Id="RDK:25777779" VarRef="Param.Result">
+							<EXP><![CDATA[$=$Ergebnis]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</FUNCTION>
 					<FUNCTION Id="RDK:23222556" Name="GetOFWeicheWinkelFromId" InputTypeName="string" ResultTypeName="double">
 						<GROUP Id="RDK:23222553" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 							<VAR Id="RDK:23222551" Name="SivasNummer" Type="string">
@@ -35027,7 +35088,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
 								<EXP><![CDATA[$=$LibID]]></EXP>
 								<PAR Name="AdvancedOptions" />
 							</SET>
-							<CALLFUNCTION Id="RDK:23067144">
+							<CALLFUNCTION Id="RDK:23067144" Suppressed="True">
 								<PAR Name="FuncName">
 									<EXP><![CDATA[$C$GetOFBogenWinkelFromId]]></EXP>
 								</PAR>
@@ -35039,6 +35100,18 @@ ShapeList["id="+Param.Input[1].shapeID].name
 								</PAR>
 								<PAR Name="Options" />
 							</CALLFUNCTION>
+							<CALLFUNCTION Id="RDK:25777784">
+								<PAR Name="FuncName">
+									<EXP><![CDATA[$C$GetOFBogenData]]></EXP>
+								</PAR>
+								<PAR Name="InputExp">
+									<EXP><![CDATA[$=$Shape_Prototype.source]]></EXP>
+								</PAR>
+								<PAR Name="ResultRef">
+									<EXP><![CDATA[$V$Shape_Prototype.OFBogenDefinition]]></EXP>
+								</PAR>
+								<PAR Name="Options" />
+							</CALLFUNCTION>
 						</GROUP>
 						<SET Id="RDK:23016703" VarRef="Shape_Prototype.Rotationsklasse">
 							<EXP><![CDATA[$C$Rotationsobjekt]]></EXP>