Code: Alles auswählen.
PARAMETERS: dbtab(10) TYPE c,
rows TYPE i DEFAULT 100.
DATA dref TYPE REF TO data.
FIELD-SYMBOLS: <table> TYPE ANY TABLE,
<wa> TYPE ANY,
<comp> TYPE ANY.
TRY.
CREATE DATA dref TYPE STANDARD TABLE OF (dbtab)
WITH NON-UNIQUE DEFAULT KEY.
ASSIGN dref->* TO <table>.
SELECT *
FROM (dbtab) UP TO rows ROWS
INTO TABLE <table>.
LOOP AT <table> ASSIGNING <wa>.
DO.
ASSIGN COMPONENT sy-index
OF STRUCTURE <wa> TO <comp>.
IF sy-subrc = 0.
WRITE / <comp>.
ELSE.
EXIT.
ENDIF.
ENDDO.
ULINE.
ENDLOOP.
CATCH cx_sy_create_data_error.
WRITE 'Wrong Database!'.
ENDTRY.
Code: Alles auswählen.
create data wa like line of <table>.
assign wa->* to <wa>.
assign component 'xyz' of structure <wa> to
<wa_2>.
read table <table> index 100 assigning <wa>.
move <wa_2> to v_xyz.
Code: Alles auswählen.
assign component 'xyz' of structure <wa> to
<wa_2>.
Code: Alles auswählen.
Data:
t_dyntable type ref to data,
wa_t_dyntable type ref to data,
wa_t_dyntable_2 type ref to data,
v_value type i.
v_index type i.
field-symbols:
<t_dyntable> type table,
<wa_t_dyntable> type any,
<wa_t_dyntable_2> type any.
...
create data t_dyntable type table of (dbtab).
assign t_dyntable->* to <t_dyntable>.
create data wa_t_dyntable like line of <t_dyntable>.
assign wa_t_dyntable->* to <wa_t_dyntable>.
assign component 'DIMID' of structure <wa_t_dyntable> to <wa_t_dyntable_2>.
...
read table <t_dyntable> index v_index assigning
<wa_t_dyntable>.
move <wa_t_dyntable_2> to v_value.
...
Code: Alles auswählen.
Data:
t_dyntable type ref to data,
wa_t_dyntable type ref to data,
wa_t_dyntable_2 type ref to data,
v_value type i.
v_index type i.
field-symbols:
<t_dyntable> type table,
<wa_t_dyntable> type any,
<wa_t_dyntable_2> type any.
...
create data t_dyntable type table of (dbtab).
assign t_dyntable->* to <t_dyntable>.
create data wa_t_dyntable like line of <t_dyntable>.
assign wa_t_dyntable->* to <wa_t_dyntable>.
* ACHTUNG: zeigt eigentlich auf wa_t_dyntable->DIMID.
assign component 'DIMID' of structure <wa_t_dyntable> to <wa_t_dyntable_2>.
...
read table <t_dyntable> index v_index INTO <wa_t_dyntable>.
move <wa_t_dyntable_2> to v_value.
...