2.4.39 UNSTRING
| | | | | |
Format:
UNSTRING Wert1
DELIMITED BY
[ALL] Wert2
[DELIMITER Wert3]
[
OR
[ALL] Wert4
[DELIMITER Wert5]
...
]
INTO Datenfeld1 {[COUNT [IN] Datenfeld2] [DELIMITER [IN] Datenfeld3]}
[ ...]
[[WITH] POINTER Datenfeld4]
[TALLYING [IN] Datenfeld5]
[ON OVERFLOW Befehlssequenz1]
[NOT ON OVERFLOW Befehlssequenz2]
[END-UNSTRING]
| |
| | | |
Mit der UNSTRING -Anweisung kann der Inhalt des angegebenen Wertfeldes aufgeteilt werden, wobei das Ergebnis der Aufteilung in Datenfeld1 abgestellt wird.
Beginnend am Anfang der Zeichenkette oder ab der Position die in Datenfeld4 spezifiziert wird, beginnt die Übertragung der einzelnen Zeichen bis eine der Abbruchsbedingungen eintrifft.
Ist die Klausel COUNT angegeben, wird die Anzahl der untersuchten Zeichen in Datenfeld2 abgestellt.
Ist die Klausel DELIMITER angegeben, wird der Delimiter der zum Abbruch führte in Datenfeld3 abgestellt.
Mit TALLYING wird die Anzahl der vom Unstring gefüllten Felder (Datenfeld1 ...) zu dem Inhalt von Datenfeld5 addiert.
Sind die angegebenen Datenfelder zu klein um alle Zeichen aufzunehmen, wird die Befehlssequenz1 ausgeführt, falls angegeben.
Beispiel:
Siehe auch STRING
Zurück zu Acc-Cobol Unlock Statement
Hoch zu Procedure Divison in COBOL
Weiter zu USE
| |