Files
AutomatischesLager/Programmbausteine/_IBAE_Module/DatenInSort.xml
T
2026-07-06 12:57:53 +02:00

3811 lines
106 KiB
XML
Raw Blame History

This file contains ambiguous Unicode characters
This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
<?xml version="1.0" encoding="utf-8"?>
<Document>
<Engineering version="V20" />
<SW.Blocks.FC ID="0">
<AttributeList>
<AutoNumber>false</AutoNumber>
<HeaderAuthor>IBAE</HeaderAuthor>
<HeaderFamily>DLISTE</HeaderFamily>
<HeaderName>DatenIn</HeaderName>
<Interface><Sections xmlns="http://www.siemens.com/automation/Openness/SW/Interface/v5">
<Section Name="Input">
<Member Name="SSDB" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Datenlisten-DB</MultiLanguageText>
</Comment>
</Member>
<Member Name="SSDW" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Datenlisten-1.DW</MultiLanguageText>
</Comment>
</Member>
<Member Name="INDATEN" Datatype="Pointer">
<Comment>
<MultiLanguageText Lang="de-DE">InDaten-Schnittstelle</MultiLanguageText>
</Comment>
</Member>
</Section>
<Section Name="Output">
<Member Name="RE_VAL" Datatype="Byte">
<Comment>
<MultiLanguageText Lang="de-DE">Rückmeldung</MultiLanguageText>
</Comment>
</Member>
</Section>
<Section Name="InOut" />
<Section Name="Temp">
<Member Name="Quelle" Datatype="Any">
<Comment>
<MultiLanguageText Lang="de-DE">Zeiger, wo Rein-Daten sind</MultiLanguageText>
</Comment>
</Member>
<Member Name="Ziel" Datatype="Any">
<Comment>
<MultiLanguageText Lang="de-DE">Zeiger, FIFO-Stelle</MultiLanguageText>
</Comment>
</Member>
<Member Name="Kopf" Datatype="Byte">
<Comment>
<MultiLanguageText Lang="de-DE">Datenliste-Kennnung (DA)</MultiLanguageText>
</Comment>
</Member>
<Member Name="Datensatzlaenge" Datatype="Byte">
<Comment>
<MultiLanguageText Lang="de-DE">Datensatzlänge in Word (01 - F0) F0=128</MultiLanguageText>
</Comment>
</Member>
<Member Name="Listenlaenge" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Länge der Datenliste (maximale Anzahl der Datensätze)</MultiLanguageText>
</Comment>
</Member>
<Member Name="Stammdaten" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Stammdatenlänge in Word (1 - 9)</MultiLanguageText>
</Comment>
</Member>
<Member Name="Belegt06" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">reserviert von Datenliste</MultiLanguageText>
</Comment>
</Member>
<Member Name="Belegt08" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">reserviert von Datenliste</MultiLanguageText>
</Comment>
</Member>
<Member Name="Belegt10" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">reserviert von Datenliste</MultiLanguageText>
</Comment>
</Member>
<Member Name="Belegt12" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">reserviert von Datenliste</MultiLanguageText>
</Comment>
</Member>
<Member Name="AnzahlEintraege" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Anzahl der eingetragenen Datensätze</MultiLanguageText>
</Comment>
</Member>
<Member Name="Reserve16" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Reserve</MultiLanguageText>
</Comment>
</Member>
<Member Name="Reserve18" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Reserve</MultiLanguageText>
</Comment>
</Member>
<Member Name="DBDatenliste" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Datenlisten-DB</MultiLanguageText>
</Comment>
</Member>
<Member Name="SFC_RET_VAL" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Rückmeldung SFC-Aufruf</MultiLanguageText>
</Comment>
</Member>
<Member Name="SFC_DB_LENGTH" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Rückmeldung SFC-Aufruf</MultiLanguageText>
</Comment>
</Member>
<Member Name="Datenlisten_Ende" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Ende der Datenliste</MultiLanguageText>
</Comment>
</Member>
<Member Name="AR2_Speicher" Datatype="DWord">
<Comment>
<MultiLanguageText Lang="de-DE">Adress-Register 2 zwischenspeichern</MultiLanguageText>
</Comment>
</Member>
<Member Name="Schleife" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Loopzähler</MultiLanguageText>
</Comment>
</Member>
<Member Name="DBInDaten" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Indaten-DB, falls angegeben</MultiLanguageText>
</Comment>
</Member>
<Member Name="InDaten_Pointer" Datatype="DWord">
<Comment>
<MultiLanguageText Lang="de-DE">In-Daten-Pointer: Kennung, Adresse</MultiLanguageText>
</Comment>
</Member>
<Member Name="InDaten_Startpunkt" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">In-Daten-Startpunkt: Adresse</MultiLanguageText>
</Comment>
</Member>
<Member Name="Sort_Daten" Datatype="DInt">
<Comment>
<MultiLanguageText Lang="de-DE">Einzusortierende Daten (DWord)</MultiLanguageText>
</Comment>
</Member>
<Member Name="Datenblock_inBytes" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Datenblocklänge in Bytes</MultiLanguageText>
</Comment>
</Member>
<Member Name="SFC_WRITE_PROT" Datatype="Bool">
<Comment>
<MultiLanguageText Lang="de-DE">Rückmeldung SFC-Aufruf</MultiLanguageText>
</Comment>
</Member>
<Member Name="Lesestelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">An dieser Stelle Datensatz lesen</MultiLanguageText>
</Comment>
</Member>
<Member Name="Min_Lesestelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Minimal sinnvolle Lesestelle</MultiLanguageText>
</Comment>
</Member>
<Member Name="Max_Lesestelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Maximal sinnvolle Lesestelle</MultiLanguageText>
</Comment>
</Member>
<Member Name="Savestelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">An dieser Stelle wird In-Datensatz gespeichert</MultiLanguageText>
</Comment>
</Member>
<Member Name="Lese_Daten" Datatype="DInt">
<Comment>
<MultiLanguageText Lang="de-DE">In Tabelle gelesenen Daten</MultiLanguageText>
</Comment>
</Member>
<Member Name="Holstelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Freiraum schaffen: Stelle zum Daten holen</MultiLanguageText>
</Comment>
</Member>
<Member Name="Bringstelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Freiraum schaffen: Stelle zum Daten schreiben</MultiLanguageText>
</Comment>
</Member>
<Member Name="Holzeiger" Datatype="DWord">
<Comment>
<MultiLanguageText Lang="de-DE">Freiraum schaffen: Zeiger zum Daten holen</MultiLanguageText>
</Comment>
</Member>
<Member Name="Bringzeiger" Datatype="DWord">
<Comment>
<MultiLanguageText Lang="de-DE">Freiraum schaffen: Zeiger zum Daten schreiben</MultiLanguageText>
</Comment>
</Member>
<Member Name="AR1Zeiger" Datatype="DWord">
<Comment>
<MultiLanguageText Lang="de-DE">Statt AR1 (ging nur bis DB-Länge &lt;= 8191 Bytes)</MultiLanguageText>
</Comment>
</Member>
</Section>
<Section Name="Constant" />
<Section Name="Return">
<Member Name="Ret_Val" Datatype="Void" />
</Section>
</Sections></Interface>
<MemoryLayout>Standard</MemoryLayout>
<Name>DatenInSort</Name>
<Namespace />
<Number>88</Number>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="1" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="2" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>COPYRIGHT by Ingenieurbüro A.Emmert
Ortsstr.33, D-869925 Fuchstal (Germany)
Tel.: 0049(0)8243-1254
Version: ILS2100 / 06.11.2009
Datenblock in Datenliste einsortieren (aufsteigend)
SSDB: Datenlisten-DB
SSDW: Datenlisten-1.DW
INDATEN: Pointer, wo einzutragende Daten stehen (P#DB1.DBX0.0, P#M220.0)
RE_VAL: Rückmeldungen:
Bit0: Kein Datenlistenbereich / falscher Kopfinhalt / Endekennung
Bit1: SFC20-Aufruf mit Fehler
Bit2: Liste ist voll
Bit3: Frei
Bit4: Undefinierte Indaten
Bit5: Gespeicherte Daten &lt;= 0 (Inhalt ungültig)
Bit6: Frei
Bit7: Eintrag ist richtig erfolgt
</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<SW.Blocks.CompileUnit ID="3" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="22">
<StlToken Text="TAR2_ACCU1" />
</StlStatement>
<StlStatement UId="23">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR2_Speicher" />
</Symbol>
<LineComment>
<Text>AR2 zwischenspeichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="26">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="27">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="29">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBDatenliste" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="31">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="32">
<LineComment>
<Text> CALL TEST_DB</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="21">
<LineComment>
<Text> DB_NUMBER :=#DBDatenliste</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="34">
<LineComment>
<Text> RET_VAL :=#SFC_RET_VAL</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="35">
<LineComment>
<Text> DB_LENGTH :=#SFC_DB_LENGTH</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="36">
<LineComment>
<Text> WRITE_PROT :=#SFC_WRITE_PROT</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="53">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="54">
<StlToken Text="CALL" />
<Access Scope="Call">
<CallInfo Name="TEST_DB_TO_ATTR_DB" BlockType="FC">
<Parameter Name="DB_Number" Section="Input" Type="Word">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBDatenliste" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="RetVal" Section="Output" Type="Int">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="DB_Length" Section="Output" Type="Word">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_DB_LENGTH" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="Write_Prot" Section="Output" Type="Bool">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_WRITE_PROT" />
</Symbol>
</Access>
</Parameter>
</CallInfo>
</Access>
</StlStatement>
<StlStatement UId="39">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="40">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="42">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="44">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="45">
<StlToken Text="O" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_WRITE_PROT" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="47">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlisten-Bereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="50">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="4" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="5" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="6" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="7" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Schnittstellen-DB sinnvoll ?</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="8" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="51">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>16#1004</ConstantValue>
</Constant>
<LineComment>
<Text>Kennung 10 + Word=04</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="54">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="0" />
<LineComment>
<Text>Any-Kennung, Datentyp</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="57">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>16#000A</ConstantValue>
</Constant>
<LineComment>
<Text>10 Dw´s holen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="60">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="16" />
<LineComment>
<Text>Wiederholungen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="63">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="65">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="32" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="68">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
<LineComment>
<Text>Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="71">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="73">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>DWord</ConstantType>
<ConstantValue>16#8400_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Kennung: Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="76">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="77">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="48" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="80">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="81">
<StlToken Text="CALL" />
<Access Scope="Call">
<Instruction Name="BLKMOV" Version="1.1">
<Token Text="," />
<LineComment>
<Text>1.-10.DW Datenliste holen</Text>
</LineComment>
<TemplateValue Name="blk_type" Type="Type">Variant</TemplateValue>
<Parameter Name="SRCBLK">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Quelle" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="RET_VAL">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="DSTBLK">
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Any</ConstantType>
<ConstantValue>P#L20.0 WORD 10</ConstantValue>
</Constant>
</Access>
</Parameter>
</Instruction>
</Access>
</StlStatement>
<StlStatement UId="88">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="89">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="91">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="93">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="94">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err1" />
</Access>
</StlStatement>
<StlStatement UId="96">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="9" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="A" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Quelle-Pointer erzeugen:</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="B" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="C" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Datenlistekopf holen</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="D" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="97">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Kopf" />
</Symbol>
<LineComment>
<Text>Datenliste-Kopf</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="100">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Byte</ConstantType>
<ConstantValue>16#DB</ConstantValue>
</Constant>
<LineComment>
<Text>= Datenlistekennung ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="103">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="105">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="108">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="109">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="111">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="114">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="115">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="118">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="119">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>128</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="121">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="122">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="125">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="126">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="128">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Max.Anzahl von Datenblöcken</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="131">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="132">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="135">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="136">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="138">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Stammdaten" />
</Symbol>
<LineComment>
<Text>Anzahl der Stammdaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="141">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="142">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="145">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="146">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>9</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="148">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="149">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="152">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="153">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Stammdaten" />
</Symbol>
<LineComment>
<Text>Anzahl der Stammdaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="156">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="159">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="160">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="163">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="164">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Länge der Datenliste</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="167">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="170">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="171">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
<LineComment>
<Text>DB byteorientiert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="174">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="175">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
<LineComment>
<Text>Speichern ab 10.DW</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="178">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="180">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="181">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenlisten_Ende" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="183">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="184">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="186">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
<LineComment>
<Text>/Statt AR1 (ging nur bis DB-Länge &lt;= 8191 Bytes)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="189">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="190">
<StlToken Text="OPEN_DB" />
<Access Scope="Address">
<Indirect Width="Block" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBDatenliste" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="193">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="194">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenlisten_Ende" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="196">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_DB_LENGTH" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="198">
<StlToken Text="GT_I" />
<LineComment>
<Text>Datenlisten-DB ist zu kurz!</Text>
</LineComment>
</StlStatement>
<StlStatement UId="200">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlisten-Bereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="203">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="204">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="206">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>16#DBEE</ConstantValue>
</Constant>
<LineComment>
<Text>Datenliste-Endekennung ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="209">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="211">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlisten-Bereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="214">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="215">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="218">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="220">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="221">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="224">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="225">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="228">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Max.Anzahl von Datenblöcken</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="231">
<StlToken Text="GE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="233">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err2" />
<LineComment>
<Text>Datenliste ist voll</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="236">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="E" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="F" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="10" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="11" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Zeigerüberprüfung</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="12" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="237">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="238">
<LineComment>
<Text>In-DATEN-Pointer übernehmen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="240">
<StlToken Text="L" />
<Access Scope="AddressConstant">
<Constant Name="INDATEN" Scope="local" />
</Access>
</StlStatement>
<StlStatement UId="242">
<StlToken Text="LAR2_ACCU1" />
</StlStatement>
<StlStatement UId="243">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="244">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Word" Area="None" Register="AR2" BitOffset="0" />
</Access>
</StlStatement>
<StlStatement UId="246">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
<LineComment>
<Text>Indaten-DB</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="249">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="250">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
<LineComment>
<Text>Indaten-DB</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="253">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Angegeben ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="256">
<StlToken Text="EQ_I" />
<LineComment>
<Text>Nein </Text>
</LineComment>
</StlStatement>
<StlStatement UId="258">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="W401" />
</Access>
</StlStatement>
<StlStatement UId="260">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="261">
<LineComment>
<Text> CALL TEST_DB</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="35">
<LineComment>
<Text> DB_NUMBER :=#DBInDaten</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="36">
<LineComment>
<Text> RET_VAL :=#SFC_RET_VAL</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="37">
<LineComment>
<Text> DB_LENGTH :=#SFC_DB_LENGTH</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="38">
<LineComment>
<Text> WRITE_PROT :=#SFC_WRITE_PROT</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="22">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="23">
<StlToken Text="CALL" />
<Access Scope="Call">
<CallInfo Name="TEST_DB_TO_ATTR_DB" BlockType="FC">
<Parameter Name="DB_Number" Section="Input" Type="Word">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="RetVal" Section="Output" Type="Int">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="DB_Length" Section="Output" Type="Word">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_DB_LENGTH" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="Write_Prot" Section="Output" Type="Bool">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_WRITE_PROT" />
</Symbol>
</Access>
</Parameter>
</CallInfo>
</Access>
</StlStatement>
<StlStatement UId="21">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="268">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="269">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="271">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Fehler vorhanden ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="274">
<StlToken Text="NE_I" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="276">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err4" />
<LineComment>
<Text>Undefinierte Indaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="279">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="280">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Double" Area="None" Register="AR2" BitOffset="16" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="283">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>DWord</ConstantType>
<ConstantValue>16#00FF_FFFF</ConstantValue>
</Constant>
<LineComment>
<Text>Ohne Kennung</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="286">
<StlToken Text="AW" />
</StlStatement>
<StlStatement UId="287">
<StlToken Text="SRW" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
<LineComment>
<Text>Ohne Bit</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="290">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="InDaten_Startpunkt" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="292">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="293">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="296">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
<LineComment>
<Text>DB byteorientiert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="299">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="300">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="InDaten_Startpunkt" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="302">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="303">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_DB_LENGTH" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="305">
<StlToken Text="GT_I" />
<LineComment>
<Text>Indaten-DB ist zu kurz</Text>
</LineComment>
</StlStatement>
<StlStatement UId="307">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err4" />
<LineComment>
<Text>Undefinierte Indaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="310">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="311">
<LabelDeclaration>
<Label Name="W401" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Double" Area="None" Register="AR2" BitOffset="16" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="315">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="InDaten_Pointer" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="317">
<StlToken Text="LAR2_ACCU1" />
</StlStatement>
<StlStatement UId="318">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="319">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
<LineComment>
<Text>Indaten-DB</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="322">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Angegeben ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="325">
<StlToken Text="EQ_I" />
<LineComment>
<Text>Nein </Text>
</LineComment>
</StlStatement>
<StlStatement UId="327">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="W402" />
</Access>
</StlStatement>
<StlStatement UId="329">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="330">
<StlToken Text="OPEN_DB" />
<Access Scope="Address">
<Indirect Width="Block" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="333">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="334">
<LabelDeclaration>
<Label Name="W402" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Double" Area="None" Register="AR2" BitOffset="0" />
<LineComment>
<Text>Indaten überprüfen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="338">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Sort_Daten" />
</Symbol>
<LineComment>
<Text>1.Indaten speichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="341">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="342">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Stammdaten" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="344">
<LabelDeclaration>
<Label Name="L400" />
</LabelDeclaration>
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="347">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="348">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
<LineComment>
<Text>Indaten-DB</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="351">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Angegeben ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="354">
<StlToken Text="EQ_I" />
<LineComment>
<Text>Nein </Text>
</LineComment>
</StlStatement>
<StlStatement UId="356">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="W403" />
</Access>
</StlStatement>
<StlStatement UId="358">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="359">
<StlToken Text="OPEN_DB" />
<Access Scope="Address">
<Indirect Width="Block" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="362">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="363">
<LabelDeclaration>
<Label Name="W403" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Word" Area="None" Register="AR2" BitOffset="0" />
<LineComment>
<Text>Indaten überprüfen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="367">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Etwas angegeben ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="370">
<StlToken Text="NE_I" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="372">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Nw05" />
<LineComment>
<Text>Weiter</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="375">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="376">
<StlToken Text="ADDAR2" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>ARef</ConstantType>
<ConstantValue>P#2.0</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="378">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="379">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="381">
<StlToken Text="LOOP" />
<Access Scope="Label">
<Label Name="L400" />
</Access>
</StlStatement>
<StlStatement UId="383">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="384">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err4" />
<LineComment>
<Text>Undefinierte Indaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="387">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="388">
<LabelDeclaration>
<Label Name="Nw05" />
</LabelDeclaration>
<StlToken Text="NOP_0" />
</StlStatement>
<StlStatement UId="390">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="13" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="14" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="15" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="16" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Indaten definiert ?</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="17" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="391">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="393">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Min_Lesestelle" />
</Symbol>
<LineComment>
<Text>Minimal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="396">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="397">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="400">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Max_Lesestelle" />
</Symbol>
<LineComment>
<Text>Maximal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="403">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="404">
<LineComment>
<Text>Sonderfall: noch kein Eintrag: </Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="406">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Eintrag schon vorhanden ? </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="409">
<StlToken Text="GT_I" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="411">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="en05" />
</Access>
</StlStatement>
<StlStatement UId="413">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="414">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
<LineComment>
<Text>An 1.Stelle speichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="417">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="420">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="421">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Save" />
</Access>
</StlStatement>
<StlStatement UId="423">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="424">
<LabelDeclaration>
<Label Name="en05" />
</LabelDeclaration>
<StlToken Text="NOP_0" />
</StlStatement>
<StlStatement UId="426">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="18" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="19" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="1A" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="1B" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Minimale + maximale Lesestelle am Anfang</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="1C" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="427">
<LabelDeclaration>
<Label Name="New" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Max_Lesestelle" />
</Symbol>
<LineComment>
<Text>Maximal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="431">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="433">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Min_Lesestelle" />
</Symbol>
<LineComment>
<Text>Minimal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="436">
<StlToken Text="SUB_I" />
</StlStatement>
<StlStatement UId="437">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="439">
<StlToken Text="DIV_I" />
</StlStatement>
<StlStatement UId="440">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Min_Lesestelle" />
</Symbol>
<LineComment>
<Text>Minimal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="443">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="444">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="447">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="1D" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="1E" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="1F" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="20" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Aktuelle Lesestelle errechnen</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="21" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="448">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="451">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="453">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="456">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="457">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="459">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="460">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
<LineComment>
<Text>Offset für 1.Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="463">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="464">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="466">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
<LineComment>
<Text>/Statt AR1 (ging nur bis DB-Länge &lt;= 8191 Bytes)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="469">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="470">
<StlToken Text="OPEN_DB" />
<Access Scope="Address">
<Indirect Width="Block" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBDatenliste" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="473">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Double" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</Indirect>
<LineComment>
<Text>Datenliste-Daten lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="476">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lese_Daten" />
</Symbol>
<LineComment>
<Text>In Tabelle gelesenen Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="479">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>DInt</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Nichts gespeicher oder negativ ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="482">
<StlToken Text="LE_D" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="484">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err5" />
</Access>
</StlStatement>
<StlStatement UId="486">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="22" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="23" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="24" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="25" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Daten an Lesestelle auslesen</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="26" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="487">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Max_Lesestelle" />
</Symbol>
<LineComment>
<Text>Maximal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="490">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Min_Lesestelle" />
</Symbol>
<LineComment>
<Text>Minimal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="493">
<StlToken Text="SUB_I" />
</StlStatement>
<StlStatement UId="494">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Suche fertig ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="497">
<StlToken Text="LT_I" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="499">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="ok" />
</Access>
</StlStatement>
<StlStatement UId="501">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="27" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="28" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="29" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="2A" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Suche fertig ?</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="2B" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="502">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Sort_Daten" />
</Symbol>
<LineComment>
<Text>Einzusortierende Daten </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="505">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lese_Daten" />
</Symbol>
<LineComment>
<Text>In Tabelle gelesenen Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="508">
<StlToken Text="GT_D" />
<LineComment>
<Text>Sort &gt; Tabelle</Text>
</LineComment>
</StlStatement>
<StlStatement UId="510">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="MinP" />
</Access>
</StlStatement>
<StlStatement UId="512">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="513">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Sort_Daten" />
</Symbol>
<LineComment>
<Text>Einzusortierende Daten </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="516">
<StlToken Text="GT_D" />
<LineComment>
<Text>Tabelle &gt; Sort</Text>
</LineComment>
</StlStatement>
<StlStatement UId="518">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="MaxM" />
</Access>
</StlStatement>
<StlStatement UId="520">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="521">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="524">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle wird In-Datensatz gespeichert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="527">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="528">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Frei" />
<LineComment>
<Text>Freiplatz schaffen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="531">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="532">
<LabelDeclaration>
<Label Name="MinP" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="536">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="538">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Min_Lesestelle" />
</Symbol>
<LineComment>
<Text>Minimal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="541">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="542">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Max_Lesestelle" />
</Symbol>
<LineComment>
<Text>Maximal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="545">
<StlToken Text="GT_I" />
<LineComment>
<Text>Suche ist fertig</Text>
</LineComment>
</StlStatement>
<StlStatement UId="547">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="ok" />
</Access>
</StlStatement>
<StlStatement UId="549">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="550">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="New" />
</Access>
</StlStatement>
<StlStatement UId="552">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="553">
<LabelDeclaration>
<Label Name="MaxM" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="557">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="559">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Max_Lesestelle" />
</Symbol>
<LineComment>
<Text>Maximal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="562">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="563">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Min_Lesestelle" />
</Symbol>
<LineComment>
<Text>Minimal sinnvolle Lesestelle</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="566">
<StlToken Text="LT_I" />
<LineComment>
<Text>Suche ist fertig</Text>
</LineComment>
</StlStatement>
<StlStatement UId="568">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="ok" />
</Access>
</StlStatement>
<StlStatement UId="570">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="571">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="New" />
</Access>
</StlStatement>
<StlStatement UId="573">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="2C" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="2D" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="2E" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="2F" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Gelesene Daten auswerten</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="30" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="574">
<LabelDeclaration>
<Label Name="ok" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Sort_Daten" />
</Symbol>
<LineComment>
<Text>Einzusortierende Daten </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="578">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lese_Daten" />
</Symbol>
<LineComment>
<Text>In Tabelle gelesenen Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="581">
<StlToken Text="GT_D" />
<LineComment>
<Text>Sort &gt; Tabelle</Text>
</LineComment>
</StlStatement>
<StlStatement UId="583">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Plus" />
</Access>
</StlStatement>
<StlStatement UId="585">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="586">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="589">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle wird In-Datensatz gespeichert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="592">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="593">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Frei" />
<LineComment>
<Text>Freiplatz schaffen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="596">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="597">
<LabelDeclaration>
<Label Name="Plus" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Lesestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle Datensatz lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="601">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="603">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle wird In-Datensatz gespeichert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="606">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="31" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="32" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="33" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="34" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Speicherstelle ermitteln</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="35" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="607">
<LabelDeclaration>
<Label Name="Frei" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle wird In-Datensatz gespeichert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="611">
<StlToken Text="T" />
<Access Scope="GlobalVariable">
<Symbol>
<Component Name="MW240" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="613">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="616">
<StlToken Text="GT_I" />
<LineComment>
<Text>Eintrag ans Ende !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="618">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Save" />
</Access>
</StlStatement>
<StlStatement UId="620">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="621">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="624">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="627">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="628">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="630">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="631">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
<LineComment>
<Text>Offset für 1.Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="634">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-2</ConstantValue>
</Constant>
<LineComment>
<Text>Letzte Daten letzter Eintrag</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="637">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Stelle zum Daten holen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="640">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="641">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Stelle zum Daten holen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="644">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="647">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="648">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Bringstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Zeiger zum Daten schreiben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="651">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="652">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="655">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>An dieser Stelle wird In-Datensatz gespeichert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="658">
<StlToken Text="SUB_I" />
</StlStatement>
<StlStatement UId="659">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="661">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="664">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="665">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
<LineComment>
<Text>da DW-Zugriff (2Byte)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="668">
<StlToken Text="DIV_I" />
</StlStatement>
<StlStatement UId="669">
<LabelDeclaration>
<Label Name="L110" />
</LabelDeclaration>
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="672">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="673">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Stelle zum Daten holen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="676">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="677">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="679">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holzeiger" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Zeiger zum Daten holen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="682">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Bringstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Zeiger zum Daten schreiben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="685">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="686">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="688">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Bringzeiger" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Zeiger zum Daten schreiben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="691">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="692">
<StlToken Text="OPEN_DB" />
<Access Scope="Address">
<Indirect Width="Block" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBDatenliste" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="695">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="696">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holzeiger" />
</Symbol>
</Access>
</Indirect>
<LineComment>
<Text>Datenliste-Daten lesen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="699">
<StlToken Text="T" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Bringzeiger" />
</Symbol>
</Access>
</Indirect>
<LineComment>
<Text>Datenliste-Daten verschieben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="702">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="703">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holstelle" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="705">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-2</ConstantValue>
</Constant>
<LineComment>
<Text>2 Byte wegen DW-Zugriff</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="708">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Holstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Stelle zum Daten holen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="711">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="712">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Bringstelle" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="714">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-2</ConstantValue>
</Constant>
<LineComment>
<Text>2 Byte wegen DW-Zugriff</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="717">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Bringstelle" />
</Symbol>
<LineComment>
<Text>Freiraum schaffen: Zeiger zum Daten schreiben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="720">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="721">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="723">
<StlToken Text="LOOP" />
<Access Scope="Label">
<Label Name="L110" />
</Access>
</StlStatement>
<StlStatement UId="725">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="36" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="37" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="38" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="39" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Freiraum für Speicherung schaffen</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="3A" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="726">
<LineComment>
<Text>Quelle-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="728">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="729">
<LabelDeclaration>
<Label Name="Save" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>16#1004</ConstantValue>
</Constant>
<LineComment>
<Text>Kennung 10 + Word=04</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="733">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="0" />
</Access>
</StlStatement>
<StlStatement UId="735">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="80" />
<LineComment>
<Text>Any-Kennung, Datentyp</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="738">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenwords speichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="741">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="16" />
</Access>
</StlStatement>
<StlStatement UId="743">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="96" />
<LineComment>
<Text>Wiederholungen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="746">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="747">
<LineComment>
<Text>DATEN-Pointer übernehmen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="749">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBInDaten" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="751">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="32" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="754">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="InDaten_Pointer" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="756">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="48" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="759">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="760">
<LineComment>
<Text>Ziel-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="762">
<LineComment>
<Text>Kennung + Datenbytes s.o.</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="764">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="765">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="767">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="112" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="770">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Savestelle" />
</Symbol>
<LineComment>
<Text>Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="773">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="775">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="778">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="779">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="781">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="782">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
<LineComment>
<Text>Offset für 1.Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="785">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="787">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>DWord</ConstantType>
<ConstantValue>16#8400_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Kennung: Daten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="790">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="791">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="128" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="794">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="795">
<StlToken Text="CALL" />
<Access Scope="Call">
<Instruction Name="BLKMOV" Version="1.1">
<Token Text="," />
<LineComment>
<Text>Datenliste-Daten speichern</Text>
</LineComment>
<TemplateValue Name="blk_type" Type="Type">Variant</TemplateValue>
<Parameter Name="SRCBLK">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Quelle" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="RET_VAL">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</Parameter>
<Parameter Name="DSTBLK">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Ziel" />
</Symbol>
</Access>
</Parameter>
</Instruction>
</Access>
</StlStatement>
<StlStatement UId="802">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="803">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="805">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="807">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="808">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err1" />
</Access>
</StlStatement>
<StlStatement UId="810">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="811">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="813">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>14</ConstantValue>
</Constant>
<LineComment>
<Text>Anzahl der Einträge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="816">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="817">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="819">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
<LineComment>
<Text>/Statt AR1 (ging nur bis DB-Länge &lt;= 8191 Bytes)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="822">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="823">
<StlToken Text="OPEN_DB" />
<Access Scope="Address">
<Indirect Width="Block" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBDatenliste" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="826">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</Indirect>
<LineComment>
<Text>Anzahl der Einträge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="829">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
<LineComment>
<Text>Einträge +1</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="832">
<StlToken Text="T" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</Indirect>
<LineComment>
<Text>Anzahl der Einträge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="835">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="3B" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="3C" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="3D" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="3E" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Daten in Datenliste schreiben</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<SW.Blocks.CompileUnit ID="3F" CompositionName="CompileUnits">
<AttributeList>
<NetworkSource><StatementList xmlns="http://www.siemens.com/automation/Openness/SW/NetworkSource/StatementList/v5">
<StlStatement UId="836">
<StlToken Text="SET" />
<LineComment>
<Text>VKE = 1 ohne Fehler !!!</Text>
</LineComment>
</StlStatement>
<StlStatement UId="838">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_1000_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Daten wurden gespeichert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="841">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Ok_Mig" />
</Access>
</StlStatement>
<StlStatement UId="843">
<LabelDeclaration>
<Label Name="Err0" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0001</ConstantValue>
</Constant>
<LineComment>
<Text>Kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="847">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="849">
<LabelDeclaration>
<Label Name="Err1" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0010</ConstantValue>
</Constant>
<LineComment>
<Text>SFC20-Aufruf mit Fehler</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="853">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="855">
<LabelDeclaration>
<Label Name="Err2" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0100</ConstantValue>
</Constant>
<LineComment>
<Text>Datenliste ist voll</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="859">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="861">
<LabelDeclaration>
<Label Name="Err4" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0001_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Undefinierte Indaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="865">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="867">
<LabelDeclaration>
<Label Name="Err5" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0010_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Gespeicherte Daten &lt;= 0 (Inhalt ungültig)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="871">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="872">
<LabelDeclaration>
<Label Name="Err" />
</LabelDeclaration>
<StlToken Text="CLR" />
<LineComment>
<Text>VKE = 0 bei Fehler !!!</Text>
</LineComment>
</StlStatement>
<StlStatement UId="875">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="876">
<LabelDeclaration>
<Label Name="Ok_Mig" />
</LabelDeclaration>
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="RE_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="879">
<StlToken Text="SAVE" />
<LineComment>
<Text>VKE in BIE-Bit speichern </Text>
</LineComment>
</StlStatement>
<StlStatement UId="881">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="882">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR2_Speicher" />
</Symbol>
<LineComment>
<Text>AR2 zurückspeichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="885">
<StlToken Text="LAR2_ACCU1" />
</StlStatement>
<StlStatement UId="886">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
</StatementList></NetworkSource>
<ProgrammingLanguage>STL</ProgrammingLanguage>
</AttributeList>
<ObjectList>
<MultilingualText ID="40" CompositionName="Comment">
<ObjectList>
<MultilingualTextItem ID="41" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text />
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
<MultilingualText ID="42" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="43" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Fehlerausgabe / RET_VAL</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<MultilingualText ID="44" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="45" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Datensort-Modul</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.FC>
</Document>