September 2002 PL/I, das Spezifikation Abbildet: HÜLSE-FunktionscZusammenfassung 2-39 2 SEQINIT(PTR, /* HERAUS: Reihenfolgendaten-PTR*/ CHAR(*), /* IN: Reihenfolgentypecode*/ ÖRTLICH FESTGELEGTES BIN(31)); IN: typecodelänge */ // initialisiert eine gesprungene Reihenfolge SEQLEN(PTR, /* IN: Reihenfolgendaten-PTR*/ ÖRTLICH FESTGELEGTES BIN(31)); /* HERAUS: Länge von Reihenfolgen*/ // holt die gegenwärtige Länge der Reihenfolge zurück SEQLSET(PTR, /* IN: Reihenfolgendaten-PTR*/ ÖRTLICH FESTGELEGTES BIN(31)); IN: neue Länge von folgendem */ // Änderungen die Zahl Elementen in der Reihenfolge SEQMAX(PTR, /* IN: Reihenfolgendaten-PTR*/ ÖRTLICH FESTGELEGTES BIN(31)); /* HERAUS: Maximum len von Reihenfolgen*/ // Rückkehr die gesetzte Länge des Maximums der Reihenfolge SEQSET(PTR, /* IN: Reihenfolgendaten-PTR*/ ÖRTLICH FESTGELEGTES BIN(31), /* IN: Elementzahl*/ PTR); /* IN: addr(seq_buffer)*/ // Speicher die Daten in das element_numberelement von // eine unbegrenzte Reihenfolge. STRÒBJ(PTR, /* IN: * der IOR-Zeichenkette (ungültig-beendet)/ PTR); /* HERAUS: Gegenstandbezugs*/ // verursacht einen Gegenstandhinweis von einem IOR STRCON(PTR, /* INOUT: breites * der Zeichenkette #1/ PTR); /* IN: breites * der Zeichenkette #2/ STRDUPL(PTR, /* IN: Zeichenkettezeiger*/ PTR); /* HERAUS: doppeltes Zeichenkette-PTR*/ // Duplikate eine gegebene unbegrenzte Zeichenkette STRFREE(PTR); /* IN: unbegrenztes Zeichenkette-PTR*/ // gibt die Ablage einer unbegrenzten Zeichenkette frei STRGET(PTR, /* IN: Zeichenkettezeiger*/ CHAR(*), /* HERAUS: PL-/izeichenkette */ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/izeichenkette-Längen*/ // Kopien der Inhalt einer dynamischen Zeichenkette zu CHAR(n) Daten Einzelteil STRLENG(PTR /* IN: Zeichenkettezeiger*/ ÖRTLICH FESTGELEGTES BIN(31)); /* HERAUS: len von Zeichenkette*/ // Rückkehr die tatsächliche Länge einer unbegrenzten Zeichenkette STRSET (PTR, /* HERAUS: Zeichenkette PTR - kein Auflage*/ CHAR(*), /* IN: PL-/izeichenkette */ ÖRTLICH FESTGELEGTES BIN(31)); /* IN: PL-/izeichenkette-Längen*/