Code: Alles auswählen.
DATA: i_tab TYPE TABLE OF T001.
FIELD-SYMBOLS: <i_tab> LIKE LINE OF i_tab.
select * from T001 into table i_tab.
LOOP AT i_tab ASSIGNING <i_tab>.
WRITE <i_tab>-mandt.
ENDLOOP.
Code: Alles auswählen.
CALL METHOD cl_alv_table_create=>create_dynamic_table
Code: Alles auswählen.
*** Feldkatalog
DATA gt_fcat TYPE lvc_t_fcat.
DATA it_fieldcat TYPE lvc_t_fcat.
*** Datenreferenz für interne Tabelle
DATA gz_table TYPE REF TO data.
*** Feld-Symbole für:
*>> Zeile des Feldkatalogs
FIELD-SYMBOLS <fcat> TYPE lvc_s_fcat.
*>> interne Tabelle
FIELD-SYMBOLS <table> TYPE STANDARD TABLE.
*>> Arbeitsbereich der internen Tabelle
FIELD-SYMBOLS <workarea> TYPE any.
*>> Feld des Arbeitsbereiches
FIELD-SYMBOLS <field> TYPE any.
START-OF-SELECTION.
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = 'SBOOK'
CHANGING
ct_fieldcat = it_fieldcat
EXCEPTIONS
inconsistent_interface = 1
program_error = 2
OTHERS = 3.
gt_fcat = it_fieldcat.
*** Interne Tabelle aus Feldkatalog generieren
CALL METHOD cl_alv_table_create=>create_dynamic_table
EXPORTING
it_fieldcatalog = gt_fcat
IMPORTING
ep_table = gz_table
EXCEPTIONS
generate_subpool_dir_full = 1
OTHERS = 2.
*** Datenreferenz dem Feldsymbol <TABLE> zuweisen
ASSIGN gz_table->* TO <table>.
*** Testdaten auslesen und als Liste ausgeben:
LOOP AT <table> ASSIGNING <workarea>.
WRITE <workarea>.
ENDLOOP.
Dann mußt du die Tabelle auch einlesenEmbryo hat geschrieben: Ich will in meinem Beispiel die Tabelle SBOOK ausgeben:
Code: Alles auswählen.
SELECT *
INTO TABLE <table>
FROM (dbtab).
ähm... Vermutlich ganz an das Ende deines Codings.Embryo hat geschrieben:Mein Problem ist jetzt, dass ich beim aktivieren immer die Fehlermeldung "Die Anweisung "ENDMETHOD" fehlt." bekomme ?!
Wo muss ich das ENDMETHOD einfügen ? Ich bekomms mal wieder einfach nicht hin *schäm*