3.65 STRINGLEN: Länge einer Zeichenkette ermittlen
| | | | | |
Format:
CALL STRINGLEN USING Feld Länge
| |
| | | |
Es wird die Länge der Zeichenkette von Feld in Länge abgestellt.
Hierbei wird vom Ende von Feld beginnend nach dem 1. Zeichen gesucht, das kein Leerzeichen ist.
Beinhaltet Feld zum Beispiel ABC OK wird in Länge eine 5 abgestellt, d.h. Feld beinhaltet den String "ABC OK".
Siehe auch: DELSTRING SUBSTRING MOVSTRING GETSTRING FINDSTRING INSSTRING RSTRING SPRINTF TRIM
Beispiel: stringlen.cob
identification division.
data division.
working-storage section.
77 pos pic 9999.
77 feld pic x(50).
77 len pic 9999.
procedure division.
display 'call stringlen Beispiele'.
display ' '.
display ' '.
move 'Das ist ein Text' to feld.
display 'Inhalt von feld: ' feld.
display 'call stringlen using feld len'.
call stringlen using feld len.
display 'Inhalt von len: ' len.
display ' '.
move space to feld.
display 'Inhalt von feld: <Space>'.
display 'call stringlen using feld len'.
call stringlen using feld len.
display 'Inhalt von len: ' len.
display ' '.
move low-value to feld.
display 'Inhalt von feld: <Low-Value>'.
display 'call stringlen using feld len'.
call stringlen using feld len.
display 'Inhalt von len: ' len.
display ' '.
move all '1234567890' to feld.
display 'Inhalt von feld: ' feld.
display 'call stringlen using feld len'.
call stringlen using feld len.
display 'Inhalt von len: ' len.
accept omitted.
Zurück zu SPRINTF
Hoch zu Funktionslibrary
Weiter zu SUBSTRING: Nach einer Zeichenkette suchen
|