CSV Export einer Gruppe implementiert.

This commit is contained in:
2024-11-05 16:46:55 +01:00
parent b80f37b6d8
commit a2249bc53a
+107 -83
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-11-04T18:38:27" LanguageVersion="2014.1.3.699" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="m.stangl [ENTW-NB08]" ModDate="2024-11-05T16:44:37" 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">
@@ -84,7 +84,7 @@
<FIELD Id="RDK:18732232" Name="H_Ende" Type="double" />
<FIELD Id="RDK:18732250" Name="Delta_h" Type="double" DesignTimeRemark="Höhendifferenz" />
<FIELD Id="RDK:22007215" Name="KurvenWinkel" Type="double" DesignTimeRemark="Angabe in Grad ob 30, 60 oder 90 Grad Bogen" />
<FIELD Id="RDK:22007211" Name="isRechts" Type="boolean" DesignTimeRemark="true, wenn eine Rechtskurve, ansonsten links" />
<FIELD Id="RDK:22007211" Name="KurvenRichtung" Type="string" DesignTimeRemark="true, wenn eine Rechtskurve, ansonsten links" />
<FIELD Id="RDK:21700894" Name="isOk" Type="boolean" DesignTimeRemark="True beide Punkte angebunden sind und die Höhen der Nachbarn passen" />
</TYPE>
<TYPE Id="RDK:21686352" Name="KurveFoerdererType" SubType="structure">
@@ -94,7 +94,7 @@
<FIELD Id="RDK:21686347" Name="H_Anfang" Type="double" />
<FIELD Id="RDK:21686348" Name="H_Ende" Type="double" />
<FIELD Id="RDK:22007217" Name="KurvenWinkel" Type="double" DesignTimeRemark="Angabe in Grad ob 30, 60 oder 90 Grad Bogen" />
<FIELD Id="RDK:22007213" Name="isRechts" Type="boolean" DesignTimeRemark="true, wenn eine Rechtskurve, ansonsten links" />
<FIELD Id="RDK:22007213" Name="KurvenRichtung" Type="string" DesignTimeRemark="true, wenn eine Rechtskurve, ansonsten links" />
<FIELD Id="RDK:21700896" Name="isOk" Type="boolean" DesignTimeRemark="True beide Punkte angebunden sind und die Höhen der Nachbarn passen" />
</TYPE>
<TYPE Id="RDK:18116690" Name="FoerdererType" SubType="structure">
@@ -799,19 +799,19 @@
<FIELD Id="RDK:903600" Name="Länge in Meter" Type="string" />
<FIELD Id="RDK:1674242" Name="Anzahl der Scanner" Type="integer" />
</TYPE>
<TYPE Id="RDK:18732296" Name="KurveMerkmaleType" SubType="structure">
<TYPE Id="RDK:18732296" Name="KurveMerkmaleType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:18732294" Name="Länge in Meter" Type="string" />
<FIELD Id="RDK:22010909" Name="Rechtskurve" Type="boolean" />
<FIELD Id="RDK:22010909" Name="Kurvenrichtung" Type="string" />
<FIELD Id="RDK:22010915" Name="Kurvenwinkel" Type="double" />
</TYPE>
<TYPE Id="RDK:21693243" Name="KurveFoerdererMerkmaleType" SubType="structure">
<TYPE Id="RDK:21693243" Name="KurveFoerdererMerkmaleType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:21693241" Name="Länge in Meter" Type="string" />
<FIELD Id="RDK:22010911" Name="Rechtskurve" Type="boolean" />
<FIELD Id="RDK:22010911" Name="Kurvenrichtung" Type="string" />
<FIELD Id="RDK:22010913" Name="Kurvenwinkel" Type="double" />
</TYPE>
<TYPE Id="RDK:18111807" Name="FoerdererMerkmaleType" SubType="structure">
<TYPE Id="RDK:18111807" Name="FoerdererMerkmaleType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:18131140" Name="Höhe ETF oben in Meter" Type="string" />
<FIELD Id="RDK:18131142" Name="Höhe ETF unten in Meter" Type="string" />
@@ -821,22 +821,26 @@
<FIELD Id="RDK:18131150" Name="Gesamtanzahl Separatoren" Type="string" />
<FIELD Id="RDK:18131148" Name="Anzahl Scanner" Type="string" />
</TYPE>
<TYPE Id="RDK:973721" Name="WeicheMerkmaleType" SubType="structure">
<TYPE Id="RDK:973721" Name="WeicheMerkmaleType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:973723" Name="Weichenart" Type="string" />
</TYPE>
<TYPE Id="RDK:1664608" Name="EckradMerkmaleType" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE Id="RDK:1664608" Name="EckradMerkmaleType" Expanded="True" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE_VALUES />
<FIELD Id="RDK:1664607" Name="Höhe in m" Type="string" />
</TYPE>
<TYPE Id="RDK:1668585" Name="BTMTBeladungMerkmaleType" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE Id="RDK:1668585" Name="BTMTBeladungMerkmaleType" Expanded="True" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE_VALUES />
<FIELD Id="RDK:1668591" Name="Höhe in m" Type="string" Suppressed="True" />
</TYPE>
<TYPE Id="RDK:16685851" Name="BTMTEntladungMerkmaleType" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE Id="RDK:16685851" Name="BTMTEntladungMerkmaleType" Expanded="True" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE_VALUES />
<FIELD Id="RDK:16685911" Name="Höhe in m" Type="string" Suppressed="True" />
</TYPE>
<TYPE Id="RDK:22023206" Name="GruppeMerkmaleType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:22023208" Name="ids" Type="string" />
</TYPE>
</GROUP>
<GROUP Id="RDK:18753242" Name="SE EXPORT" SubType="TypeSet" IncludeDate="0">
<TYPE Id="RDK:18946335" Name="SEExportParamType" SubType="structure" HasArrayType="True">
@@ -1030,6 +1034,7 @@
<VAR Id="RDK:1007444" Name="Point2D" Type="Point2D" />
<VAR Id="RDK:1519830" Name="SessionZip" Type="string" />
<VAR Id="RDK:20857929" Name="groupStrings" Type="string[]" DesignTimeRemark="Enthält ; separtiert alle Strings, damit die Gruppen beschrieben werden können. a;b;c wäre z.B. eine Gruppe aus den Objekten a, b und c" />
<VAR Id="RDK:22023175" Name="group" Type="string" DesignTimeRemark="Generated by RD" />
</GROUP>
<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -3632,10 +3637,6 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:18732260" Name="CreatePrototype_Kurve">
<GROUP Id="RDK:18732256" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:22007219" Name="KurvenWinkel" Type="double" />
<VAR Id="RDK:22007221" Name="isRechts" Type="boolean" />
</GROUP>
<SET Id="RDK:21004634" VarRef="KurveData_defaults" Suppressed="True" Bookmarked="True">
<EXP><![CDATA[$=$Shape_Prototype.KurveDefinition]]></EXP>
<PAR Name="AdvancedOptions" />
@@ -4700,16 +4701,16 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
</SET_STRUCT>
<GROUP Id="RDK:22008032" Name="Setze Art der Kurve" SubType="Generic">
<SET Id="RDK:22007924" VarRef="ShapeList[i].KurveDefinition.isRechts">
<EXP><![CDATA[$=$False]]></EXP>
<EXP><![CDATA[$C$rechts]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:22007962" DesignTimeRemark="Rechtskurve, wenn der Name ein &quot;R&quot; enthält">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$StrIndexOf(ShapeList[i].source, "L", 0) >= 0]]></EXP>
<EXP><![CDATA[$=$StrIndexOf(ShapeList[i].source, "_L", 0) >= 0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:22007959" SubType="Then">
<SET Id="RDK:22007981" VarRef="ShapeList[i].KurveDefinition.isRechts">
<EXP><![CDATA[$=$True]]></EXP>
<SET Id="RDK:22007981" VarRef="ShapeList[i].KurveDefinition.KurvenRichtung">
<EXP><![CDATA[$C$links]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
@@ -4905,17 +4906,17 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
</SET_STRUCT>
</GROUP>
<GROUP Id="RDK:22008810" Name="Setze Art der Kurve" SubType="Generic">
<SET Id="RDK:22008799" VarRef="ShapeList[i].KurveFoerdererDefinition.isRechts">
<EXP><![CDATA[$=$False]]></EXP>
<SET Id="RDK:22008799" VarRef="ShapeList[i].KurveFoerdererDefinition.KurvenRichtung">
<EXP><![CDATA[$C$rechts]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:22008802" DesignTimeRemark="Rechtskurve, wenn der Name ein &quot;R&quot; enthält">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$StrIndexOf(ShapeList[i].source, "L", 0) >= 0]]></EXP>
<EXP><![CDATA[$=$StrIndexOf(ShapeList[i].source, "_L", 0) >= 0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:22008801" SubType="Then">
<SET Id="RDK:22008800" VarRef="ShapeList[i].KurveFoerdererDefinition.isRechts">
<EXP><![CDATA[$=$True]]></EXP>
<SET Id="RDK:22008800" VarRef="ShapeList[i].KurveFoerdererDefinition.KurvenRichtung">
<EXP><![CDATA[$C$links]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
@@ -10185,17 +10186,15 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
</FUNCTION>
<FUNCTION Id="RDK:20817724" Name="GetPreviousIds" DesignTimeRemark="Gibt Alle Ids in der Gruppe zurück, die dem gegebenen Element in der Strecke voraus liegen" InputTypeName="string" ResultTypeName="string[]">
<GROUP Id="RDK:20832558" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<GROUP Id="RDK:20902095" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20902089" Name="id0" Type="string">
<SET Id="RDK:20902088" VarRef="Me">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:20902090" Name="item" Type="string" />
<VAR Id="RDK:20902093" Name="splitarr" Type="string[]" />
<VAR Id="RDK:20924257" Name="lineStr" Type="string" />
</GROUP>
<VAR Id="RDK:20902089" Name="id0" Type="string">
<SET Id="RDK:20902088" VarRef="Me">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:20902090" Name="item" Type="string" />
<VAR Id="RDK:20902093" Name="splitarr" Type="string[]" />
<VAR Id="RDK:20924257" Name="lineStr" Type="string" />
</GROUP>
<FOREACHLOOP Id="RDK:20902115" DesignTimeRemark="finde betroffene Gruppe" ItemVarRef="lineStr">
<PAR Name="ArrayValueExp">
@@ -19151,11 +19150,14 @@ me.x
<VAR Id="RDK:1668589" Name="BTMTEntladungMerkmale" Type="BTMTEntladungMerkmaleType" />
<VAR Id="RDK:1516847" Name="CSVFileName" Type="string" />
<VAR Id="RDK:1516848" Name="CSVFile" Type="string" />
<VAR Id="RDK:22023213" Name="GruppeMerkmale" Type="GruppeMerkmaleType" />
</GROUP>
<VAR Id="RDK:22023177" Name="group" Type="string" Suppressed="True" />
<VAR Id="RDK:22023186" Name="i" Type="integer" Suppressed="True" />
</GROUP>
<FOREACHLOOP Id="RDK:1516896" ItemVarRef="ShapeItem">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$V$ShapeList]]></EXP>
<EXP><![CDATA[$=$ShapeList]]></EXP>
</PAR>
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
@@ -19412,48 +19414,6 @@ me.x
<PAR Name="POS_TO_ADD" />
</LIST_ADD>
</CASEGROUP>
<CASEGROUP Id="RDK:19257150" CaseType="0" Suppressed="True">
<EXP><![CDATA[$C$Kurve]]></EXP>
<GROUP Id="RDK:19257141" Name="TeileArt" SubType="Generic">
<SET Id="RDK:19257140" VarRef="CSV_Item.TeileArt">
<EXP><![CDATA[$=$ToJSON("Kurve_90")]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:19257143" Name="Bezeichnung" SubType="Generic">
<SET Id="RDK:19257142" VarRef="CSV_Item.Bezeichnung">
<EXP><![CDATA[$=$ToJSON(ShapeItem.KurveDefinition.Beschreibung)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:19257145" Name="Planquadrat" SubType="Generic">
<CALLFUNCTION Id="RDK:19257144">
<PAR Name="FuncName">
<EXP><![CDATA[$C$GetPlanquadratPosition]]></EXP>
</PAR>
<PAR Name="InputExp" />
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:19257148" Name="Merkmale" SubType="Generic">
<SET_STRUCT Id="RDK:19257146" VarRef="KurveMerkmale" ClearAll="True">
<PAR Name="Höhe in m" />
</SET_STRUCT>
<SET Id="RDK:19257147" VarRef="CSV_Item.Merkmale">
<EXP><![CDATA[$=$ToJSON(KurveMerkmale)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<LIST_ADD Id="RDK:19257149" ListRef="CSV_List">
<PAR Name="VALUE_TO_ADD">
<EXP><![CDATA[$=$CSV_Item]]></EXP>
</PAR>
<PAR Name="POS_TO_ADD" />
</LIST_ADD>
</CASEGROUP>
<CASEGROUP Id="RDK:19251786" CaseType="0">
<EXP><![CDATA[$C$Kurve]]></EXP>
<GROUP Id="RDK:19251777" Name="TeileArt" SubType="Generic">
@@ -19485,8 +19445,8 @@ me.x
<PAR Name="Länge in Meter">
<EXP><![CDATA[$=$ShapeItem.KurveDefinition.L1]]></EXP>
</PAR>
<PAR Name="Rechtskurve">
<EXP><![CDATA[$=$ShapeItem.KurveDefinition.isRechts]]></EXP>
<PAR Name="Kurvenrichtung">
<EXP><![CDATA[$=$ShapeItem.KurveDefinition.KurvenRichtung]]></EXP>
</PAR>
<PAR Name="Kurvenwinkel">
<EXP><![CDATA[$=$ShapeItem.KurveDefinition.KurvenWinkel]]></EXP>
@@ -19535,8 +19495,8 @@ me.x
<PAR Name="Länge in Meter">
<EXP><![CDATA[$=$ShapeItem.KurveFoerdererDefinition.L1]]></EXP>
</PAR>
<PAR Name="Rechtskurve">
<EXP><![CDATA[$=$ShapeItem.KurveFoerdererDefinition.isRechts]]></EXP>
<PAR Name="Kurvenrichtung">
<EXP><![CDATA[$=$ShapeItem.KurveFoerdererDefinition.KurvenRichtung]]></EXP>
</PAR>
<PAR Name="Kurvenwinkel">
<EXP><![CDATA[$=$ShapeItem.KurveFoerdererDefinition.KurvenWinkel]]></EXP>
@@ -19686,6 +19646,70 @@ me.x
</SELECTCASE>
</GROUP>
</FOREACHLOOP>
<GROUP Id="RDK:22023225" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:22023223" Name="id" Type="string" />
<VAR Id="RDK:22023224" Name="lineStr" Type="string" />
<VAR Id="RDK:22023227" Name="splitarr" Type="string[]" />
</GROUP>
<FOREACHLOOP Id="RDK:22023174" ItemVarRef="group" IndexVarRef="i">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$=$groupStrings]]></EXP>
</PAR>
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<SET Id="RDK:22023229" VarRef="splitarr">
<EXP><![CDATA[$=$splitStr(group, ";")]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<GROUP Id="RDK:22023064" Name="TeileId" SubType="Generic">
<SET Id="RDK:22023063" VarRef="CSV_Item.TeileId">
<EXP><![CDATA[$=$ToJSON("Gruppe"+i)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:22023066" Name="NachbarIds" SubType="Generic">
<SET Id="RDK:22023065" VarRef="CSV_Item.NachbarIds">
<EXP><![CDATA[$=$""]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:22023106" Name="TeileArt" SubType="Generic">
<SET Id="RDK:22023105" VarRef="CSV_Item.TeileArt">
<EXP><![CDATA[$=$"ILS 2.0 Strecke"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:22023086" Name="Bezeichnung" SubType="Generic">
<SET Id="RDK:22023085" VarRef="CSV_Item.Bezeichnung">
<EXP><![CDATA[$=$ToJSON("Gruppe "+i)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:22023077" Name="Planquadrat" SubType="Generic">
<SET Id="RDK:22023189" VarRef="CSV_Item.Planquadrat">
<EXP><![CDATA[$=$ToJSON("X:0 Y:0")]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:22023080" Name="Merkmale" SubType="Generic">
<SET_STRUCT Id="RDK:22023211" VarRef="GruppeMerkmale" ClearAll="True">
<PAR Name="ids">
<EXP><![CDATA[$=$StrReplace(group, ";", ",")]]></EXP>
</PAR>
</SET_STRUCT>
<SET Id="RDK:22023079" VarRef="CSV_Item.Merkmale">
<EXP><![CDATA[$=$ToJSON(GruppeMerkmale)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<LIST_ADD Id="RDK:22023125" ListRef="CSV_List">
<PAR Name="VALUE_TO_ADD">
<EXP><![CDATA[$=$CSV_Item]]></EXP>
</PAR>
<PAR Name="POS_TO_ADD" />
</LIST_ADD>
</FOREACHLOOP>
<EXEC_ON_VALUES Id="RDK:1516897" VarRef="CSV_List">
<PAR Name="Elementnummer">
<EXP><![CDATA[$=$Me_idx+1]]></EXP>