September 2002 PL/I, das Spezifikation Abbildet: HÜLSE-FunktionscZusammenfassung 2-73 2 Beispiel DCL ORIG_STR_PTR PTR; DCL DUPL_STR_PTR PTR; ANRUF STRDUPL(ORIG_STR_PTR, dupl_str_ptr); 2,16,37 STRFREE Zusammenfassung STRFREE(PTR); /* IN: unbegrenztes Zeichenkettezeiger*/ // gibt die Ablage einer unbegrenzten Zeichenkette frei Beschreibung STRFREE wird verwendet, die Ablage einer unbegrenzten Zeichenkette freizugeben. Beispiel DCL MY_STRING CHAR(50) INIT('HELLO '); DCL MY_UNB_STRING PTR; ANRUF STRSET(MY_UNB_STRING, my_string, length(my_string)); WENN CHECK_ERRORS('STRSET ') ^ = COMPLETION_STATUS_YES DANN ZURÜCKGEHEN; ... ; DES ANRUFS STRFREE(MY_UNB_STRING),/* BEENDET UNBEGRENZTES ZEICHENKETTE*/ 2,16,38 STRGET Zusammenfassung STRGET(PTR, /* IN: Zeichenkettezeiger*/ CHAR(*), /* HERAUS: PL-/izeichenkette*/ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/izeichenkette-Längen*/ // Kopien der Inhalt einer dynamischen Zeichenkette zu einem CHAR(n) Datenelement Beschreibung Diese Dienstprogrammfunktion kopiert die Buchstaben im unbegrenzten Zeichenkettezeiger src_pointer zu DEST PL/I CHAR(dest_len) Zeichenketteeinzelteil. Wenn src_pointer enthält nicht genügende Buchstaben, um genau zu füllen DEST , dann es seien Sie der aufgefüllte Raum. Wenn es zu viele Buchstaben im src_pointer gibt für DEST , dann nur dest_len Buchstaben vom Zeichenkettezeiger erhält kopiertes Über- und a Verstümmelungausnahme wird angehoben. Nullzeichen werden nie vom src_pointer kopiert zum DEST .