Code: Alles auswählen.
DATA: datasetid LIKE bapi6111gen-obj_handle.
DATA: command_text TYPE TABLE OF bapi6111mdx,
wa_command_text LIKE LINE OF command_text,
hs TYPE TABLE OF bapi6111fsd ,
ds TYPE standard TABLE OF bapi6111fsd,
ds2 TYPE sorted TABLE OF bapi6111fsd with unique key COLUMN, row.
DATA: wa_ds LIKE LINE OF ds.
DATA: wa_hs LIKE LINE OF hs,
dtag TYPE dats,
tagvon TYPE dats,
tagnach TYPE dats,
erlkz TYPE abap_bool,
charge TYPE charg_d,
zuadj TYPE dats,
anzbra TYPE i,
zaehler TYPE i,
zaehler2 TYPE i,
datensatz TYPE i.
refresh command_text.
wa_command_text-line = 'SELECT { [Measures].[BR_ANZBRA] '.
APPEND wa_command_text TO command_text.
wa_command_text-line = ' } ON COLUMNS, '.
APPEND wa_command_text TO command_text.
CONCATENATE '{ [BR_CHARGE].[' charge '] } ON ROWS FROM $EC3 ' ''
INTO wa_command_text-line.
APPEND wa_command_text TO command_text.
CONCATENATE 'WHERE ( [0CALDAY].[' dtag '], [BR_ERLKZ].[' erlkz '], '
INTO wa_command_text-line.
APPEND wa_command_text TO command_text.
* wa_command_text-line = ' '.
* APPEND wa_command_text TO command_text.
CONCATENATE '[BR_CHARGE].[' charge '] ) ' INTO wa_command_text-line.
APPEND wa_command_text TO command_text.
wa_command_text-line = ' '.
APPEND wa_command_text TO command_text.
CALL FUNCTION 'BAPI_MDDATASET_CREATE_OBJECT'
IMPORTING
datasetid = datasetid
TABLES
command_text = command_text
.
*CALL FUNCTION 'BAPI_MDDATASET_DELETE_OBJECT'
* EXPORTING
* datasetid =
** IMPORTING
** RETURN =
.
CALL FUNCTION 'BAPI_MDDATASET_GET_FLAT_DATA'
EXPORTING
datasetid = datasetid
TABLES
header = hs
data = ds
.