Function GetHeightOfItem wurde implementiert. Abfrage der Anschlusshoehe des Foedereres und der Gefaellestrecke

This commit is contained in:
2024-05-06 10:42:54 +02:00
parent 04a8fe59ac
commit 35eb4909da
+707 -36
View File
@@ -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-04-29T11:59:48" LanguageVersion="2014.1.3.635" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="y.wang [ANGEBOT-NB02]" ModDate="2024-05-06T10:38:19" LanguageVersion="2014.1.3.635" />
<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">
@@ -50,7 +50,7 @@
<FIELD Id="RDK:1520421" Name="Drehung" Type="integer" DesignTimeNotes="1= im Uhrzeigersinn=rechts&#xD;&#xA;-1= Gegen Uhrzeigersinn=links" />
<FIELD Id="RDK:1520424" Name="Durchmesser" Type="double" />
</TYPE>
<TYPE Id="RDK:302581" Name="GefaelleType" SubType="structure">
<TYPE Id="RDK:302581" Name="GefaelleType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:302571" Name="Beschreibung" Type="string" />
<FIELD Id="RDK:880709" Name="L1" Type="double" />
@@ -3498,6 +3498,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<PAR Name="pinned" />
<PAR Name="selected" />
<PAR Name="includeInBOM" />
<PAR Name="StreckeDefinition" />
</SET_STRUCT>
</GROUP>
</CASEGROUP>
@@ -13117,7 +13118,7 @@ me.x
</CASEGROUP>
<CASEGROUP Id="RDK:1606858" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
<IFTHENELSE Id="RDK:18735202">
<IFTHENELSE Id="RDK:18735202" Suppressed="True">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Kreisel"]]></EXP>
</VALUECONDITION>
@@ -13205,7 +13206,7 @@ me.x
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:18740477">
<IFTHENELSE Id="RDK:18740477" Suppressed="True">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Strecke"]]></EXP>
</VALUECONDITION>
@@ -13227,13 +13228,86 @@ me.x
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:18827017">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Kreisel"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18827016" SubType="Then">
<CALLFUNCTION Id="RDK:18827004">
<PAR Name="FuncName">
<EXP><![CDATA[$C$AddWeiche]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:18827005">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RückgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<IFTHENELSE Id="RDK:18827015">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18827014" SubType="Then">
<SET Id="RDK:18827006" VarRef="shape_id">
<EXP><![CDATA[$=$RückgabeListe["key=ShapeId"].Str]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:18827007">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Check_LH_fits_gefaelle]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:18827051">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Strecke"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Foerderer"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18827050" SubType="Then">
<CALLFUNCTION Id="RDK:18827049">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RückgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:18732456" CaseType="0">
<EXP><![CDATA[$C$Strecke]]></EXP>
<IFTHENELSE Id="RDK:18740516">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Foerderer"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Foerderer"]]></EXP>
</VALUECONDITION>
@@ -13253,9 +13327,6 @@ me.x
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:18740525">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Gefaellestrecke"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Gefaellestrecke"]]></EXP>
</VALUECONDITION>
@@ -13289,19 +13360,110 @@ me.x
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:18221763">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<IFTHENELSE Id="RDK:18462393">
<IFTHENELSE Id="RDK:18895373">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Kreisel"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895372" SubType="Then">
<CALLFUNCTION Id="RDK:18221763">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:18895399">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Gefaellestrecke"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895398" SubType="Then">
<CALLFUNCTION Id="RDK:18895397">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RückgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:18895325">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Calculate Foerderer Data]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RückgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<IFTHENELSE Id="RDK:18895329">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895328" SubType="Then">
<SET_STRUCT Id="RDK:18895326" VarRef="SSGParameter" ClearAll="True" ListRef="RückgabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeID]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:18895327">
<PAR Name="FuncName">
<EXP><![CDATA[$C$WriteShapeDataFoerderer]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$RückgabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:18895451">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Strecke"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="Foerderer"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895450" SubType="Then">
<CALLFUNCTION Id="RDK:18895449">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RückgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
<COMMENTS Id="RDK:18895415" DesignTimeRemark="//TODO" />
<IFTHENELSE Id="RDK:18462393" Suppressed="True">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Foerderer"]]></EXP>
</VALUECONDITION>
@@ -14792,11 +14954,10 @@ ShapeList["id="+Param.Input[1].shapeID].name
<VAR Id="RDK:18742667" Name="item_strecke" Type="Editor2DShapeType" />
<VAR Id="RDK:18742737" Name="item_0" Type="Editor2DShapeType" />
<VAR Id="RDK:18742668" Name="item_1" Type="Editor2DShapeType" />
<VAR Id="RDK:18742669" Name="cp_gefaellestrecke" Type="SSGConnectionPoint" />
<VAR Id="RDK:18742670" Name="streckenhoehe" Type="double" />
<VAR Id="RDK:18742670" Name="streckenhoehe" Type="double" Suppressed="True" />
<VAR Id="RDK:18827203" Name="hoehe" Type="double" />
<VAR Id="RDK:18742671" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18742672" Name="RueckgabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18760951" Name="cp_partner" Type="variant" />
</GROUP>
<SET Id="RDK:18742693" VarRef="item_0">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
@@ -14806,7 +14967,332 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:18742723">
<SELECTCASE Id="RDK:18827082">
<EXP><![CDATA[$=$item_0.family]]></EXP>
<CASEGROUP Id="RDK:18827142" CaseType="0">
<EXP><![CDATA[$C$Foerderer]]></EXP>
<COMMENTS Id="RDK:18827135" DesignTimeRemark="//Foerderer hat Index == 0" />
<SET Id="RDK:18827136" VarRef="item_strecke" Suppressed="True">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18895251" VarRef="cpId">
<EXP><![CDATA[$=$Param.Input[0].connectionPointID]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827140" VarRef="cp_partner" DesignTimeNotes="ShapeList[&quot;id=&quot;+Param.Input[0].shapeID].connectionPoints[&quot;cpId=&quot;+cpId]">
<EXP><![CDATA[$=$FromJSON(ShapeList["id="+Param.Input[1].shapeID].connectionPoints)["cpId="+cpId]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:18827137" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeID]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:18827138" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$cpId]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].connectionPointID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:18895253" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$]]></EXP>
</PAR>
<PAR Name="Dbl">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:18827141">
<PAR Name="FuncName">
<EXP><![CDATA[$C$GetHeightOfItem]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RueckgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SET Id="RDK:18895249" VarRef="hoehe">
<EXP><![CDATA[$=$RueckgabeListe["key=Hoehe"].Dbl]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:18895277">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895273" SubType="Then">
<SET Id="RDK:18895271" VarRef="item_0.FoerdererDefinition.HoeheOben">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18895281" VarRef="Shape_Prototype">
<EXP><![CDATA[$=$item_0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:18895283">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Calculate Foerderer]]></EXP>
</PAR>
<PAR Name="InputExp" />
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:18895276" SubType="Else">
<SET Id="RDK:18895274" VarRef="item_0.FoerdererDefinition.HoeheUnten">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18895285" VarRef="Shape_Prototype">
<EXP><![CDATA[$=$item_0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:18895287">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Calculate Foerderer]]></EXP>
</PAR>
<PAR Name="InputExp" />
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:18827084" CaseType="0">
<EXP><![CDATA[$C$Strecke]]></EXP>
<COMMENTS Id="RDK:18827100" DesignTimeRemark="//Strecke hat Index == 0" />
<SET Id="RDK:18827088" VarRef="item_strecke" Suppressed="True">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827094" VarRef="cpId">
<EXP><![CDATA[$=$Param.Input[0].connectionPointID]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:18827090" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeID]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:18827092" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$cpId]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].connectionPointID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:18868849" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$]]></EXP>
</PAR>
<PAR Name="Dbl">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:18827098">
<PAR Name="FuncName">
<EXP><![CDATA[$C$GetHeightOfItem]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RueckgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SET Id="RDK:18872332" VarRef="hoehe">
<EXP><![CDATA[$=$RueckgabeListe["key=Hoehe"].Dbl]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:18827233">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18827230" SubType="Then">
<SET Id="RDK:18827241" VarRef="item_0.StreckeDefinition.HoeheOben">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827246" VarRef="item_0.StreckeDefinition.HoeheUnten">
<EXP><![CDATA[$=$hoehe-StreckeData_defaults.Delta_h]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:18827232" SubType="Else">
<SET Id="RDK:18827243" VarRef="item_0.StreckeDefinition.HoeheUnten">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827248" VarRef="item_0.StreckeDefinition.HoeheOben">
<EXP><![CDATA[$=$hoehe+StreckeData_defaults.Delta_h]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:18827160" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
<COMMENTS Id="RDK:18827153" DesignTimeRemark="//Gefaellestrecke hat Index == 0" />
<SET Id="RDK:18827154" VarRef="item_strecke" Suppressed="True">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827157" VarRef="cpId">
<EXP><![CDATA[$=$Param.Input[0].connectionPointID]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827158" VarRef="cp_partner" DesignTimeNotes="ShapeList[&quot;id=&quot;+Param.Input[0].shapeID].connectionPoints[&quot;cpId=&quot;+cpId]">
<EXP><![CDATA[$=$FromJSON(ShapeList["id="+Param.Input[1].shapeID].connectionPoints)["cpId="+cpId]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:18827155" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeID]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:18827156" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$cpId]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].connectionPointID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:18895219" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$]]></EXP>
</PAR>
<PAR Name="Dbl">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:18827159">
<PAR Name="FuncName">
<EXP><![CDATA[$C$GetHeightOfItem]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RueckgabeListe]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SET Id="RDK:18895223" VarRef="hoehe">
<EXP><![CDATA[$=$RueckgabeListe["key=Hoehe"].Dbl]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:18895239">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895235" SubType="Then">
<SET Id="RDK:18895233" VarRef="item_0.GefaelleDefinition.HoeheOben">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:18895245">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Check_LH_fits_gefaelle]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:18895238" SubType="Else">
<SET Id="RDK:18895236" VarRef="item_0.GefaelleDefinition.HoeheUnten">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:18895247">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Check_LH_fits_gefaelle]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:18827081" CaseType="1">
<EXP />
</CASEGROUP>
</SELECTCASE>
<SET_STRUCT Id="RDK:18827193" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeID]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$item_0.id]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<IFTHENELSE Id="RDK:18742723" Suppressed="True">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Strecke"]]></EXP>
</VALUECONDITION>
@@ -14910,9 +15396,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
<GROUP Id="RDK:18741873" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:18741864" Name="item" Type="Editor2DShapeType" />
<VAR Id="RDK:18732502" Name="cpId" Type="string" />
<VAR Id="RDK:18741867" Name="cp_gefaellestrecke" Type="SSGConnectionPoint" />
<VAR Id="RDK:18741868" Name="hoehe" Type="double" />
<VAR Id="RDK:18741871" Name="jsonValues" Type="string" />
<VAR Id="RDK:18741872" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18741950" Name="RueckgabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18741959" Name="hoehe_oben" Type="double" />
@@ -14930,18 +15414,39 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$=$ShapeList["id="+shapeID]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18753151" VarRef="hoehe">
<SET Id="RDK:18753151" VarRef="hoehe" Suppressed="True">
<EXP><![CDATA[$C$0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SELECTCASE Id="RDK:18741918">
<EXP><![CDATA[$=$item.family]]></EXP>
<CASEGROUP Id="RDK:18741919" CaseType="0">
<EXP><![CDATA[$C$Kreisel]]></EXP>
<SET Id="RDK:18741946" VarRef="hoehe">
<EXP><![CDATA[$=$item.KreiselDefinition.Hoehe]]></EXP>
<EXP><![CDATA[$C$Strecke]]></EXP>
<SET Id="RDK:18827171" VarRef="hoehe_oben">
<EXP><![CDATA[$=$item.StreckeDefinition.HoeheOben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827173" VarRef="hoehe_unten">
<EXP><![CDATA[$=$item.StreckeDefinition.HoeheUnten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:18895307">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18895304" SubType="Then">
<SET Id="RDK:18895303" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_oben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:18895306" SubType="Else">
<SET Id="RDK:18895305" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_unten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:18741924" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
@@ -14953,7 +15458,50 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$=$item.GefaelleDefinition.HoeheUnten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18753154" VarRef="hoehe">
<IFTHENELSE Id="RDK:18912104">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$item.GefaelleDefinition.LH_fits]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18912101" SubType="Then">
<IFTHENELSE Id="RDK:18827185">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18827182" SubType="Then">
<SET Id="RDK:18827181" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_oben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:18827184" SubType="Else">
<SET Id="RDK:18827183" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_unten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
<GROUP Id="RDK:18912103" SubType="Else">
<IFTHENELSE Id="RDK:18912144">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18912141" SubType="Then">
<SET Id="RDK:18912142" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_unten + item.GefaelleDefinition.H_th]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:18912143" SubType="Else">
<SET Id="RDK:18912140" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_oben - item.GefaelleDefinition.H_th]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<SET Id="RDK:18753154" VarRef="hoehe" Suppressed="True">
<EXP><![CDATA[$=$IIF(hoehe_oben<0.001, hoehe_unten, hoehe_oben)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
@@ -14968,13 +15516,63 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$=$item.FoerdererDefinition.H_0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18753165" VarRef="hoehe">
<IFTHENELSE Id="RDK:18928848">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$item.FoerdererDefinition.LH_fits]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18928841" SubType="Then">
<IFTHENELSE Id="RDK:18928840">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpId="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18928837" SubType="Then">
<SET Id="RDK:18928836" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_oben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:18928839" SubType="Else">
<SET Id="RDK:18928838" VarRef="hoehe">
<EXP><![CDATA[$=$hoehe_unten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
<GROUP Id="RDK:18928847" SubType="Else">
<COMMENTS Id="RDK:18928861" DesignTimeRemark="//Foerdererhoehe sind nicht definiert." />
<ACTION_CALL Id="RDK:18928865" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="MsgText">
<EXP><![CDATA[$C$Hoehe des Foedereres sind nicht definiert.]]></EXP>
</PAR>
<PAR Name="MsgStyle" />
<PAR Name="BtnLayout" />
<PAR Name="MsgCaption" />
<PAR Name="BaloonType" />
<PAR Name="BtnPressed">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
</ACTION_CALL>
<SET Id="RDK:18928859" VarRef="hoehe">
<EXP><![CDATA[$=$0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<SET Id="RDK:18753165" VarRef="hoehe" Suppressed="True">
<EXP><![CDATA[$=$IIF(hoehe_oben<0.001, StrToDbl(hoehe_unten), StrToDbl(hoehe_oben))]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:18741920" CaseType="1">
<EXP />
<SET Id="RDK:18928863" VarRef="hoehe">
<EXP><![CDATA[$=$0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<ACTION_CALL Id="RDK:18741966" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -14992,7 +15590,80 @@ ShapeList["id="+Param.Input[1].shapeID].name
</ACTION_CALL>
</CASEGROUP>
</SELECTCASE>
<SET_STRUCT Id="RDK:18741938" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<SET_STRUCT Id="RDK:18865382" VarRef="SSGParameter" ClearAll="True" ListRef="RueckgabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="Str" />
<PAR Name="Dbl">
<EXP><![CDATA[$=$hoehe]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET Id="RDK:18850809" VarRef="Param.Result">
<EXP><![CDATA[$=$RueckgabeListe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SELECTCASE Id="RDK:18827126" Suppressed="True">
<EXP><![CDATA[$=$item.family]]></EXP>
<CASEGROUP Id="RDK:18827115" CaseType="0">
<EXP><![CDATA[$C$Kreisel]]></EXP>
<SET Id="RDK:18827114" VarRef="hoehe">
<EXP><![CDATA[$=$item.KreiselDefinition.Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:18827119" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
<SET Id="RDK:18827116" VarRef="hoehe_oben">
<EXP><![CDATA[$=$item.GefaelleDefinition.HoeheOben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827117" VarRef="hoehe_unten">
<EXP><![CDATA[$=$item.GefaelleDefinition.HoeheUnten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827118" VarRef="hoehe">
<EXP><![CDATA[$=$IIF(hoehe_oben<0.001, hoehe_unten, hoehe_oben)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:18827123" CaseType="0">
<EXP><![CDATA[$C$Foerderer]]></EXP>
<SET Id="RDK:18827120" VarRef="hoehe_oben">
<EXP><![CDATA[$=$item.FoerdererDefinition.H_1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827121" VarRef="hoehe_unten">
<EXP><![CDATA[$=$item.FoerdererDefinition.H_0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18827122" VarRef="hoehe">
<EXP><![CDATA[$=$IIF(hoehe_oben<0.001, StrToDbl(hoehe_unten), StrToDbl(hoehe_oben))]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:18827125" CaseType="1">
<EXP />
<ACTION_CALL Id="RDK:18827124" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="MsgText">
<EXP><![CDATA[$C$Dieses Element zum Auslesen der Höhe ist noch nicht implementiert]]></EXP>
</PAR>
<PAR Name="MsgStyle" />
<PAR Name="BtnLayout" />
<PAR Name="MsgCaption" />
<PAR Name="BaloonType" />
<PAR Name="BtnPressed">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
</ACTION_CALL>
</CASEGROUP>
</SELECTCASE>
<SET_STRUCT Id="RDK:18741938" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe" Suppressed="True">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>