t.molina/HundM_Fortna
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

restliche hinzugefügt

Browse Source
This commit is contained in:
Thomas Alexander Molina Cespedes
2026-06-23 10:21:32 +02:00
parent f384644167
commit 216f930e9a
1170 changed files with 583567 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
=A01+UH05-KF00/Programmbausteine/PROFINET/DB_PROFINET_DEVICE_STATES.xml
+66
View File
@@ -0,0 +1,66 @@
<?xml version="1.0" encoding="utf-8"?>
<Document>
<Engineering version="V20" />
<SW.Blocks.GlobalDB ID="0">
<AttributeList>
<Interface><Sections xmlns="http://www.siemens.com/automation/Openness/SW/Interface/v5">
<Section Name="Static">
<Member Name="arPN_DEV_STATE_EXIST" Datatype="Array[0..1023] of Bool" />
<Member Name="arPN_DEV_STATE_FAULTY" Datatype="Array[0..1023] of Bool" />
</Section>
</Sections></Interface>
<MemoryLayout>Optimized</MemoryLayout>
<MemoryReserve>100</MemoryReserve>
<Name>DB_PROFINET_DEVICE_STATES</Name>
<Namespace />
<Number>64</Number>
<ProgrammingLanguage>DB</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="1" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="2" CompositionName="Items">
<AttributeList>
<Culture>cs-CZ</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
<MultilingualTextItem ID="3" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
<MultilingualTextItem ID="4" CompositionName="Items">
<AttributeList>
<Culture>en-US</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="5" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="6" CompositionName="Items">
<AttributeList>
<Culture>cs-CZ</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
<MultilingualTextItem ID="7" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
<MultilingualTextItem ID="8" CompositionName="Items">
<AttributeList>
<Culture>en-US</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.GlobalDB>
</Document>
=A01+UH05-KF00/Programmbausteine/PROFINET/FC_GET_PROFINET_DEVICE_STATES.scl
+27
View File
@@ -0,0 +1,27 @@
FUNCTION "FC_GET_PROFINET_DEVICE_STATES" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_TEMP
nRetValExist : Int;
nRetValFaulty : Int;
END_VAR
BEGIN
REGION Device States
REGION Get MODE Exist
#nRetValExist := DeviceStates(LADDR := "Local~PROFINET_IO-System", // IO-System
MODE := 4, // vorhanden / nicht vorhanden
STATE := "DB_PROFINET_DEVICE_STATES".arPN_DEV_STATE_EXIST); // Status
END_REGION
REGION Get MODE Fault
#nRetValFaulty := DeviceStates(LADDR := "Local~PROFINET_IO-System", // IO-System
MODE := 2, // Störung
STATE := "DB_PROFINET_DEVICE_STATES".arPN_DEV_STATE_FAULTY); // Status
END_REGION
END_REGION
END_FUNCTION