From df42a1b950c466b02ce2fa0c6437af7b1a2f5636 Mon Sep 17 00:00:00 2001
From: Damir Vrbic <vrbic@pbu-cad.de>
Date: Tue, 10 Sep 2024 15:44:14 +0200
Subject: [PATCH] =?UTF-8?q?Bounding=20Box=20Gef=C3=A4llestrecke=20(Wert=20?=
 =?UTF-8?q?f=C3=BCr=20depth)=20warn=20nicht=20richtig=20wenn=20mit=20Kreis?=
 =?UTF-8?q?el=20verkn=C3=BCpft.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Konstanten (Width, Height, Depth, X) für Bounding Box berechnung in Variablen verschoben.
---
 MAIN_SSG.rdx | 104 +++++++++++++++++++++++++++++++++++++++++----------
 1 file changed, 85 insertions(+), 19 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index 5a8d505..333ea19 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="2024-08-16T11:49:03" LanguageVersion="2014.1.3.686" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="dvr [NBDELP3570-02C]" ModDate="2024-09-10T15:40:54" LanguageVersion="2014.1.3.688" />
 	<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">
@@ -755,7 +755,7 @@
 				</TYPE>
 			</GROUP>
 			<GROUP Id="RDK:900065" Name="CSV EXPORT" SubType="TypeSet" IncludeDate="0">
-				<TYPE Id="RDK:1516708" Name="CSVType" Expanded="True" SubType="structure" HasArrayType="True" DesignTimeNotes="Der Rest der Datei ist eine Liste aller Objekte, welche vom Benutzer angelegt wurden.  Die Merkmale jedes Objektes werden wie in die Datei geschrieben, wie sie im RD verwendet werden. Eine Übersetzung in die Merkmale für das ERP findet ausserhalb statt.">
+				<TYPE Id="RDK:1516708" Name="CSVType" SubType="structure" HasArrayType="True" DesignTimeNotes="Der Rest der Datei ist eine Liste aller Objekte, welche vom Benutzer angelegt wurden.  Die Merkmale jedes Objektes werden wie in die Datei geschrieben, wie sie im RD verwendet werden. Eine Übersetzung in die Merkmale für das ERP findet ausserhalb statt.">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:1516701" Name="Elementnummer" Type="integer" DesignTimeNotes="Die Elementnummer ist einfach eine laufende Nummer" />
 					<FIELD Id="RDK:1516702" Name="TeileArt" Type="string" />
@@ -822,7 +822,7 @@
 					<FIELD Id="RDK:18946343" Name="value" Type="double" />
 					<FIELD Id="RDK:18946345" Name="filename" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:18753212" Name="SEType" Expanded="True" SubType="structure" HasArrayType="True" DesignTimeNotes="Der Rest der Datei ist eine Liste aller Objekte, welche vom Benutzer angelegt wurden.  Die Merkmale jedes Objektes werden wie in die Datei geschrieben, wie sie im RD verwendet werden. Eine Übersetzung in die Merkmale für das ERP findet ausserhalb statt.">
+				<TYPE Id="RDK:18753212" Name="SEType" SubType="structure" HasArrayType="True" DesignTimeNotes="Der Rest der Datei ist eine Liste aller Objekte, welche vom Benutzer angelegt wurden.  Die Merkmale jedes Objektes werden wie in die Datei geschrieben, wie sie im RD verwendet werden. Eine Übersetzung in die Merkmale für das ERP findet ausserhalb statt.">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:18753205" Name="Elementnummer" Type="integer" DesignTimeNotes="Die Elementnummer ist einfach eine laufende Nummer" />
 					<FIELD Id="RDK:18753206" Name="TeileArt" Type="string" />
@@ -3200,6 +3200,72 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 							<VAR Id="RDK:20273873" Name="a" Type="double" />
 							<VAR Id="RDK:20273878" Name="x" Type="double" />
 							<VAR Id="RDK:20273876" Name="y" Type="double" />
