Files
2026-07-06 12:57:53 +02:00

4040 lines
110 KiB
XML
Raw Permalink 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="PARA" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Aufrufparameter (Auftrag , Offset/Anzahl Daten)</MultiLanguageText>
</Comment>
</Member>
</Section>
<Section Name="Output">
<Member Name="OUTDATEN" Datatype="Pointer">
<Comment>
<MultiLanguageText Lang="de-DE">OutDaten-Schnittstelle</MultiLanguageText>
</Comment>
</Member>
<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="Para1" Datatype="Byte">
<Comment>
<MultiLanguageText Lang="de-DE">1.Aufrufparameter</MultiLanguageText>
</Comment>
</Member>
<Member Name="Para2" Datatype="Byte">
<Comment>
<MultiLanguageText Lang="de-DE">2.Aufrufparameter</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="LeseStelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Stelle, wo gelesen werden soll</MultiLanguageText>
</Comment>
</Member>
<Member Name="EraseStelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Stelle, wo gelöscht werden soll</MultiLanguageText>
</Comment>
</Member>
<Member Name="FirstStelle" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Stelle, wo 1. zu bleibende Daten sind</MultiLanguageText>
</Comment>
</Member>
<Member Name="DBDatenliste" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Datenlisten-DB</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="DBOutDaten" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Out-Daten-DB, falls angegeben</MultiLanguageText>
</Comment>
</Member>
<Member Name="OutDaten_Pointer" Datatype="DWord">
<Comment>
<MultiLanguageText Lang="de-DE">Out-Daten-Pointer: Kennung, Adresse</MultiLanguageText>
</Comment>
</Member>
<Member Name="OutDaten_Startpunkt" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Out-Daten-Startpunkt: Adresse</MultiLanguageText>
</Comment>
</Member>
<Member Name="Datenblock_inBytes" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Datenblocklänge in Bytes</MultiLanguageText>
</Comment>
</Member>
<Member Name="Suchstelle" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Bei angegebenen Datensatz suchen</MultiLanguageText>
</Comment>
</Member>
<Member Name="SFC_WRITE_PROT" Datatype="Bool">
<Comment>
<MultiLanguageText Lang="de-DE">Rückmeldung SFC-Aufruf</MultiLanguageText>
</Comment>
</Member>
<Member Name="NichtCopy" Datatype="Int">
<Comment>
<MultiLanguageText Lang="de-DE">Datenmenge, die nicht vorschoben wird</MultiLanguageText>
</Comment>
</Member>
<Member Name="Schleife" Datatype="Word">
<Comment>
<MultiLanguageText Lang="de-DE">Loopzähler</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>DatenOutSort</Name>
<Namespace />
<Number>89</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 suchen / löschen
SSDB: Datenlisten-DB
SSDW: Datenlisten-1.DW
SEARCHDATEN: Pointer, wo einzutragende Daten stehen (P#DB1.DBX0.0, P#M220.0)
AUFTRAG: XXYY
XX: 0A = Datensatz YY lesen
0D = Datensätze löschen (ab DS1, Anzahl = YY)
0E = Datensatz YY löschen
YY: 01 - Anzahl Einträge = Angabe welcher Datensatz / Anzahl zum Löschen
OUTDATEN: Pointer, wohin ausgelesene Daten übergeben werden (P#DB1.DBX0.0,
P#M220.0)
RE_VAL: Rückmeldungen:
Bit0: Kein Datenlistenbereich / falscher Kopfinhalt / Endekennung
Bit1: SFC20-Aufruf mit Fehler
Bit2: Sortliste ist leer
Bit3: Falscher Parameter bei Aufruf
Bit4: Frei
Bit5: Undefinierte OUT-Daten
Bit6: Frei
Bit7: Frei
</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="55">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="56">
<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>
<LineComment>
<Text>schreibgeschützt</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="48">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlisten-Bereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="51">
<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="52">
<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="55">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="0" />
<LineComment>
<Text>Any-Kennung, Datentyp</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="58">
<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="61">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="16" />
<LineComment>
<Text>Wiederholungen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="64">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="66">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="32" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="69">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
<LineComment>
<Text>Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="72">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="74">
<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="77">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="78">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="48" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="81">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="82">
<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="89">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="90">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="92">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="94">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="95">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err1" />
</Access>
</StlStatement>
<StlStatement UId="97">
<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="98">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Kopf" />
</Symbol>
<LineComment>
<Text>Datenliste-Kopf</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="101">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Byte</ConstantType>
<ConstantValue>16#DB</ConstantValue>
</Constant>
<LineComment>
<Text>= Datenlistekennung ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="104">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="106">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="109">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="110">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="112">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="115">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="116">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="119">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="120">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>128</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="122">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="123">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="126">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="127">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="129">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Max.Anzahl von Datenblöcken</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="132">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="133">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="136">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="137">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="139">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Stammdaten" />
</Symbol>
<LineComment>
<Text>Anzahl der Stammdaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="142">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="143">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="146">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="147">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>9</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="149">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="150">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="153">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="154">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Stammdaten" />
</Symbol>
<LineComment>
<Text>Anzahl der Stammdaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="157">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="160">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="161">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlistebereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="164">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="165">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Länge der Datenliste</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="168">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="171">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="172">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
<LineComment>
<Text>DB byteorientiert</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="175">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="176">
<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="179">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="181">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="182">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenlisten_Ende" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="184">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="185">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="187">
<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="190">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="191">
<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="194">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="195">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenlisten_Ende" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="197">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_DB_LENGTH" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="199">
<StlToken Text="GT_I" />
<LineComment>
<Text>Datenlisten-DB ist zu kurz!</Text>
</LineComment>
</StlStatement>
<StlStatement UId="201">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlisten-Bereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="204">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="205">
<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="207">
<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="210">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="212">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err0" />
<LineComment>
<Text>kein Datenlisten-Bereich</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="215">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="216">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="219">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="221">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="222">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="225">
<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="226">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="PARA" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="228">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="320" />
<LineComment>
<Text>Aufrufparameter zwischenspeichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="231">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="232">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="234">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Byte</ConstantType>
<ConstantValue>16#00</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="236">
<StlToken Text="LE_I" />
</StlStatement>
<StlStatement UId="237">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err3" />
<LineComment>
<Text>Falscher Aufrufparameter</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="240">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="241">
<StlToken Text="CAC" />
</StlStatement>
<StlStatement UId="242">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Länge der Datenliste (maximale Anzahl der Datensätze)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="245">
<StlToken Text="GT_I" />
</StlStatement>
<StlStatement UId="246">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err3" />
<LineComment>
<Text>Falscher Aufrufparameter</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="249">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="250">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Byte</ConstantType>
<ConstantValue>16#0A</ConstantValue>
</Constant>
<LineComment>
<Text>XX = 0A ? (Datensatz YY lesen)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="253">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para1" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="255">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="257">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="W400" />
</Access>
</StlStatement>
<StlStatement UId="259">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="260">
<LineComment>
<Text>Eintrag lesen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="262">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Datensatz YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="265">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-1</ConstantValue>
</Constant>
<LineComment>
<Text>1.Datensatz ohne Offset</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="268">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="271">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="272">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="274">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="276">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="277">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="LeseStelle" />
</Symbol>
<LineComment>
<Text>Stelle, wo gelesen werden soll</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="280">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="281">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Nw06" />
<LineComment>
<Text>OutDaten ok ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="284">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="285">
<LabelDeclaration>
<Label Name="W400" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Byte</ConstantType>
<ConstantValue>16#0E</ConstantValue>
</Constant>
<LineComment>
<Text>XX = 0E ? (Datensatz YY löschen)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="289">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="291">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="W401" />
</Access>
</StlStatement>
<StlStatement UId="293">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="294">
<LineComment>
<Text>Datensatz löschen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="296">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="298">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="300">
<StlToken Text="EQ_I" />
</StlStatement>
<StlStatement UId="301">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err2" />
<LineComment>
<Text>Liste ist leer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="304">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="305">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Datensatz YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="308">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>zu löschender Datensatz ist grösser als Einträge ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="311">
<StlToken Text="GT_I" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="313">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Ende" />
<LineComment>
<Text>Keine Aktion</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="316">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="317">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Datensatz YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="320">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-1</ConstantValue>
</Constant>
<LineComment>
<Text>1.Datensatz ohne Offset</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="323">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="326">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="327">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="329">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="331">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="332">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="EraseStelle" />
</Symbol>
<LineComment>
<Text>Stelle, wo gelöscht werden soll</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="335">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="336">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Nw08" />
<LineComment>
<Text>Daten löschen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="339">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="340">
<LabelDeclaration>
<Label Name="W401" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Byte</ConstantType>
<ConstantValue>16#0D</ConstantValue>
</Constant>
<LineComment>
<Text>XX = 0D ? (Datensätze YY löschen, ab 1.DS)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="344">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para1" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="346">
<StlToken Text="NE_I" />
<LineComment>
<Text>Nein !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="348">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="W402" />
</Access>
</StlStatement>
<StlStatement UId="350">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="351">
<LineComment>
<Text>Datenblock löschen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="353">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="355">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="357">
<StlToken Text="EQ_I" />
</StlStatement>
<StlStatement UId="358">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err2" />
<LineComment>
<Text>Liste ist leer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="361">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="362">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Anzahl Datensätze YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="365">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="368">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="369">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="371">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="373">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="374">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="FirstStelle" />
</Symbol>
<LineComment>
<Text>Stelle, wo 1. zu bleibende Daten sind</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="377">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="378">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Nw09" />
</Access>
</StlStatement>
<StlStatement UId="380">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="381">
<StlToken Text="BEU" />
</StlStatement>
<StlStatement UId="382">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="383">
<LabelDeclaration>
<Label Name="W402" />
</LabelDeclaration>
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err3" />
<LineComment>
<Text>Falscher Aufrufparameter</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="387">
<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>Auftrag kontrollieren</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="388">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="389">
<LineComment>
<Text>Out-DATEN-Pointer übernehmen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="391">
<LabelDeclaration>
<Label Name="Nw06" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="AddressConstant">
<Constant Name="OUTDATEN" Scope="local" />
</Access>
</StlStatement>
<StlStatement UId="394">
<StlToken Text="LAR2_ACCU1" />
</StlStatement>
<StlStatement UId="395">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="396">
<StlToken Text="L" />
<Access Scope="Address">
<Indirect Width="Word" Area="None" Register="AR2" BitOffset="0" />
</Access>
</StlStatement>
<StlStatement UId="398">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBOutDaten" />
</Symbol>
<LineComment>
<Text>Outdaten-DB</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="401">
<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="404">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="OutDaten_Pointer" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="406">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="407">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBOutDaten" />
</Symbol>
<LineComment>
<Text>Outdaten-DB</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="410">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Angegeben ?</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="413">
<StlToken Text="EQ_I" />
<LineComment>
<Text>Nein </Text>
</LineComment>
</StlStatement>
<StlStatement UId="415">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Nw07" />
</Access>
</StlStatement>
<StlStatement UId="417">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="418">
<LineComment>
<Text> CALL TEST_DB</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="36">
<LineComment>
<Text> DB_NUMBER :=#DBOutDaten</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="37">
<LineComment>
<Text> RET_VAL :=#SFC_RET_VAL</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="38">
<LineComment>
<Text> DB_LENGTH :=#SFC_DB_LENGTH</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="39">
<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="DBOutDaten" />
</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="425">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="426">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="428">
<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="431">
<StlToken Text="NE_I" />
<LineComment>
<Text>Ja !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="433">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err5" />
<LineComment>
<Text>Undefinierte Outdaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="436">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="437">
<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="440">
<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="443">
<StlToken Text="AW" />
</StlStatement>
<StlStatement UId="444">
<StlToken Text="SRW" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
<LineComment>
<Text>Ohne Bit</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="447">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="OutDaten_Startpunkt" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="449">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="450">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="OutDaten_Startpunkt" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="452">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_DB_LENGTH" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="454">
<StlToken Text="GT_I" />
<LineComment>
<Text>Outdaten-DB ist zu kurz</Text>
</LineComment>
</StlStatement>
<StlStatement UId="456">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err5" />
<LineComment>
<Text>Undefinierte Outdaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="459">
<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>Outdaten ok ?</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="460">
<LineComment>
<Text>Quelle-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="462">
<LabelDeclaration>
<Label Name="Nw07" />
</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="466">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="0" />
</Access>
</StlStatement>
<StlStatement UId="468">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="80" />
<LineComment>
<Text>Any-Kennung, Datentyp</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="471">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenwords speichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="474">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="16" />
</Access>
</StlStatement>
<StlStatement UId="476">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="96" />
<LineComment>
<Text>Wiederholungen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="479">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="480">
<LineComment>
<Text>DATEN-Pointer übernehmen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="482">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="484">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="32" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="487">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="LeseStelle" />
</Symbol>
<LineComment>
<Text>Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="490">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="492">
<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="495">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="496">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="48" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="499">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="500">
<LineComment>
<Text>Ziel-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="502">
<LineComment>
<Text>Kennung + Datenbytes s.o.</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="504">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="505">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="DBOutDaten" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="507">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="112" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="510">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="OutDaten_Pointer" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="512">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="128" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="515">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="516">
<StlToken Text="CALL" />
<Access Scope="Call">
<Instruction Name="BLKMOV" Version="1.1">
<Token Text="," />
<LineComment>
<Text>DatenSortliste-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="523">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="524">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="526">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="528">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="529">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err1" />
</Access>
</StlStatement>
<StlStatement UId="531">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="532">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Ende" />
</Access>
</StlStatement>
<StlStatement UId="534">
<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>Daten aus Datenliste lesen (in OUTDaten übergeben)</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="535">
<LineComment>
<Text>Gemeinsame Daten für Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="537">
<LabelDeclaration>
<Label Name="Nw08" />
</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="541">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="0" />
</Access>
</StlStatement>
<StlStatement UId="543">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="80" />
<LineComment>
<Text>Any-Kennung, Datentyp</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="546">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="547">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datensatzlänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="550">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Datensatz YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="553">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="554">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>Datenmenge, die nicht vorschoben wird</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="557">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="558">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Länge der Datenliste</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="561">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="564">
<StlToken Text="MUL_I" />
<LineComment>
<Text>Gesamtdatenlänge in Words</Text>
</LineComment>
</StlStatement>
<StlStatement UId="566">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>Datenmenge, die nicht vorschoben wird</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="569">
<StlToken Text="SUB_I" />
<LineComment>
<Text>abziehen</Text>
</LineComment>
</StlStatement>
<StlStatement UId="571">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="16" />
</Access>
</StlStatement>
<StlStatement UId="573">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="96" />
<LineComment>
<Text>Wiederholungen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="576">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="577">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="579">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="32" />
</Access>
</StlStatement>
<StlStatement UId="581">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="112" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="584">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="585">
<LineComment>
<Text>Quelle-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="587">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="EraseStelle" />
</Symbol>
<LineComment>
<Text>Stelle, wo gelöscht werden soll</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="590">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="593">
<StlToken Text="ADD_I" />
</StlStatement>
<StlStatement UId="594">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="596">
<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="599">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="600">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="48" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="603">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="604">
<LineComment>
<Text>Ziel-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="606">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="EraseStelle" />
</Symbol>
<LineComment>
<Text>Stelle, wo gelöscht werden soll</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="609">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="611">
<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="614">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="615">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="128" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="618">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="619">
<LineComment>
<Text>Daten verschieben:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="621">
<StlToken Text="CALL" />
<Access Scope="Call">
<Instruction Name="BLKMOV" Version="1.1">
<Token Text="," />
<LineComment>
<Text>DatenSortliste-Daten verschieben</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="628">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="629">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="631">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="633">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="634">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err1" />
</Access>
</StlStatement>
<StlStatement UId="636">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="637">
<LineComment>
<Text>Letzte Daten löschen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="639">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenlisten_Ende" />
</Symbol>
<LineComment>
<Text>Ende des Datenbereichs</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="642">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenblock_inBytes" />
</Symbol>
<LineComment>
<Text>Datenblocklänge in Bytes</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="645">
<StlToken Text="SUB_I" />
<LineComment>
<Text>Ab hier löschen !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="647">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="648">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="650">
<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="653">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="654">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datensatzlänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="657">
<LabelDeclaration>
<Label Name="L080" />
</LabelDeclaration>
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="660">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="661">
<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="664">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="665">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Daten löschen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="668">
<StlToken Text="T" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="670">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="671">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="673">
<StlToken Text="SRD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="675">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>DInt</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="677">
<StlToken Text="ADD_D" />
</StlStatement>
<StlStatement UId="678">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="680">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="682">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="683">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="685">
<StlToken Text="LOOP" />
<Access Scope="Label">
<Label Name="L080" />
</Access>
</StlStatement>
<StlStatement UId="687">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="688">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="691">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>-1</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="693">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="695">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="696">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="698">
<StlToken Text="GE_I" />
</StlStatement>
<StlStatement UId="699">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="w080" />
</Access>
</StlStatement>
<StlStatement UId="701">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="702">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Minimum übergeben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="705">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="706">
<LabelDeclaration>
<Label Name="w080" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="709">
<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="712">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="713">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="715">
<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="718">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="719">
<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="722">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="725">
<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="728">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="729">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Ende" />
</Access>
</StlStatement>
<StlStatement UId="731">
<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 aus Datenliste löschen ?</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="732">
<LineComment>
<Text>Gemeinsame Daten für Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="734">
<LabelDeclaration>
<Label Name="Nw09" />
</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="738">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="0" />
</Access>
</StlStatement>
<StlStatement UId="740">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="80" />
<LineComment>
<Text>Any-Kennung, Datentyp</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="743">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="744">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datensatzlänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="747">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Anzahl Datensätze YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="750">
<StlToken Text="MUL_I" />
</StlStatement>
<StlStatement UId="751">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>Datenmenge, die nicht vorschoben wird</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="754">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="755">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Listenlaenge" />
</Symbol>
<LineComment>
<Text>Länge der Datenliste</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="758">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datensatzlaenge" />
</Symbol>
<LineComment>
<Text>Datenblocklänge</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="761">
<StlToken Text="MUL_I" />
<LineComment>
<Text>Gesamtdatenlänge in Words</Text>
</LineComment>
</StlStatement>
<StlStatement UId="763">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>Datenmenge, die nicht vorschoben wird</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="766">
<StlToken Text="SUB_I" />
<LineComment>
<Text>abziehen</Text>
</LineComment>
</StlStatement>
<StlStatement UId="768">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="16" />
</Access>
</StlStatement>
<StlStatement UId="770">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="96" />
<LineComment>
<Text>Wiederholungen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="773">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="774">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDB" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="776">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="32" />
</Access>
</StlStatement>
<StlStatement UId="778">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="Word" BitOffset="112" />
<LineComment>
<Text>DB_Nummer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="781">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="782">
<LineComment>
<Text>Quelle-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="784">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="FirstStelle" />
</Symbol>
<LineComment>
<Text>Stelle, wo 1. zu bleibende Daten sind</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="787">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="789">
<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="792">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="793">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="48" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="796">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="797">
<LineComment>
<Text>Ziel-Pointer erzeugen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="799">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="801">
<StlToken Text="ADD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>20</ConstantValue>
</Constant>
<LineComment>
<Text>1.DS</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="804">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="806">
<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="809">
<StlToken Text="OD" />
</StlStatement>
<StlStatement UId="810">
<StlToken Text="T" />
<Access Scope="Address">
<Address Area="Local" Type="DWord" BitOffset="128" />
<LineComment>
<Text>Kennung, Adresse</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="813">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="814">
<LineComment>
<Text>Daten verschieben:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="816">
<StlToken Text="CALL" />
<Access Scope="Call">
<Instruction Name="BLKMOV" Version="1.1">
<Token Text="," />
<LineComment>
<Text>DatenSortliste-Daten verschieben</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="823">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="824">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SFC_RET_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="826">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="828">
<StlToken Text="NE_I" />
</StlStatement>
<StlStatement UId="829">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="Err1" />
</Access>
</StlStatement>
<StlStatement UId="831">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="832">
<LineComment>
<Text>Letzte Daten löschen:</Text>
</LineComment>
<StlToken Text="COMMENT" />
</StlStatement>
<StlStatement UId="834">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Datenlisten_Ende" />
</Symbol>
<LineComment>
<Text>Ende des Datenbereichs</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="837">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>Datenmenge, die nicht vorschoben wird</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="840">
<StlToken Text="SUB_I" />
</StlStatement>
<StlStatement UId="841">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>2 mal, da Angabe in Word (Angabe in Byte benötigt!)</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="844">
<StlToken Text="SUB_I" />
<LineComment>
<Text>Ab hier löschen !</Text>
</LineComment>
</StlStatement>
<StlStatement UId="846">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="847">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="849">
<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="852">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="853">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="NichtCopy" />
</Symbol>
<LineComment>
<Text>Datenmenge, die nicht vorschoben wird</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="856">
<LabelDeclaration>
<Label Name="L090" />
</LabelDeclaration>
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="859">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="860">
<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="863">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="864">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
<LineComment>
<Text>Daten löschen</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="867">
<StlToken Text="T" />
<Access Scope="Address">
<Indirect Width="Word" Area="DB">
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</Indirect>
</Access>
</StlStatement>
<StlStatement UId="869">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="870">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="872">
<StlToken Text="SRD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="874">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>DInt</ConstantType>
<ConstantValue>2</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="876">
<StlToken Text="ADD_D" />
</StlStatement>
<StlStatement UId="877">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="879">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR1Zeiger" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="881">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="882">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Schleife" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="884">
<StlToken Text="LOOP" />
<Access Scope="Label">
<Label Name="L090" />
</Access>
</StlStatement>
<StlStatement UId="886">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="887">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="890">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="Para2" />
</Symbol>
<LineComment>
<Text>Anzahl Datensätze YY </Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="893">
<StlToken Text="SUB_I" />
</StlStatement>
<StlStatement UId="894">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="896">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="897">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>0</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="899">
<StlToken Text="GE_I" />
</StlStatement>
<StlStatement UId="900">
<StlToken Text="JC" />
<Access Scope="Label">
<Label Name="w090" />
</Access>
</StlStatement>
<StlStatement UId="902">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="903">
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Minimum übergeben</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="906">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="907">
<LabelDeclaration>
<Label Name="w090" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="SSDW" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="910">
<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="913">
<StlToken Text="ITD" />
</StlStatement>
<StlStatement UId="914">
<StlToken Text="SLD" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Int</ConstantType>
<ConstantValue>3</ConstantValue>
</Constant>
</Access>
</StlStatement>
<StlStatement UId="916">
<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="919">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="920">
<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="923">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AnzahlEintraege" />
</Symbol>
<LineComment>
<Text>Anzahl der eingetragenen Datensätze</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="926">
<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="929">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="930">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Ende" />
</Access>
</StlStatement>
<StlStatement UId="932">
<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>Datensätze aus Datenliste löschen ?</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="933">
<LabelDeclaration>
<Label Name="Ende" />
</LabelDeclaration>
<StlToken Text="SET" />
<LineComment>
<Text>VKE = 1 ohne Fehler !!!</Text>
</LineComment>
</StlStatement>
<StlStatement UId="936">
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_0000</ConstantValue>
</Constant>
<LineComment>
<Text>Ok-Status</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="939">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Ok" />
</Access>
</StlStatement>
<StlStatement UId="941">
<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="945">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="947">
<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="951">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="953">
<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>Sortliste ist leer</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="957">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="959">
<LabelDeclaration>
<Label Name="Err3" />
</LabelDeclaration>
<StlToken Text="L" />
<Access Scope="LiteralConstant">
<Constant>
<ConstantType>Word</ConstantType>
<ConstantValue>2#0000_0000_0000_1000</ConstantValue>
</Constant>
<LineComment>
<Text>Falscher Parameter bei Aufruf</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="963">
<StlToken Text="JU" />
<Access Scope="Label">
<Label Name="Err" />
</Access>
</StlStatement>
<StlStatement UId="965">
<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>Undefinierte OUTDaten</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="969">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="970">
<LabelDeclaration>
<Label Name="Err" />
</LabelDeclaration>
<StlToken Text="CLR" />
<LineComment>
<Text>VKE = 0 bei Fehler !!!</Text>
</LineComment>
</StlStatement>
<StlStatement UId="973">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="974">
<LabelDeclaration>
<Label Name="Ok" />
</LabelDeclaration>
<StlToken Text="T" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="RE_VAL" />
</Symbol>
</Access>
</StlStatement>
<StlStatement UId="977">
<StlToken Text="SAVE" />
<LineComment>
<Text>VKE in BIE-Bit speichern </Text>
</LineComment>
</StlStatement>
<StlStatement UId="979">
<StlToken Text="EMPTY_LINE" />
</StlStatement>
<StlStatement UId="980">
<StlToken Text="L" />
<Access Scope="LocalVariable">
<Symbol>
<Component Name="AR2_Speicher" />
</Symbol>
<LineComment>
<Text>AR2 zurückspeichern</Text>
</LineComment>
</Access>
</StlStatement>
<StlStatement UId="983">
<StlToken Text="LAR2_ACCU1" />
</StlStatement>
<StlStatement UId="984">
<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>Fehlerausgabe / RET_VAL</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.CompileUnit>
<MultilingualText ID="30" CompositionName="Title">
<ObjectList>
<MultilingualTextItem ID="31" CompositionName="Items">
<AttributeList>
<Culture>de-DE</Culture>
<Text>Datensort-Modul</Text>
</AttributeList>
</MultilingualTextItem>
</ObjectList>
</MultilingualText>
</ObjectList>
</SW.Blocks.FC>
</Document>