From 1dca0e7d2871dc81515c96b2f1399853a801b1eb Mon Sep 17 00:00:00 2001
From: mistangl <m.stangl@schoenenberger.de>
Date: Thu, 14 Aug 2025 11:29:21 +0200
Subject: [PATCH] Pfade werden vom Server gezogen

---
 Editor2DLibrary/SSG/Init/se_ils.json |   2 +-
 MAIN_SSG.rdx                         | 212 ++++++++++++++++++++++-----
 2 files changed, 175 insertions(+), 39 deletions(-)

diff --git a/Editor2DLibrary/SSG/Init/se_ils.json b/Editor2DLibrary/SSG/Init/se_ils.json
index 5f2268a..440f5f5 100644
--- a/Editor2DLibrary/SSG/Init/se_ils.json
+++ b/Editor2DLibrary/SSG/Init/se_ils.json
@@ -5,7 +5,7 @@
     "Parts": "Kreiselstrecke.par;Motor.par;Spannstation.par"
   },
   {
-    "AsmName": "Gefaellestrecke.asm",
+    "AsmName": "Gefaellestrecke_allgemein.asm",
     "Subdir": "ILS",
     "Parts": "Gefaellestrecke_Verbinder.par;T_Bogen.par"
   },
diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index a95a401..0f78ec1 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="m.stangl [ENTW-NB08]" ModDate="2025-08-11T14:37:45" LanguageVersion="2014.1.3.712" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="m.stangl [ENTW-NB08]" ModDate="2025-08-14T11:19:11" 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">
@@ -116,7 +116,7 @@
 					<FIELD Id="RDK:23747176" Name="istAnStreckeGebunden" Type="boolean" DesignTimeRemark="True wenn es an eine Strecke angebunden ist" />
 					<FIELD Id="RDK:23747179" Name="istVerbunden" Type="boolean" DesignTimeRemark="True wenn an eine andere Motor/Umlenkstation angebunden" />
 				</TYPE>
-				<TYPE Id="RDK:24351627" Name="CAD Data Type" SubType="structure" HasArrayType="True">
+				<TYPE Id="RDK:24351627" Name="CAD Data Type" Expanded="True" SubType="structure" HasArrayType="True">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:24351629" Name="Subdir" Type="string" />
 					<FIELD Id="RDK:24351631" Name="AsmName" Type="string" />
@@ -133,7 +133,7 @@
 					<FIELD Id="RDK:22007213" Name="KurvenRichtung" Type="string" DesignTimeRemark="rechts oder links, je nach Wahl des Nutzers" />
 					<FIELD Id="RDK:21700896" Name="isOk" Type="boolean" DesignTimeRemark="True beide Punkte angebunden sind und die Höhen der Nachbarn passen" />
 				</TYPE>
-				<TYPE Id="RDK:18116690" Name="FoerdererType" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:18116690" Name="FoerdererType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18116683" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:18116696" Name="Typ" Type="string" DesignTimeRemark="Auf oder Ab" />
@@ -1394,7 +1394,8 @@
 			<VAR Id="RDK:23222557" Name="OFBogenData" Type="OFBogenType[]" DesignTimeRemark="Dropdown Liste aller Bögen im Interface" />
 			<VAR Id="RDK:23222658" Name="OFWeichenData" Type="OFWeicheType[]" DesignTimeRemark="Dropdown Liste aller Weichen im Interface" />
 			<VAR Id="RDK:23747696" Name="TEFBogenData" Type="TEFBogenType[]" DesignTimeRemark="Liste aller TEF Bögen" />
-			<VAR Id="RDK:24361660" Name="lineNumber" Type="integer" DesignTimeRemark="Generated by RD" />
+			<VAR Id="RDK:24704546" Name="CadRootPath" Type="string" />
+			<VAR Id="RDK:24709584" Name="LevelOfDetail" Type="string" DesignTimeRemark="Generated by RD" />
 		</GROUP>
 		<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
 			<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -18231,7 +18232,7 @@ SSGConnectionPoint.x_M
 					</FUNCTION>
 				</GROUP>
 				<GROUP Id="RDK:24351751" Name="CADPathMethods" SubType="FunctionSet" IncludeDate="0">