+							<VAR Id="RDK:20810180" Name="GefaelleWidth" Type="double">
+								<SET Id="RDK:20811547" VarRef="Me">
+									<EXP><![CDATA[$C$430]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811548" Name="GefaelleHeight" Type="double">
+								<SET Id="RDK:20811549" VarRef="Me">
+									<EXP><![CDATA[$C$1600]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811550" Name="GefaelleDepth" Type="double">
+								<SET Id="RDK:20811551" VarRef="Me">
+									<EXP><![CDATA[$C$90]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811560" Name="GefaelleX" Type="double">
+								<SET Id="RDK:20811561" VarRef="Me">
+									<EXP><![CDATA[$C$215]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811557" Name="TBogenWidth" Type="double">
+								<SET Id="RDK:20811558" VarRef="Me">
+									<EXP><![CDATA[$C$430]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811553" Name="TBogenHeight" Type="double">
+								<SET Id="RDK:20811554" VarRef="Me">
+									<EXP><![CDATA[$C$245]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811555" Name="TBogenDepth" Type="double">
+								<SET Id="RDK:20811556" VarRef="Me">
+									<EXP><![CDATA[$C$90]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811562" Name="TBogenX" Type="double">
+								<SET Id="RDK:20811563" VarRef="Me">
+									<EXP><![CDATA[$C$215]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811564" Name="VerbinderWidth" Type="double">
+								<SET Id="RDK:20811565" VarRef="Me">
+									<EXP><![CDATA[$C$90]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811566" Name="VerbinderDepth" Type="double">
+								<SET Id="RDK:20811567" VarRef="Me">
+									<EXP><![CDATA[$C$90]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:20811568" Name="VerbinderX" Type="double">
+								<SET Id="RDK:20811569" VarRef="Me">
+									<EXP><![CDATA[$C$215]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
 						</GROUP>
 						<GROUP Id="RDK:20545841" Name="Params" SubType="Generic">
 							<IFTHENELSE Id="RDK:20547195">
@@ -3278,7 +3344,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 								<EXP><![CDATA[$=$ConvertToPixel(L1, "mm", 96)]]></EXP>
 							</PAR>
 							<PAR Name="depth">
-								<EXP><![CDATA[$=$ConvertToPixel(Abs(Z0-Z1)+Property_Prototype.depth, "mm", 96)]]></EXP>
+								<EXP><![CDATA[$=$ConvertToPixel(Abs(Z0-Z1)+GefaelleDepth, "mm", 96)]]></EXP>
 							</PAR>
 							<PAR Name="behaviour" />
 							<PAR Name="help" />
@@ -3311,16 +3377,16 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 									<EXP><![CDATA[$C$s_Gefaellestrecke2D]]></EXP>
 								</PAR>
 								<PAR Name="width">
-									<EXP><![CDATA[$=$ConvertToPixel(430, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(GefaelleWidth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="height">
 									<EXP><![CDATA[$=$ConvertToPixel(L1, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="depth">
-									<EXP><![CDATA[$=$ConvertToPixel(90, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(GefaelleDepth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="x">
-									<EXP><![CDATA[$=$ConvertToPixel(215, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(GefaelleX, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="y">
 									<EXP><![CDATA[$=$ConvertToPixel(L1/2, "mm", 96)]]></EXP>
@@ -3337,16 +3403,16 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 									<EXP><![CDATA[$C$s_TBogen]]></EXP>
 								</PAR>
 								<PAR Name="width">
-									<EXP><![CDATA[$=$ConvertToPixel(430, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenWidth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="height">
-									<EXP><![CDATA[$=$ConvertToPixel(245, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenHeight, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="depth">
-									<EXP><![CDATA[$=$ConvertToPixel(90, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenDepth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="x">
-									<EXP><![CDATA[$=$ConvertToPixel(215, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenX, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="y">
 									<EXP><![CDATA[$C$0]]></EXP>
@@ -3365,16 +3431,16 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 									<EXP><![CDATA[$C$s_TBogen]]></EXP>
 								</PAR>
 								<PAR Name="width">
-									<EXP><![CDATA[$=$ConvertToPixel(430, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenWidth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="height">
-									<EXP><![CDATA[$=$ConvertToPixel(245, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenHeight, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="depth">
-									<EXP><![CDATA[$=$ConvertToPixel(90, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenDepth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="x">
-									<EXP><![CDATA[$=$ConvertToPixel(215, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(TBogenX, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="y">
 									<EXP><![CDATA[$=$ConvertToPixel(L1, "mm", 96)]]></EXP>
@@ -3407,7 +3473,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 									<EXP><![CDATA[$C$s_Gefaellestrecke_Verbinder]]></EXP>
 								</PAR>
 								<PAR Name="width">
-									<EXP><![CDATA[$=$ConvertToPixel(90, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(VerbinderWidth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="height">
 									<EXP><![CDATA[$=$ConvertToPixel(Sqrt(x^2+y^2), "mm", 96)
@@ -3415,10 +3481,10 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 ]]></EXP>
 								</PAR>
 								<PAR Name="depth">
-									<EXP><![CDATA[$=$ConvertToPixel(90, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(VerbinderDepth, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="x">
-									<EXP><![CDATA[$=$ConvertToPixel(215, "mm", 96)]]></EXP>
+									<EXP><![CDATA[$=$ConvertToPixel(VerbinderX, "mm", 96)]]></EXP>
 								</PAR>
 								<PAR Name="y">
 									<EXP><![CDATA[$=$ConvertToPixel(L1/2, "mm", 96)]]></EXP>
@@ -26091,4 +26157,4 @@ ShapeList["id="+Param.Input[1].shapeID].name
 		</PROFILES_DATA>
 		<BOM_DATA />
 	</EXTERNAL_DATA>
-</PROCESS>
+</PROCESS>
\ No newline at end of file