COBOL, das Zusätzliche Programme Juni 1999 Datatype Abbildet 1-27 1 1,15,16 STRLEN Zusammenfassung Bringt die tatsächliche Länge einer unbegrenzten Zeichenkette zurück. STRLEN (in der Zeichenkette Undurchlässig-Zeichenkette-Art, AUS nicht unterzeichnetem langem Länge) Beschreibung Die Hilfsfunktion STRLEN bringt die Zahl Buchstaben in einem unbegrenzten zurück Zeichenkette. Eine CORBA-Ausnahme wird angehoben, wenn die undurchlässige Zeichenkette nicht zugeteilt wird. Beispiel Mein-Zeichenkette 01 ZEIGER 01 LEN ABBILDUNG 9(09) BINÄR. . . . PROZEDURTEIL. . . . ANRUF "STRLEN" VERWENDEN Der Mein-Zeichenkette, LEN 1,15,17 STRSET U. STRSETP Zusammenfassung Teilt Ablage für eine unbegrenzte Zeichenkette zu, stellt den Zeiger ein, um auf ihn zu zeigen, dann stellt ein Wert. STRSET (AUS Zeichenkette Undurchlässig-Zeichenkette-Art, IN nicht unterzeichnetem langem Länge-Von-COBOL-Text-Bereich, IN < PIC X > COBOL-Text) STRSETP(OUT-Zeichenkette Undurchlässig-Zeichenkette-Art, IN nicht unterzeichnetem langem Länge-Von-COBOL-Text-Bereich, IN < PIC X > COBOL-Text) Beschreibung Die Hilfsfunktion STRSET stellt eine unbegrenzte Zeichenkette her und kopiert ganzes Buchstaben vom COBOLTEXTBEREICH in ihn. Wenn der Text abschließende Zwischenraumzeichen enthält, werden diese nicht zur DESTZEICHENKETTE kopiert. Die STRSETP-Version dieser Funktion ist identisch, ausgenommen sie abschließende Zwischenraumzeichen kopiert.