erste Hülle der Pattern Funktion erstellt. Kopien werden noch nicht erstellt

This commit is contained in:
2024-07-08 16:37:34 +02:00
parent 4a64fd5384
commit 42a0a03343
+127 -8
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="2024-07-08T15:44:58" LanguageVersion="2014.1.3.680" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="m.stangl [ENTW-NB08]" ModDate="2024-07-08T16:36:18" LanguageVersion="2014.1.3.680" />
<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">
@@ -986,10 +986,13 @@
<VAR Id="RDK:1007447" Name="Point2DList" Type="Point2D[]" />
<VAR Id="RDK:1007444" Name="Point2D" Type="Point2D" />
<VAR Id="RDK:1519830" Name="SessionZip" Type="string" />
<VAR Id="RDK:20514758" Name="cpId" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20518135" Name="shapeI" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20549716" Name="RueckgabeListe" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20578895" Name="searchedTypes" Type="string[]" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20514758" Name="cpId" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20518135" Name="shapeI" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20549716" Name="RueckgabeListe" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20578895" Name="searchedTypes" Type="string[]" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20579082" Name="shapeId" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20579085" Name="shapeList_idx_0" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:20579088" Name="shape_index" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
</GROUP>
<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -15538,7 +15541,123 @@ me.x
<PAR Name="AdvancedOptions" />
</SET>
</FUNCTION>
<FUNCTION Id="RDK:20579036" Name="doPattern" InputTypeName="string[]" />
<FUNCTION Id="RDK:20579036" Name="doPattern" DesignTimeRemark="erzeugt ein Muster dieser Gefällestrecke / Förderers an den verbundenen Kreise(ln)" InputTypeName="string[]">
<GROUP Id="RDK:20579050" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20579045" Name="shapeItem" Type="Editor2DShapeType" />
<VAR Id="RDK:20579046" Name="selectedIds" Type="string[]">
<SET Id="RDK:20579047" VarRef="me">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:20579049" Name="shapeId" Type="string" />
<VAR Id="RDK:20579090" Name="shape_index" Type="string" />
</GROUP>
<FOREACHLOOP Id="RDK:20579072" ItemVarRef="shapeId">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$=$selectedIds]]></EXP>
</PAR>
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<CALLFUNCTION Id="RDK:20579087">
<PAR Name="FuncName">
<EXP><![CDATA[$C$IndexOfByFieldValue_SSG]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$shapeId]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$shape_index]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SET Id="RDK:20579092" VarRef="Shape_Prototype">
<EXP><![CDATA[$=$ShapeList["id="+shapeId]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SELECTCASE Id="RDK:20579308">
<EXP><![CDATA[$=$Shape_Prototype.family]]></EXP>
<CASEGROUP Id="RDK:20579229" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
<CALLFUNCTION Id="RDK:20579094">
<PAR Name="FuncName">
<EXP><![CDATA[$C$CreatePrototype_Gefaellestrecke]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$shapeId]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:20579314">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$shapeId]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</CASEGROUP>
<CASEGROUP Id="RDK:20579240" CaseType="0">
<EXP><![CDATA[$C$Foerderer]]></EXP>
<CALLFUNCTION Id="RDK:20579312">
<PAR Name="FuncName">
<EXP><![CDATA[$C$CreatePrototype_Foerderer]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$shapeId]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:20579096">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$shapeId]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</CASEGROUP>
<CASEGROUP Id="RDK:20579307" CaseType="1">
<EXP />
<ACTION_CALL Id="RDK:20579316" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="MsgText">
<EXP><![CDATA[$C$Mustern nur möglich für Förder und Gefällestrecke]]></EXP>
</PAR>
<PAR Name="MsgStyle">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="BtnLayout">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="MsgCaption" />
<PAR Name="BaloonType" />
<PAR Name="BtnPressed">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
</ACTION_CALL>
<EXIT_PROCESS Id="RDK:20579318" BreakType="4" ExitStatus="0" />
</CASEGROUP>
</SELECTCASE>
</FOREACHLOOP>
</FUNCTION>
<FUNCTION Id="RDK:1516909" Name="CSVExport" Bookmarked="True">
<GROUP Id="RDK:1516850" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<GROUP Id="RDK:1516849" Name="CSV Export" SubType="VarSet" IncludeDate="0">
@@ -23793,6 +23912,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$=$Button]]></EXP>
<CASEGROUP Id="RDK:357" CaseType="0" DesignTimeRemark="Mustern">
<EXP><![CDATA[$C$CUSTOM1]]></EXP>
<COMMENTS Id="RDK:20579034" DesignTimeRemark="get selected Items of special type" DesignTimeTip="param" DesignTimeNotes="Process Name:&#xD;&#xA;MAIN_SSG.rdx&#xD;&#xA;&#xD;&#xA;Process Requires:&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;Author:&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;Creation Date:&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;Functionality:&#xD;&#xA;&#xD;&#xA;Changes:&#xD;&#xA;20231005 -1- \DVR&#xD;&#xA;ERK-47&#xD;&#xA;Höhenänderung Gefällestrecke (Pufferstrecke)&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;20230928 -1- \DVR&#xD;&#xA;ERK-47&#xD;&#xA;Höhenänderung Kreisel" />
<SET Id="RDK:20579025" VarRef="searchedTypes">
<EXP><![CDATA[$=$NewListStr()]]></EXP>
<PAR Name="AdvancedOptions" />
@@ -23809,7 +23929,6 @@ ShapeList["id="+Param.Input[1].shapeID].name
</PAR>
<PAR Name="POS_TO_ADD" />
</LIST_ADD>
<COMMENTS Id="RDK:20579034" DesignTimeRemark="get selected Items of special type" DesignTimeTip="param" DesignTimeNotes="Process Name:&#xD;&#xA;MAIN_SSG.rdx&#xD;&#xA;&#xD;&#xA;Process Requires:&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;Author:&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;Creation Date:&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;Functionality:&#xD;&#xA;&#xD;&#xA;Changes:&#xD;&#xA;20231005 -1- \DVR&#xD;&#xA;ERK-47&#xD;&#xA;Höhenänderung Gefällestrecke (Pufferstrecke)&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;20230928 -1- \DVR&#xD;&#xA;ERK-47&#xD;&#xA;Höhenänderung Kreisel" />
<CALLFUNCTION Id="RDK:20549450">
<PAR Name="FuncName">
<EXP><![CDATA[$C$GetSelected]]></EXP>
@@ -23828,7 +23947,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$C$doPattern]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$seletedIds]]></EXP>
<EXP><![CDATA[$=$selectedIds]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>