Routine für den Dropdown der Weichen geschrieben. Test mit aktuellem Interface zur Auswahl von mechanisch und pneumatisch

This commit is contained in:
2025-02-27 10:27:39 +01:00
parent dfb4ff961b
commit 83d697b162
+510 -284
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="m.stangl [ENTW-NB08]" ModDate="2025-02-26T12:56:54" LanguageVersion="2014.1.3.699" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="m.stangl [ENTW-NB08]" ModDate="2025-02-26T23:24:54" LanguageVersion="2014.1.3.699" />
<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">
@@ -167,7 +167,7 @@
<FIELD Id="RDK:23017101" Name="n_Sep" Type="integer" />
<FIELD Id="RDK:23017102" Name="n_Scan" Type="integer" />
</TYPE>
<TYPE Id="RDK:23017447" Name="OFBogenType" Expanded="True" SubType="structure" HasArrayType="True">
<TYPE Id="RDK:23017447" Name="OFBogenType" SubType="structure" HasArrayType="True">
<TYPE_VALUES />
<FIELD Id="RDK:23017438" Name="Beschreibung" Type="string" />
<FIELD Id="RDK:23017439" Name="L1" Type="double" />
@@ -1251,6 +1251,10 @@
<VAR Id="RDK:23038271" Name="OFBogenItem" Type="DataSourceValInfo" />
<VAR Id="RDK:23038275" Name="OFBogenItemList" Type="DataSourceValInfo[]" />
</GROUP>
<GROUP Id="RDK:23279536" Name="Weichenart" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:23279534" Name="WeichenArtItem" Type="DataSourceValInfo" />
<VAR Id="RDK:23279535" Name="WeichenArtItemList" Type="DataSourceValInfo[]" />
</GROUP>
<GROUP Id="RDK:23221911" Name="OFWeiche" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:23221909" Name="OFWeicheItem" Type="DataSourceValInfo" />
<VAR Id="RDK:23221910" Name="OFWeicheItemList" Type="DataSourceValInfo[]" />
@@ -11501,48 +11505,6 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
</IFTHENELSE>
</FUNCTION>
<GROUP Id="RDK:23270677" Name="Omniflo" SubType="FunctionSet" IncludeDate="0">
<FUNCTION Id="RDK:23270699" Name="SSGParamKeyExists" InputTypeName="SSGParameter[]" ResultTypeName="boolean">
<GROUP Id="RDK:23270692" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:23270690" Name="key" Type="string">
<SET Id="RDK:23270689" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:23270707" Name="Params" Type="SSGParameter[]">
<SET Id="RDK:23270709" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[1]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:23270712" Name="Param" Type="SSGParam" />
<VAR Id="RDK:23270701" Name="result" Type="boolean" />
</GROUP>
<FOREACHLOOP Id="RDK:23270697" ItemVarRef="Param">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$=$Params]]></EXP>
</PAR>
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<IFTHENELSE Id="RDK:23270696">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$key = Param.key]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23270695" SubType="Then">
<SET Id="RDK:23270693" VarRef="Param.Result">
<EXP><![CDATA[$C$True]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<EXIT_PROCESS Id="RDK:23270694" BreakType="4" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</FOREACHLOOP>
<SET Id="RDK:23270720" VarRef="Param.Result">
<EXP><![CDATA[$C$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</FUNCTION>
<FUNCTION Id="RDK:23040220" Name="GetOFBogenData" InputTypeName="string" ResultTypeName="OFBogenType">
<GROUP Id="RDK:23040184" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:23040183" Name="SivasNummer" Type="string">
@@ -11995,6 +11957,12 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<GROUP Id="RDK:23222011" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:23275521" Name="Local_Buffer" Type="DataSourceValInfo[]" />
<VAR Id="RDK:23265069" Name="ToAdd" Type="OFWeicheType" />
<VAR Id="RDK:23278519" Name="nUnknown" Type="integer">
<SET Id="RDK:23278523" VarRef="Me">
<EXP><![CDATA[$=$0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:23270608" Name="Winkel" Type="string" />
<VAR Id="RDK:23270612" Name="Länge" Type="string" />
<VAR Id="RDK:23270616" Name="Breite" Type="string" />
@@ -12006,6 +11974,50 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
</SET>
</VAR>
</GROUP>
<IFTHENELSE Id="RDK:23278511">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$isEmpty(Weiche.KurvenWinkel)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23278512" SubType="Then">
<SET Id="RDK:23278529" VarRef="nUnknown">
<EXP><![CDATA[$=$nUnknown+1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23278547">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$isEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23278546" SubType="Then">
<SET Id="RDK:23278545" VarRef="nUnknown">
<EXP><![CDATA[$=$nUnknown+1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23278555">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$isEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23278554" SubType="Then">
<SET Id="RDK:23278553" VarRef="nUnknown">
<EXP><![CDATA[$=$nUnknown+1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23278539">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$isEmpty(Weiche.Schaltungstyp)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23278538" SubType="Then">
<SET Id="RDK:23278537" VarRef="nUnknown">
<EXP><![CDATA[$=$nUnknown+1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<FOREACHLOOP Id="RDK:23265063" ItemVarRef="ToAdd">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$=$OFWeichenData]]></EXP>
@@ -12013,23 +12025,250 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<IFTHENELSE Id="RDK:23275452">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.KurvenWinkel)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.KurvenWinkel = ToAdd.KurvenWinkel]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275451" SubType="Then">
<IFTHENELSE Id="RDK:23275495">
<SELECTCASE Id="RDK:23278585">
<EXP><![CDATA[$=$nUnknown]]></EXP>
<CASEGROUP Id="RDK:23278586" CaseType="0">
<EXP><![CDATA[$C$2]]></EXP>
<IFTHENELSE Id="RDK:23275452">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.KurvenWinkel)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.KurvenWinkel = ToAdd.KurvenWinkel]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275451" SubType="Then">
<IFTHENELSE Id="RDK:23275495">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Schaltungstyp)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Schaltungstyp = ToAdd.Schaltungstyp]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275493" SubType="Then">
<SET_STRUCT Id="RDK:23275492" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275664" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275565">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275564" SubType="Then">
<SET_STRUCT Id="RDK:23275563" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275666" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275580">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275579" SubType="Then">
<SET_STRUCT Id="RDK:23275578" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275668" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275606">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Schaltungstyp)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Schaltungstyp= ToAdd.Schaltungstyp]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275605" SubType="Then">
<IFTHENELSE Id="RDK:23275612">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275611" SubType="Then">
<SET_STRUCT Id="RDK:23275610" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275670" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275609">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275608" SubType="Then">
<SET_STRUCT Id="RDK:23275607" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275672" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275646">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275645" SubType="Then">
<IFTHENELSE Id="RDK:23275649">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275648" SubType="Then">
<SET_STRUCT Id="RDK:23275647" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275674" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:23278589" CaseType="0">
<EXP><![CDATA[$C$1]]></EXP>
<IFTHENELSE Id="RDK:23275708">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.KurvenWinkel)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.KurvenWinkel = ToAdd.KurvenWinkel]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275707" SubType="Then">
<SET_STRUCT Id="RDK:23275719" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275721" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275706">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275705" SubType="Then">
<SET_STRUCT Id="RDK:23275703" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275704" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275702">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275701" SubType="Then">
<SET_STRUCT Id="RDK:23275699" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275700" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275698">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Schaltungstyp)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Schaltungstyp = ToAdd.Schaltungstyp]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275493" SubType="Then">
<SET_STRUCT Id="RDK:23275492" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<GROUP Id="RDK:23275697" SubType="Then">
<SET_STRUCT Id="RDK:23275695" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
@@ -12040,229 +12279,14 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275664" BreakType="2" ExitStatus="0" />
<EXIT_PROCESS Id="RDK:23275696" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275565">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275564" SubType="Then">
<SET_STRUCT Id="RDK:23275563" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275666" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275580">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275579" SubType="Then">
<SET_STRUCT Id="RDK:23275578" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275668" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275606">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Schaltungstyp)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Schaltungstyp= ToAdd.Schaltungstyp]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275605" SubType="Then">
<IFTHENELSE Id="RDK:23275612">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275611" SubType="Then">
<SET_STRUCT Id="RDK:23275610" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275670" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275609">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275608" SubType="Then">
<SET_STRUCT Id="RDK:23275607" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275672" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275646">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275645" SubType="Then">
<IFTHENELSE Id="RDK:23275649">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275648" SubType="Then">
<SET_STRUCT Id="RDK:23275647" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275674" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275708">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.KurvenWinkel)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.KurvenWinkel = ToAdd.KurvenWinkel]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275707" SubType="Then">
<SET_STRUCT Id="RDK:23275719" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275721" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275706">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Breite)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Breite= ToAdd.Breite]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275705" SubType="Then">
<SET_STRUCT Id="RDK:23275703" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275704" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275702">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Länge)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Länge= ToAdd.Länge]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275701" SubType="Then">
<SET_STRUCT Id="RDK:23275699" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275700" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:23275698">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(Weiche.Schaltungstyp)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$Weiche.Schaltungstyp = ToAdd.Schaltungstyp]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:23275697" SubType="Then">
<SET_STRUCT Id="RDK:23275695" VarRef="OFWeicheItem" ClearAll="True" ListRef="Local_Buffer">
<PAR Name="Value">
<EXP><![CDATA[$=$ToAdd.Sivasnr]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$=$ToAdd.ProfilTyp]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<EXIT_PROCESS Id="RDK:23275696" BreakType="2" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:23278587" CaseType="1">
<EXP />
</CASEGROUP>
</SELECTCASE>
</FOREACHLOOP>
<SET Id="RDK:23222041" VarRef="OFWeicheItemList">
<EXP><![CDATA[$=$Local_Buffer]]></EXP>
@@ -12911,14 +12935,18 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<EXP><![CDATA[$=$DatenSelected.Sivasnr]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:23222178" VarRef="Shape_Prototype.OFWeicheDefinition.WeichenTyp">
<EXP><![CDATA[$=$DatenSelected.WeichenTyp]]></EXP>
<SET Id="RDK:23283205" VarRef="Shape_Prototype.OFWeicheDefinition.Schaltungstyp">
<EXP><![CDATA[$=$DatenSelected.Schaltungstyp]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:23222179" VarRef="Shape_Prototype.OFWeicheDefinition.KurvenWinkel">
<EXP><![CDATA[$=$DatenSelected.KurvenWinkel]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:23283207" VarRef="Shape_Prototype.OFWeicheDefinition.KurvenRichtung">
<EXP><![CDATA[$=$DatenSelected.KurvenRichtung]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:23264136" VarRef="Shape_Prototype.OFWeicheDefinition.Breite">
<EXP><![CDATA[$=$DatenSelected.Breite]]></EXP>
<PAR Name="AdvancedOptions" />
@@ -12927,8 +12955,8 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<EXP><![CDATA[$=$DatenSelected.Länge]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:23222180" VarRef="Shape_Prototype.OFWeicheDefinition.Radius">
<EXP><![CDATA[$=$DatenSelected.Radius]]></EXP>
<SET Id="RDK:23283209" VarRef="Shape_Prototype.OFWeicheDefinition.Hoehe">
<EXP><![CDATA[$=$DatenSelected.Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<GROUP Id="RDK:23264132" Name="OFWeiche UI panels" SubType="Generic">
@@ -13099,6 +13127,65 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<EXP><![CDATA[$C$(SINGLESELECT)]]></EXP>
</PAR>
</ACTION_CALL>
<ACTION_CALL Id="RDK:23283203" Name="RDEngineering_ModernUIControl" DesignTimeRemark="{ActionType} {PanelName} &lt;-- {UIType}:{Field} {Id} {ParentID}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="RenderList">
<EXP><![CDATA[$=$Render_OFWeiche]]></EXP>
</PAR>
<PAR Name="PanelName">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="CustomPanel" />
<PAR Name="ActionType">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="Id">
<EXP><![CDATA[$C$Schaltungstyp]]></EXP>
</PAR>
<PAR Name="ParentId" />
<PAR Name="Label">
<EXP><![CDATA[$C$Mech/Pneu]]></EXP>
</PAR>
<PAR Name="Field">
<EXP><![CDATA[$C$Schaltungstyp]]></EXP>
</PAR>
<PAR Name="Value" />
<PAR Name="Uom" />
<PAR Name="Tooltip" />
<PAR Name="Styles" />
<PAR Name="Classes">
<EXP><![CDATA[$C$col-2]]></EXP>
</PAR>
<PAR Name="Rules" />
<PAR Name="Image" />
<PAR Name="ControlType">
<EXP><![CDATA[$C$dropdown]]></EXP>
</PAR>
<PAR Name="ButtonSubType" />
<PAR Name="DropdownSubType" />
<PAR Name="TextboxSubType" />
<PAR Name="Action" />
<PAR Name="Required">
<EXP><![CDATA[$C$True]]></EXP>
</PAR>
<PAR Name="Hidden" />
<PAR Name="ROnly" />
<PAR Name="Disabled" />
<PAR Name="Pressed" />
<PAR Name="AutoCommit">
<EXP><![CDATA[$=$True]]></EXP>
</PAR>
<PAR Name="ValidateFail" />
<PAR Name="ValidateMsg" />
<PAR Name="DataSource">
<EXP><![CDATA[$=$WeichenArtItemList]]></EXP>
</PAR>
<PAR Name="Options">
<EXP><![CDATA[$C$(SINGLESELECT)]]></EXP>
</PAR>
</ACTION_CALL>
<ACTION_CALL Id="RDK:23264127" Name="RDEngineering_ModernUIControl" DesignTimeRemark="{ActionType} {PanelName} &lt;-- {UIType}:{Field} {Id} {ParentID}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -20714,14 +20801,14 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<PAR Name="L3" />
<PAR Name="Hoehe" />
<PAR Name="KurvenWinkel">
<EXP><![CDATA[$C$45]]></EXP>
<EXP><![CDATA[$=$Shape_Prototype.OFWeicheDefinition.KurvenWinkel]]></EXP>
</PAR>
<PAR Name="KurvenRichtung" />
<PAR Name="isOk" />
<PAR Name="Sivasnr" />
<PAR Name="ProfilTyp" />
<PAR Name="Schaltungstyp">
<EXP><![CDATA[$C$M]]></EXP>
<EXP><![CDATA[$C$Shape_Prototype.OFWeicheDefinition.Schaltungstyp]]></EXP>
</PAR>
<PAR Name="AntriebKurve" />
<PAR Name="n_Sep" />
@@ -20828,6 +20915,58 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:23285047" Name="Group" SubType="Generic">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$FieldAffected="Schaltungstyp"]]></EXP>
</VALUECONDITION>
<SET_STRUCT Id="RDK:23285065" VarRef="Weiche" ClearAll="True">
<PAR Name="Beschreibung" />
<PAR Name="WeichenTyp" />
<PAR Name="L1" />
<PAR Name="L2" />
<PAR Name="L3" />
<PAR Name="Hoehe" />
<PAR Name="KurvenWinkel">
<EXP><![CDATA[$=$Shape_Prototype.OFWeicheDefinition.KurvenWinkel]]></EXP>
</PAR>
<PAR Name="KurvenRichtung" />
<PAR Name="isOk" />
<PAR Name="Sivasnr" />
<PAR Name="ProfilTyp" />
<PAR Name="Schaltungstyp">
<EXP><![CDATA[$=$Shape_Prototype.OFWeicheDefinition.Schaltungstyp]]></EXP>
</PAR>
<PAR Name="AntriebKurve" />
<PAR Name="n_Sep" />
<PAR Name="n_Scan" />
<PAR Name="Länge" />
<PAR Name="Breite" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:23285061">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetDropdownOfWeiche]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Weiche]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:23285046">
<PAR Name="FuncName">
<EXP><![CDATA[$C$RefreshOFWeicheUI]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Shape_Prototype.OFWeicheDefinition.Sivasnr]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</CASEGROUP>
<CASEGROUP Id="RDK:23222228" CaseType="0">
<EXP><![CDATA[$C$CLOSEPOPUP]]></EXP>
@@ -43782,6 +43921,30 @@ ShapeList["id="+Param.Input[1].shapeID].name
</GROUP>
</GROUP>
<GROUP Id="RDK:23222511" Name="OFWeicheUI" SubType="Generic">
<GROUP Id="RDK:23279528" Name="Weichenart" SubType="Generic">
<SET_STRUCT Id="RDK:23279526" VarRef="WeichenArtItem" ClearAll="True" ListRef="WeichenArtItemList">
<PAR Name="Value">
<EXP><![CDATA[$C$M]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$C$Mechnisch]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:23279527" VarRef="WeichenArtItem" ClearAll="True" ListRef="WeichenArtItemList">
<PAR Name="Value">
<EXP><![CDATA[$C$P]]></EXP>
</PAR>
<PAR Name="Prompt">
<EXP><![CDATA[$C$Pneumatisch]]></EXP>
</PAR>
<PAR Name="Image" />
<PAR Name="Tooltip" />
<PAR Name="Tags" />
</SET_STRUCT>
</GROUP>
<GROUP Id="RDK:23222531" Name="OFWeiche UI panels" SubType="Generic">
<ACTION_CALL Id="RDK:23222498" Name="RDEngineering_ModernUIPanel" DesignTimeRemark="{PanelName} {BindingType}">
<PAR Name="RDLibraryName">
@@ -43976,6 +44139,65 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$C$(SINGLESELECT)]]></EXP>
</PAR>
</ACTION_CALL>
<ACTION_CALL Id="RDK:23279520" Name="RDEngineering_ModernUIControl" DesignTimeRemark="{ActionType} {PanelName} &lt;-- {UIType}:{Field} {Id} {ParentID}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="RenderList">
<EXP><![CDATA[$=$Render_OFWeiche]]></EXP>
</PAR>
<PAR Name="PanelName">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="CustomPanel" />
<PAR Name="ActionType">
<EXP><![CDATA[$C$0]]></EXP>
</PAR>
<PAR Name="Id">
<EXP><![CDATA[$C$Schaltungstyp]]></EXP>
</PAR>
<PAR Name="ParentId" />
<PAR Name="Label">
<EXP><![CDATA[$C$Mech/Pneu]]></EXP>
</PAR>
<PAR Name="Field">
<EXP><![CDATA[$C$Schaltungstyp]]></EXP>
</PAR>
<PAR Name="Value" />
<PAR Name="Uom" />
<PAR Name="Tooltip" />
<PAR Name="Styles" />
<PAR Name="Classes">
<EXP><![CDATA[$C$col-2]]></EXP>
</PAR>
<PAR Name="Rules" />
<PAR Name="Image" />
<PAR Name="ControlType">
<EXP><![CDATA[$C$dropdown]]></EXP>
</PAR>
<PAR Name="ButtonSubType" />
<PAR Name="DropdownSubType" />
<PAR Name="TextboxSubType" />
<PAR Name="Action" />
<PAR Name="Required">
<EXP><![CDATA[$C$True]]></EXP>
</PAR>
<PAR Name="Hidden" />
<PAR Name="ROnly" />
<PAR Name="Disabled" />
<PAR Name="Pressed" />
<PAR Name="AutoCommit">
<EXP><![CDATA[$=$True]]></EXP>
</PAR>
<PAR Name="ValidateFail" />
<PAR Name="ValidateMsg" />
<PAR Name="DataSource">
<EXP><![CDATA[$=$WeichenArtItemList]]></EXP>
</PAR>
<PAR Name="Options">
<EXP><![CDATA[$C$(SINGLESELECT)]]></EXP>
</PAR>
</ACTION_CALL>
<ACTION_CALL Id="RDK:23222528" Name="RDEngineering_ModernUIControl" DesignTimeRemark="{ActionType} {PanelName} &lt;-- {UIType}:{Field} {Id} {ParentID}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
@@ -44792,13 +45014,17 @@ ShapeList["id="+Param.Input[1].shapeID].name
<PAR Name="L1" />
<PAR Name="L2" />
<PAR Name="L3" />
<PAR Name="Hoehe" />
<PAR Name="Hoehe">
<EXP><![CDATA[$C$2000]]></EXP>
</PAR>
<PAR Name="KurvenWinkel" />
<PAR Name="KurvenRichtung" />
<PAR Name="isOk" />
<PAR Name="Sivasnr" />
<PAR Name="ProfilTyp" />
<PAR Name="Schaltungstyp" />
<PAR Name="Schaltungstyp">
<EXP><![CDATA[$C$M]]></EXP>
</PAR>
<PAR Name="AntriebKurve" />
<PAR Name="n_Sep" />
<PAR Name="n_Scan" />