-					<FUNCTION Id="RDK:24351750" Name="GetParts" DesignTimeRemark="gibt alle benötigten Parts zu diesem Asembly zurück" InputTypeName="string" ResultTypeName="string[]">
+					<FUNCTION Id="RDK:24351750" Name="GetAssemblyPath" DesignTimeRemark="gibt den Pfad zu diesem Assembly zurück" InputTypeName="string" ResultTypeName="string">
 						<GROUP Id="RDK:24351743" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 							<VAR Id="RDK:24351740" Name="caditem" Type="CAD Data Type" />
 							<VAR Id="RDK:24351742" Name="assembly" Type="string">
@@ -18240,6 +18241,7 @@ SSGConnectionPoint.x_M
 									<PAR Name="AdvancedOptions" />
 								</SET>
 							</VAR>
+							<VAR Id="RDK:24706600" Name="SubDir" Type="string" />
 						</GROUP>
 						<FOREACHLOOP Id="RDK:24351748" ItemVarRef="caditem">
 							<PAR Name="ArrayValueExp">
@@ -18253,15 +18255,99 @@ SSGConnectionPoint.x_M
 									<EXP><![CDATA[$=$assembly= caditem.AsmName]]></EXP>
 								</VALUECONDITION>
 								<GROUP Id="RDK:24351746" SubType="Then">
