Zeichen aus einer Zeichenfolge löschen
DELETE löscht L Zeichen der Zeichenfolge am Eingang IN ab der Position P, wobei 1 das erste Zeichen der Zeichenfolge kennzeichnet. Das Ergebnis wird in die Ausgangsvariable geschrieben.
Eingang
Eingangszeichenfolge
Anzahl der Zeichen der Eingangszeichenfolge, die gelöscht werden
Position, an der das Löschen beginnt, wobei 1 das erste Zeichen der Zeichenfolge kennzeichnet.
Ausgang
Ergebniszeichenfolge
Wenn Sie diesen Befehl mit UTF-8-Zeichenfolgen verwenden, beachten Sie die Hinweise zu UTF-8-Zeichenfolgen unter dem Datentyp STRING.
Wenn die Ausgangs-Zeichenfolge länger ist als die für die Ausgangsvariable im Feld “Typ” definierte Länge, werden nur so viele Zeichen kopiert, wie in die Ausgangsvariable passen.Die Systemvariable sys_bIsCarry wird gesetzt.
wenn eine am Eingang oder Ausgang angegebene Zeichenfolge eine ungültige Zeichenfolge ist
wenn eine am Eingang oder Ausgang angegebene Zeichenfolge eine ungültige Zeichenfolge ist
wenn die Ausgangs-Zeichenfolge länger ist als die für die Ausgangsvariable im Feld "Typ" definierte Länge
Im POE-Kopf werden alle Ein- und Ausgangsvariablen deklariert, die für die Programmierung dieser Funktion verwendet werden. Für alle Programmiersprachen wird der gleiche POE-Kopf verwendet.
VAR
input_string: STRING[15]:='Ideas for life';
character_number: INT:=8;
start_position: INT:=6;
output_string: STRING[5]:='';
END_VAR
In diesem Beispiel wurden die Eingangsvariablen (input_string, character_number und start_position) deklariert. Stattdessen können Sie die Eingangszeichenfolge ('Ideas for life'), die Anzahl der zu löschenden Zeichen und die Startposition auch direkt an die Eingänge der Funktion schreiben. Die Zeichenfolge muss im POE-Kopf und an den Funktionseingängen in Apostrophen stehen.
Ausgehend von start_position(6), wird die mit character_number festgelegte Anzahl Zeichen (8) von input_string ('Ideas for life’) gelöscht. Die resultierende Zeichenfolge ('Ideas') wird in output_string geschrieben.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 5 ;
NETWORK_BODY
B(B_F,DELETE!,Instance,10,0,16,5,,?DIN?DL?DP?C);
B(B_VARIN,,input_string,8,1,10,3,);
B(B_VARIN,,character_number,8,2,10,4,);
B(B_VARIN,,start_position,8,3,10,5,);
B(B_VAROUT,,output_string,16,1,18,3,);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
output_string:=DELETE(input_string, character_number, start_position);