Schoenenberger_Systeme_GmbH/SSG-Ruledesigner-Konfigurator
3
0
Fork 0
Code Issues Pull Requests Packages Projects 1 Releases Wiki Activity

Funktion getItemsConnectedNow wurde gebaut, Sollen OFBogen und OFGrade seine Höhe ändert, findet diese Funktion das aktuell mit OFBogen oder OF Grade verbundene Kettenförderer und passt dessen Höhenunterschied und Länge neu an.

Browse Source
This commit is contained in:
Yuelin Wang
2026-02-27 10:01:18 +01:00
parent 9f339a5495
commit 2ad5433503
1 changed files with 244 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
MAIN_SSG.rdx
+244 -2
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="y.wang [ANGEBOT-NB02]" ModDate="2026-02-24T11:42:51" LanguageVersion="2014.1.3.714" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="y.wang [ANGEBOT-NB02]" ModDate="2026-02-27T09:31:11" LanguageVersion="2014.1.3.714" />
<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">
@@ -1132,7 +1132,7 @@
<FIELD Id="RDK:23221899" Name="Antrieb Kurve" Type="boolean" />
<FIELD Id="RDK:23221888" Name="SivasNummer" Type="string" />
</TYPE>
<TYPE Id="RDK:23747545" Name="TEFGeradeMerkmaleType" Expanded="True" SubType="structure">
<TYPE Id="RDK:23747545" Name="TEFGeradeMerkmaleType" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:23747540" Name="Länge in Meter" Type="string" />
<FIELD Id="RDK:23747543" Name="Höhe oben" Type="string" />
@@ -1491,6 +1491,7 @@
<VAR Id="RDK:26935461" Name="H_th" Type="double" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:26971815" Name="item_1" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:27189644" Name="RueckgabeListe" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:27260420" Name="ids" Type="string" DesignTimeRemark="Generated by RD" />
</GROUP>
<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -8598,6 +8599,18 @@
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:27312903">
<PAR Name="FuncName">
<EXP><![CDATA[$C$getItemsConnectedNow]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<CALLFUNCTION Id="RDK:23017242" Suppressed="True">
<PAR Name="FuncName">
@@ -9800,6 +9813,18 @@
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:27260423">
<PAR Name="FuncName">
<EXP><![CDATA[$C$getItemsConnectedNow]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<EXIT_PROCESS Id="RDK:23016507" BreakType="3" ExitStatus="0" />
</CASEGROUP>
@@ -35826,6 +35851,208 @@ ShapeList["id="+Param.Input[1].shapeID].name
<PAR Name="AdvancedOptions" />
</SET>
</FUNCTION>
<FUNCTION Id="RDK:27281315" Name="getItemsConnectedNow" DesignTimeRemark="Suche über das Objekt die verbundenen Items" InputTypeName="string" ResultTypeName="string[]">
<GROUP Id="RDK:27281300" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:27281293" Name="shapeItem" Type="Editor2DShapeType" />
<VAR Id="RDK:27281295" Name="select" Type="string" />
<VAR Id="RDK:27281298" Name="origin" Type="string">
<SET Id="RDK:27281297" VarRef="me">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:27281299" Name="shapeType" Type="string" />
<VAR Id="RDK:27281493" Name="UebergabeSetHeight" Type="SSGParameter[]" />
<VAR Id="RDK:27281397" Name="cpID" Type="string" />
<VAR Id="RDK:27307659" Name="cpID_origin" Type="string" />
<VAR Id="RDK:27281399" Name="hoehe" Type="double" />
</GROUP>
<FOREACHLOOP Id="RDK:27281309" ItemVarRef="shapeItem">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$=$ShapeList]]></EXP>
</PAR>
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<IFTHENELSE Id="RDK:27281308">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$shapeItem.shapeFromId = origin]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$shapeItem.shapeToId = origin]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27281307" SubType="Then">
<IFTHENELSE Id="RDK:27281303">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$shapeItem.shapeFromId = origin]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27281302" SubType="Then">
<SET Id="RDK:27281403" VarRef="cpID">
<EXP><![CDATA[$=$shapeItem.shapeToPointIndex]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27307661" VarRef="cpID_origin">
<EXP><![CDATA[$=$shapeItem.shapeFromPointIndex]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27281573" VarRef="select">
<EXP><![CDATA[$=$shapeItem.shapeToId]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:27281306">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$shapeItem.shapeToId = origin]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27281305" SubType="Then">
<SET Id="RDK:27281412" VarRef="cpID">
<EXP><![CDATA[$=$shapeItem.shapeFromPointIndex]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27307663" VarRef="cpID_origin">
<EXP><![CDATA[$=$shapeItem.shapeToPointIndex]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27281577" VarRef="select">
<EXP><![CDATA[$=$shapeItem.shapeFromId]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<FOREACHLOOP Id="RDK:27281566" ItemVarRef="shapeItem">
<PAR Name="ArrayValueExp">
<EXP><![CDATA[$=$ShapeList]]></EXP>
</PAR>
<PAR Name="ExitCondExp">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<IFTHENELSE Id="RDK:27281555">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$shapeItem.id = origin]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27281554" SubType="Then">
<IFTHENELSE Id="RDK:27281553">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$shapeItem.family="OFBogen"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27281552" SubType="Then">
<SET_STRUCT Id="RDK:27281551" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str" />
<PAR Name="Dbl">
<EXP><![CDATA[$=$shapeItem.OFBogenDefinition.Hoehe]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:27307671">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$shapeItem.family="OFGerade"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27307670" SubType="Then">
<IFTHENELSE Id="RDK:27307691">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$cpID_origin="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27307687" SubType="Then">
<SET_STRUCT Id="RDK:27307669" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str" />
<PAR Name="Dbl">
<EXP><![CDATA[$=$shapeItem.OFGeradeDefinition.HoeheOben]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
</GROUP>
<GROUP Id="RDK:27307690" SubType="Else">
<SET_STRUCT Id="RDK:27307695" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str" />
<PAR Name="Dbl">
<EXP><![CDATA[$=$shapeItem.OFGeradeDefinition.HoeheUnten]]></EXP>
</PAR>
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</FOREACHLOOP>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:27281604">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(cpID)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(select)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27281603" SubType="Then">
<SET_STRUCT Id="RDK:27281620" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$ShapeId]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str">
<EXP><![CDATA[$=$select]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:27281624" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Label]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str">
<EXP><![CDATA[$=$cpID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:27281495">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeight]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeSetHeight]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SET Id="RDK:27331643" VarRef="UebergabeSetHeight">
<EXP><![CDATA[$=$]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</FOREACHLOOP>
</FUNCTION>
<GROUP Id="RDK:20817725" Name="StreckeGroupFunctions" SubType="FunctionSet" IncludeDate="0">
<FUNCTION Id="RDK:20857698" Name="CreateGroup" DesignTimeRemark="Erzeugt eine Gruppe aus den gegebenen (mindestens zwei) Ids" InputTypeName="list" ResultTypeName="boolean">
<GROUP Id="RDK:20857685" Name="Local Variables" SubType="VarSet" IncludeDate="0">
@@ -53498,6 +53725,18 @@ me.x
<EXP><![CDATA[$=$ShapeList["id="+shapeId].KettenFoerdererDefinition.L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:27281626">
<PAR Name="FuncName">
<EXP><![CDATA[$C$UpdateShape]]></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:27199015" Suppressed="True">
<PAR Name="FuncName">
<EXP><![CDATA[$C$KettenFoerdererUI]]></EXP>
@@ -56105,6 +56344,9 @@ me.x
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="TEFUmlenk"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26971807" SubType="Then">
<SET_STRUCT Id="RDK:26971825" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">