-									<SET Id="RDK:24351744" VarRef="Param.Result">
-										<EXP><![CDATA[$=$splitStr(caditem.Parts, ";")]]></EXP>
-										<PAR Name="AdvancedOptions" />
-									</SET>
+									<CALLFUNCTION Id="RDK:24706597">
+										<PAR Name="FuncName">
+											<EXP><![CDATA[$C$GetSubdir]]></EXP>
+										</PAR>
+										<PAR Name="InputExp">
+											<EXP><![CDATA[$=$assembly]]></EXP>
+										</PAR>
+										<PAR Name="ResultRef">
+											<EXP><![CDATA[$V$SubDir]]></EXP>
+										</PAR>
+										<PAR Name="Options" />
+									</CALLFUNCTION>
+									<IFTHENELSE Id="RDK:24709650" DesignTimeRemark="gib die gefundenen Werte zurück">
+										<VALUECONDITION Value="true">
+											<EXP><![CDATA[$=$StrLength(SubDir) > 0]]></EXP>
+										</VALUECONDITION>
+										<GROUP Id="RDK:24709649" SubType="Then">
+											<SET Id="RDK:24709620" VarRef="Param.Result">
+												<EXP><![CDATA[$=$caditem.Subdir+"\"+assembly]]></EXP>
+												<PAR Name="AdvancedOptions" />
+											</SET>
+										</GROUP>
+										<GROUP Id="RDK:24709658" SubType="Else">
+											<SET Id="RDK:24709647" VarRef="Param.Result">
+												<EXP><![CDATA[$=$assembly]]></EXP>
+												<PAR Name="AdvancedOptions" />
+											</SET>
+										</GROUP>
+									</IFTHENELSE>
 									<EXIT_PROCESS Id="RDK:24351745" BreakType="4" ExitStatus="0" />
 								</GROUP>
 							</IFTHENELSE>
 						</FOREACHLOOP>
 						<SET Id="RDK:24351749" VarRef="Param.Result">
+							<EXP><![CDATA[$=$""]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</FUNCTION>
+					<FUNCTION Id="RDK:24709614" Name="GetParts" DesignTimeRemark="gibt alle benötigten Parts zu diesem Asembly zurück" InputTypeName="string" ResultTypeName="string[]">
+						<GROUP Id="RDK:24709605" Name="Local Variables" SubType="VarSet" IncludeDate="0">
+							<VAR Id="RDK:24709600" Name="caditem" Type="CAD Data Type" />
+							<VAR Id="RDK:24709602" Name="assembly" Type="string">
+								<SET Id="RDK:24709601" VarRef="Me">
+									<EXP><![CDATA[$=$Param.Input]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:24709603" Name="SubDir" Type="string" />
+							<VAR Id="RDK:24709604" Name="part" Type="string" />
+						</GROUP>
+						<FOREACHLOOP Id="RDK:24709612" ItemVarRef="caditem">
+							<PAR Name="ArrayValueExp">
+								<EXP><![CDATA[$=$CAD_data]]></EXP>
+							</PAR>
+							<PAR Name="ExitCondExp">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<IFTHENELSE Id="RDK:24709611" DesignTimeRemark="gib die gefundenen Werte zurück">
+								<VALUECONDITION Value="true">
+									<EXP><![CDATA[$=$assembly= caditem.AsmName]]></EXP>
+								</VALUECONDITION>
+								<GROUP Id="RDK:24709610" SubType="Then">
+									<CALLFUNCTION Id="RDK:24709606">
+										<PAR Name="FuncName">
+											<EXP><![CDATA[$C$GetSubdir]]></EXP>
+										</PAR>
+										<PAR Name="InputExp">
+											<EXP><![CDATA[$=$assembly]]></EXP>
+										</PAR>
+										<PAR Name="ResultRef">
+											<EXP><![CDATA[$V$SubDir]]></EXP>
+										</PAR>
+										<PAR Name="Options" />
+									</CALLFUNCTION>
+									<FOREACHLOOP Id="RDK:24709608" ItemVarRef="part">
+										<PAR Name="ArrayValueExp">
+											<EXP><![CDATA[$=$splitStr(caditem.Parts, ";")]]></EXP>
+										</PAR>
+										<PAR Name="ExitCondExp">
+											<EXP><![CDATA[$V$]]></EXP>
+										</PAR>
+										<LIST_ADD Id="RDK:24709607" ListRef="Param.Result">
+											<PAR Name="VALUE_TO_ADD">
+												<EXP><![CDATA[$=$Subdir+"\"+part]]></EXP>
+											</PAR>
+											<PAR Name="POS_TO_ADD" />
+										</LIST_ADD>
+									</FOREACHLOOP>
+									<EXIT_PROCESS Id="RDK:24709609" BreakType="4" ExitStatus="0" />
+								</GROUP>
+							</IFTHENELSE>
+						</FOREACHLOOP>
+						<SET Id="RDK:24709613" VarRef="Param.Result">
 							<EXP><![CDATA[$=$NewList()]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
@@ -35396,10 +35482,10 @@ ShapeList["id="+Param.Input[1].shapeID].name
 					<GROUP Id="RDK:18760824" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 						<VAR Id="RDK:18760826" Name="SE_Item" Type="SEType" />
 						<VAR Id="RDK:18760945" Name="Source" Type="string" />
+						<VAR Id="RDK:24709632" Name="AssemblyPath" Type="string" />
 						<VAR Id="RDK:20782843" Name="Parts" Type="string[]" />
 						<VAR Id="RDK:24613401" Name="ToAdd_Parts" Type="string[]" />
 						<VAR Id="RDK:20782867" Name="Part" Type="string" />
-						<VAR Id="RDK:18931684" Name="LevelOfDetail" Type="string" />
 						<VAR Id="RDK:18760947" Name="Destination" Type="string" />
 						<VAR Id="RDK:24054983" Name="DestinationFolder" Type="string" />
 						<VAR Id="RDK:20801347" Name="winkel" Type="double" />
@@ -35408,14 +35494,6 @@ ShapeList["id="+Param.Input[1].shapeID].name
 						<VAR Id="RDK:18950424" Name="Par2" Type="SEExportParamType" />
 						<VAR Id="RDK:18950426" Name="Par3" Type="SEExportParamType" />
 					</GROUP>
-					<SET Id="RDK:24026610" VarRef="LevelOfDetail">
-						<EXP><![CDATA[$C$templates]]></EXP>
-						<PAR Name="AdvancedOptions" />
-					</SET>
-					<SET Id="RDK:18937970" VarRef="LevelOfDetail" Suppressed="True" DesignTimeRemark="Dieser Unterordner wird dann als Quelle für die komplexer modelliertenTeile verwendet. ">
-						<EXP><![CDATA[$C$detailed]]></EXP>
-						<PAR Name="AdvancedOptions" />
-					</SET>
 					<COMMENTS Id="RDK:24026628" DesignTimeRemark="collect all parts which should be copied and are used within the assembly" />
 					<FOREACHLOOP Id="RDK:24026717" ItemVarRef="ShapeItem">
 						<PAR Name="ArrayValueExp">
@@ -35559,7 +35637,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
 						</PAR>
 						<PAR Name="StrArr" />
 						<PAR Name="Str">
-							<EXP><![CDATA[$=$ProcPath()+"CAD\"+ LevelOfDetail]]></EXP>
+							<EXP><![CDATA[$=$CadRootPath]]></EXP>
 						</PAR>
 						<PAR Name="Dbl" />
 						<PAR Name="Int" />
@@ -35981,23 +36059,22 @@ ShapeList["id="+Param.Input[1].shapeID].name
 									<EXP><![CDATA[$=$StrLength(SE_Item.SEFilename) > 0]]></EXP>
 								</VALUECONDITION>
 								<GROUP Id="RDK:18958535" SubType="Then">
-									<IFTHENELSE Id="RDK:24046210">
-										<VALUECONDITION Value="true">
-											<EXP><![CDATA[$=$isEmpty(SE_Item.SESubdir)]]></EXP>
-										</VALUECONDITION>
-										<GROUP Id="RDK:24046211" SubType="Then">
-											<SET Id="RDK:18931686" VarRef="Source">
-												<EXP><![CDATA[$=$ProcPath()+"CAD\"+ LevelOfDetail+ "\"+SE_Item.SEFilename]]></EXP>
-												<PAR Name="AdvancedOptions" />
-											</SET>
-										</GROUP>
-										<GROUP Id="RDK:24046212" SubType="Else">
-											<SET Id="RDK:24046222" VarRef="Source">
-												<EXP><![CDATA[$=$ProcPath()+"CAD\"+ LevelOfDetail+ "\"+SE_Item.SESubdir+ "\"+SE_Item.SEFilename]]></EXP>
-												<PAR Name="AdvancedOptions" />
-											</SET>
-										</GROUP>
-									</IFTHENELSE>
+									<CALLFUNCTION Id="RDK:24709624">
+										<PAR Name="FuncName">
+											<EXP><![CDATA[$C$GetAssemblyPath]]></EXP>
+										</PAR>
+										<PAR Name="InputExp">
+											<EXP><![CDATA[$=$SE_Item.SEFilename]]></EXP>
+										</PAR>
+										<PAR Name="ResultRef">
+											<EXP><![CDATA[$V$AssemblyPath]]></EXP>
+										</PAR>
+										<PAR Name="Options" />
+									</CALLFUNCTION>
+									<SET Id="RDK:18931686" VarRef="Source">
+										<EXP><![CDATA[$=$CadRootPath+ "\"+AssemblyPath]]></EXP>
+										<PAR Name="AdvancedOptions" />
+									</SET>
 									<SET Id="RDK:24054985" VarRef="Destination">
 										<EXP><![CDATA[$=$ProcPath()+"CAD\"+StrReplace(SE_Item.ItemName, " :", "-")+".asm"]]></EXP>
 										<PAR Name="AdvancedOptions" />
@@ -43426,12 +43503,71 @@ ShapeList["id="+Param.Input[1].shapeID].name
 				<GROUP Id="RDK:24351620" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:24351618" Name="jsonpath" Type="string" />
 					<VAR Id="RDK:24351619" Name="json" Type="string" />
+					<VAR Id="RDK:24704591" Name="rootpath" Type="string" />
+					<VAR Id="RDK:24704583" Name="path_text" Type="string" />
 					<VAR Id="RDK:24351658" Name="CAD_data_ils" Type="CAD Data Type[]" />
 					<VAR Id="RDK:24351667" Name="cadItem" Type="CAD Data Type" />
 					<VAR Id="RDK:24351660" Name="CAD_data_obogen" Type="CAD Data Type[]" />
 					<VAR Id="RDK:24351662" Name="CAD_data_oweichen" Type="CAD Data Type[]" />
 				</GROUP>
-				<SET Id="RDK:24351644" VarRef="jsonpath">
+				<COMMENTS Id="RDK:24704556" DesignTimeRemark="schaut ob eine Datei existiert, die einen anderen Pfad für alle SolidEdge Dateien vorgibt." DesignTimeTip="andere Pfad für alle SE Dateien" />
+				<SET Id="RDK:24351644" VarRef="CadRootPath" DesignTimeRemark="set the root path to all SolidEdge CAD files to a global Variable">
+					<EXP><![CDATA[$=$ProcPath()+"CAD\templates"]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<SET Id="RDK:24704565" VarRef="rootpath">
+					<EXP><![CDATA[$=$WebRootPath()+"Editor2D\SSG\Init\se_root_path.txt"]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<IFTHENELSE Id="RDK:24704557">
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$FileExist(rootpath)]]></EXP>
+					</VALUECONDITION>
+					<GROUP Id="RDK:24704558" SubType="Then">
+						<ACTION_CALL Id="RDK:24704569" Name="RDEngineering_ReadFromTextFile">
+							<PAR Name="RDLibraryName">
+								<EXP><![CDATA[$C$RDEngineering_FILE_TEXT]]></EXP>
+							</PAR>
+							<PAR Name="FileName">
+								<EXP><![CDATA[$=$rootpath]]></EXP>
+							</PAR>
+							<PAR Name="DataType">
+								<EXP><![CDATA[$C$0]]></EXP>
+							</PAR>
+							<PAR Name="StringText">
+								<EXP><![CDATA[$V$path_text]]></EXP>
+							</PAR>
+							<PAR Name="StringVector">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<PAR Name="StringTable">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<PAR Name="NumberVector">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<PAR Name="NumberTable">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<PAR Name="XmlTokens">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<PAR Name="FileFormat">
+								<EXP><![CDATA[$C$2]]></EXP>
+							</PAR>
+							<PAR Name="IniSection" />
+							<PAR Name="IniProperty" />
+							<PAR Name="Options">
+								<EXP><![CDATA[$=$]]></EXP>
+							</PAR>
+						</ACTION_CALL>
+						<SET Id="RDK:24704600" VarRef="CadRootPath" DesignTimeRemark="set the root path to all SolidEdge CAD files to a global Variable">
+							<EXP><![CDATA[$=$path_text]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</GROUP>
+				</IFTHENELSE>
+				<SET Id="RDK:24704548" VarRef="jsonpath">
 					<EXP><![CDATA[$=$WebRootPath()+"Editor2D\SSG\Init\se_ils.json"]]></EXP>
 					<PAR Name="AdvancedOptions" />
 				</SET>
@@ -54971,4 +55107,4 @@ ShapeList["id="+Param.Input[1].shapeID].name
 		</PROFILES_DATA>
 		<BOM_DATA />
 	</EXTERNAL_DATA>
-</PROCESS>
+</PROCESS>
\ No newline at end of file