2-40 PL-/icSprache, die Spezifikation, v1.0 Abbildet September 2002 2 STRSETS(PTR, /* HERAUS: Zeichenkette-PTR mit Auflage*/ CHAR(*), /* IN: PL-/izeichenkette */ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/izeichenkette-Längen*/ // stellt eine dynamische Zeichenkette von einem CHAR(n) Datenelement her TYPEGET(PTR, /* IN: addr(anyInfoBlock)*/ CHAR(*), /* HERAUS: typecode */ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: typecodelängen*/ // Extrakte die Art von IRGENDEINEM TYPESET(PTR, /* IN: addr(anyInfoBlock)*/ CHAR(*), /* IN: typecode */ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: typecodelängen*/ // Einsätze die Art von IRGENDEINEM WSTRCON(PTR, /* INOUT: breites * der Zeichenkette #1/ PTR); /* IN: breites * der Zeichenkette #2/ // verkettet zwei unbegrenzte breite Zeichenketten WSTRDUP(PTR, /* IN: breites Zeichenkettezeiger*/ PTR); /* HERAUS: doppeltes Zeichenkette-PTR*/ // Duplikate eine gegebene unbegrenzte breite Zeichenkette WSTRFRE(PTR); /* IN: unbegrenztes W-Zeichenkette-PTR*/ // gibt die Ablage einer unbegrenzten breiten Zeichenkette frei WSTRGET(PTR, /* IN: Zeichenkettezeiger*/ CHAR(*), /* HERAUS: PL-/izeichenkette */ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/izeichenkette-Längen*/ // Kopien der Inhalt einer unbegrenzten breiten Zeichenkette zu a CHAR(n) Datenelement WSTRLEN(PTR /* IN: breites Zeichenkettezeiger*/ ÖRTLICH FESTGELEGTES BIN(31)); /* HERAUS: len von breitem Zeichenkette*/ // Rückkehr die Länge einer unbegrenzten breiten Zeichenkette WSTRSET(PTR, /* HERAUS: Wstring PTR - kein Auflage*/ CHAR(*), /* IN: Breites Zeichenkette* PL/I/ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/iW-zeichenkette-Längen*/ WSTRSTS(PTR, /* HERAUS: Zeichenkette-PTR mit Auflage*/ CHAR(*), /* IN: Breites Zeichenkette* PL/I/ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/iW-zeichenkette-Längen*/ // stellt eine unbegrenzte breite Zeichenkette von WIDECHAR(n) Daten her Einzelteil ANHANG CHECK_ERRORS(CHAR(*)); RETURNS(FIXED BIN(31))/* IN: Verfahren benanntes */