Ansicht
Dokumentation

LC_GET_FIELD_TO_SET_ROW - NICHT MEHR VERWENDEN!! Baustein ist stillgelegt!

RFUMSV00 - Advance Return for Tax on Sales/Purchases   SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Dieser Funktionsbaustein dient dazu, daß man in einer internen Tabelle positionieren bzw. suchen kann. Dem Anwender wird hierbei ein Dialogfenster angeboten, in dem er mitteilen kann, welchen Tabelleneintrag er haben möchte. Damit dieses Dialogfenster erzeugt und der Eintrag gefunden werden kann, ist es erforderlich, daß für die mit READ_TABLE übergebene Tabelle eine Struktur im Data Dictionary vorhanden ist. Diese Struktur muß Keyfelder beinhalten, da nur diese in dem Dialogfenster angezeigt werden. Das Mandantenfeld wird dabei ignoriert. Als Ergebnis erhält man den Index, mit dem man die interne Tabelle lesen muß, um den gesuchten Eintrag zu bekommen. Analog zu der ABAP/4-Anweisung READ TABLE x WITH KEY y BINARY SEARCH wird ein Rückgabewert geliefert.Über die Tabelle SELLIST kann man Felder des Popups vorbelegen . Diese Felder sind nicht eingabebereit, aber sie werden bei der Suche nach einem bestimmten Schlüssel berücksichtigt. Wer diese Funktionalität nicht benötigt, kann entweder eine leere Tabelle übergeben, oder den Funktionsbaustein POPUP_SEEK_IN_TABLE verwenden. Dieser ruft intern TABLE_SEEK_FOR_POSITION mit einer leeren Tabelle auf. Die Funktion Springen Anderer Eintrag in der erweiterten Tabellenpflege wurde mit diesem Funktionsbaustein realisiert.

Beispiel:
TABLES: T001, T001L.
DATA: BEGIN OF T001L_TAB.
INCLUDE STRUCTURE T001L.
DATA: ... , "Beliebige Anzahl Felder
END OF T001L_TAB.

DATA: BEGIN OF SEL_TAB.
INCLUDE STRUCTURE VIMSELLIST.
DATA: END OF SEL_TAB.

DATA: NEXTLINE LIKE SY-TABIX,
RETURNCODE LIKE SY-SUBRC.
...
...
SEL_TAB-VIEWFIELD = 'WERKS'.
SEL_TAB-OPERATOR = 'EQ'.
SEL_TAB-VALUE = T001-WERKS.
SEL_TAB-DDIC = 'S'.
APPEND SEL_TAB.
CALL FUNCTION 'TABLE_SEEK_FOR_POSITION'
EXPORTING
TABLE = 'T001L'
IMPORTING
POSITION = NEXTLINE
RETURNCODE = RETURNCODE
TABLES
READ_TABLE = T001L_TAB
SELLIST = SEL_TAB
EXCEPTIONS
CANCELLED_BY_USER = 0012.
CHECK SY-SUBRC EQ 0000.
IF RETURNCODE = 8.
IF NEXTLINE GT 1.
NEXTLINE = NEXTLINE - 1.
ENDIF.
ENDIF.
READ TABLE T001L_TAB INDEX NEXTLINE.
...
...

Parameter

F1_FORMNAME
F1_PROGRAMNAME
F4_FORMNAME
F4_PROGRAMNAME
FIELD
LENGTH
OFFSET
SELLIST
TABLE
VALUE

Ausnahmen

CANCELLED_BY_USER
TABLE_NOT_FOUND

Funktionsgruppe

GLU1

Addresses (Business Address Services)   Addresses (Business Address Services)  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Length: 3869 Date: 20240523 Time: 142902     sap01-206 ( 59 ms )