From 044a98e0a3b4b7c3cd6e83b038799c9522416437 Mon Sep 17 00:00:00 2001
From: dre <reif@pbu-cad.de>
Date: Tue, 6 Feb 2024 11:33:39 +0100
Subject: [PATCH] =?UTF-8?q?ERK-66=20Merge=20erster=20Commit=20von=20DR.=20?=
 =?UTF-8?q?Kopierte=20Shapes=20werden=20neu=20erzeugt,=20damit=20sind=20di?=
 =?UTF-8?q?ese=20vom=20Original=20=C3=BCber=20ID=20nicht=20mehr=20abh?=
 =?UTF-8?q?=C3=A4ngig.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 MAIN_SSG.rdx | 23 ++++++++++++++++++++++-
 1 file changed, 22 insertions(+), 1 deletion(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index b6a57cf..1d67529 100644
--- a/MAIN_SSG.rdx
+++ b/MAIN_SSG.rdx
@@ -8699,6 +8699,9 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
 							<PAR Name="Options" />
 						</CALLFUNCTION>
 						<GROUP Id="RDK:623665" Name="UI" SubType="Generic">
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$Param.Input[0].class<>"OnPasted"]]></EXP>
+							</VALUECONDITION>
 							<ACTION_CALL Id="RDK:433616" Name="RDEngineering_RemoteRedirect" DesignTimeRemark="{Action Mode} {Url}">
 								<PAR Name="RDLibraryName">
 									<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -8834,6 +8837,9 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
 							<PAR Name="Options" />
 						</CALLFUNCTION>
 						<GROUP Id="RDK:1545843" Name="UI" SubType="Generic">
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$Param.Input[0].class<>"OnPasted"]]></EXP>
+							</VALUECONDITION>
 							<ACTION_CALL Id="RDK:1545839" Name="RDEngineering_RemoteRedirect" DesignTimeRemark="{Action Mode} {Url}">
 								<PAR Name="RDLibraryName">
 									<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -8949,6 +8955,9 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
 							<PAR Name="AdvancedOptions" />
 						</SET>
 						<GROUP Id="RDK:837502" Name="UI" SubType="Generic">
+							<VALUECONDITION Value="true">
+								<EXP><![CDATA[$=$Param.Input[0].class<>"OnPasted"]]></EXP>
+							</VALUECONDITION>
 							<ACTION_CALL Id="RDK:837498" Name="RDEngineering_RemoteRedirect" DesignTimeRemark="{Action Mode} {Url}" DesignTimeNotes="(CLOSEBUTTON)(TITLE=TITOLO DEL POP UP)(TITLECOLOR=#000000)(TITLEBACKCOLOR=RED)(STARTPOSITION=bottom)(NOPADDING)(DRAGGABLE)">
 								<PAR Name="RDLibraryName">
 									<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -9968,6 +9977,18 @@ me.x
 						</PAR>
 						<PAR Name="Options" />
 					</CALLFUNCTION>
+					<CALLFUNCTION Id="RDK:1663943">
+						<PAR Name="FuncName">
+							<EXP><![CDATA[$C$OnEditor2DInserted]]></EXP>
+						</PAR>
+						<PAR Name="InputExp">
+							<EXP><![CDATA[$=$Param.Input]]></EXP>
+						</PAR>
+						<PAR Name="ResultRef">
+							<EXP><![CDATA[$V$]]></EXP>
+						</PAR>
+						<PAR Name="Options" />
+					</CALLFUNCTION>
 					<SET Id="RDK:1632455" VarRef="ShapeList[&quot;id=&quot;+ID].IDCounter">
 						<EXP><![CDATA[$=$Shape_Prototype.IDCounter]]></EXP>
 						<PAR Name="AdvancedOptions" />
@@ -11172,7 +11193,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
 				</IFTHENELSE>
 			</FUNCTION>
 			<FUNCTION Id="RDK:1630766" Name="GetNewShapeID" InputTypeName="string">
-				<SET Id="RDK:1630768" VarRef="Shape_Prototype.IDCounter" ByRef="True">
+				<SET Id="RDK:1630768" VarRef="Shape_Prototype.IDCounter">
 					<EXP><![CDATA[$=$FieldValue(LastOf(SortListOfStructs(FilterByFieldValue(ShapeList, "family", Shape_Prototype.family), "IDCounter", false)), "IDCounter")+1]]></EXP>
 					<PAR Name="AdvancedOptions" />
 				</SET>