Textsymbole sind Textkonstanten, die Sie außerhalb eines Programms eingeben und pflegen. Sie sollten Textsymbole anstelle der Textliterale in der Endfassung Ihres Programms verwenden, um es sprachenunabhängig und somit leichter pflegbar zu halten.
Weitere Informationen zu Literalen und Textsymbolen finden Sie im ABAP Benutzerhandbuch in den Kapiteln
Literale und Textsymbole.Voraussetzungen
Jedem Textsymbol haben Sie eine dreistellige Kennung zugewiesen. Diese Kennung definieren Sie in in der WRITE-Anweisung
WRITE... TEXT-<idt>...
Bei der Ausführung des Programms sucht das System im Textpool nach einem Textsymbol mit der Kennung <idt> und gibt den entsprechenden Text in der Ausgabeliste aus. Falls das Textsymbol <idt> nicht vorhanden ist, überspringt das System den entsprechenden Teil der WRITE-Anweisung.
Diese Kennung darf nicht mit den Zeichen '%_' beginnen und keine Leerzeichen enthalten.
In der nachfolgenden Beschreibung gehen wir vom folgenden Programmbeispiel aus:
PROGRAM TEXTELEMENTE02.
WRITE: TEXT-010,
/ TEXT-AAA,
/ TEXT-020,
/ 'Default Text 030'(030),
/ 'Default Text 040'(040).
Vorgehensweise
So gehen Sie vor, um aus dem ABAP Editor ein Textsymbol zu pflegen:
Ergebnis
Das gesicherte Textsymbol zum definierenden Programm wurde in den Textpool der Anmeldesprache übernommen. Sie können nun weitere Textsymbole anlegen und bestehende ändern.
Weitere Funktionen
Weitere Textsymbole anlegen
Ab Release 3.1g werden Leerzeichen nicht mehr durch Unterstriche " _ ") dargestellt. Sie können Unterstriche stattdessen auf einem Ausgabebild mit Textsymbolen ausgeben.
Textsymbole mit Textliteralen verknüpfen
Textsymbole werden mit folgender Syntax mit Textliteralen verknüpft:
WRITE... '<textliteral>'(<idt>)...
Ist das Textsymbol <idt> vorhanden, dann wird es auch vom System verwendet. Ansonsten gibt das System das Textliteral <textliteral> auf der Liste aus.
Beispiel: siehe oben.
Wurden für das obige Beispiel die Textsymbole mit den Kennungen " 020 " und " 040 " nicht angelegt, so erlaten Sie folgende Ausgabe:
Im Falle des Textsymbols " 020 " überspringt das System die Anweisung WRITE. Im Falle von " 040 " wird der im Programm definierte Ersatztext ausgegeben, der in der WRITE-Anweisung als Literal definiert wurde.
Textsymbole löschen
Um ein Textsymbol zu löschen, markieren Sie die Zeile mit dem entsprechenden Textsymbol und wählen Sie Löschen.