Hallo,
ich benutze den FuBa ReadText in meinen Infoset um die Langtexte meiner Arbeitsplanpositionen auszugeben.
Im Bereich Data:
data: begin of itab occurs 0,
tdformat like tline-tdformat,
tdline like tline-tdline,
end of itab,
itab_line like line of itab,
zname like thead-tdname.
Im Bereich Satzverarbeitung
CONCATENATE '200' PLPO-PLNTY PLPO-PLNNR PLPO-PLNKN PLPO-ZAEHL
into zname.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = 'PLPO'
LANGUAGE = 'D'
NAME = zname
OBJECT = 'ROUTING'
* ARCHIVE_HANDLE = 0
* LOCAL_CAT = ' '
* IMPORTING
* HEADER =
* OLD_LINE_COUNTER =
TABLES
LINES = itab
* EXCEPTIONS
* ID = 1
* LANGUAGE = 2
* NAME = 3
* NOT_FOUND = 4
* OBJECT = 5
* REFERENCE_CHECK = 6
* WRONG_ACCESS_TO_ARCHIVE = 7
* OTHERS = 8
.
IF SY-SUBRC <> 0.
* error handling
ENDIF.
Das Ergebnis ist 1A, sobald ein Langtext vorhanden ist.
Wenn keiner vorhanden ist, kommt eine Fehlermeldung in der Statusleiste und es wird kein Ergebnis (der anderen Einträge) ausgegeben.
Der Text 200N500864100000000200000002 ID PLPO Sprache DE wurde nicht gefunden
Ich möchte bei einem SY-SUBRC = 4 das die Felder leer bleiben und die Abfrage weiter läuft. Hierfür muss ich doch nur ein error handling (clear itab. oder so) einfügen, aber irgendwie greift dies nicht....
Viele Grüße
Christoph