Schreib den vorgesehenen Titel und die Anzahl in ein Feld und das übergibst du dem FB.managero hat geschrieben:im FB 'REUSE_ALV_GRID_DISPLAY' kann ich unter
EXPORTING
i_grid_title = 'Title' eingeben.
das bekomme ich auch über mein ALV, wo ich eine Liste von Users ausgebe.
wie kann ich neben der Überschrifft auch die Anzahl der Users augeben?
mit Tx su10 bekome ich unter Adressen alle users und dazu die Anzahl. genau so möchte ich auch haben.
Danke
Code: Alles auswählen.
data: anzahl type n.
data: v_titel_anzahl type char50.
constants: c_titel(50) type c value ' Benutzeranzahl: '.
*--> Ausgabe Titel + Anzahl User
describe table it_ausgabe lines anzahl.
concatenate v_titel_anzahl c_titel anzahl into v_titel_anzahl.
*-->
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_grid_title = v_titel_anzahl
it_fieldcat = it_katalog
is_layout = gs_layout
TABLES
t_outtab = it_ausgabe.
Code: Alles auswählen.
DATA: anzahl(5) TYPE c.
DATA: anzahl_user TYPE i.
DATA: v_titel_anzahl TYPE lvc_title.
CONSTANTS: c_titel(30) TYPE c VALUE 'Benutzeranzahl:'.
Code: Alles auswählen.
DESCRIBE TABLE it_ausgabe LINES anzahl_user.
move anzahl_user to anzahl.
CONCATENATE v_titel_anzahl c_titel anzahl INTO v_titel_anzahl.
Code: Alles auswählen.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_grid_title = v_titel_anzahl
it_fieldcat = it_katalog
is_layout = gs_layout
TABLES
t_outtab = it_ausgabe.
Code: Alles auswählen.
FORM anzeigen.
DATA: lt_event TYPE slis_t_event,
ls_event TYPE slis_alv_event.
DATA: lt_fct TYPE slis_t_fieldcat_alv.
* Feldkatalog
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
i_program_name = sy-repid
i_structure_name = 'SFLIGHT'
CHANGING
ct_fieldcat = lt_fct.
* Events
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING i_list_type = 0
IMPORTING et_events = lt_event.
* prüfen, ob das event für den listentyp 0 gibt.
READ TABLE lt_event WITH KEY name = slis_ev_top_of_page
INTO ls_event.
IF sy-subrc = 0.
* wenn ja dann unseren Perform setzten.
MOVE 'DO_TOP_OF_PAGE' TO ls_event-form.
APPEND ls_event TO lt_event.
ENDIF.
* Display
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
it_fieldcat = lt_fct
it_events = lt_event
TABLES
t_outtab = it_sflight.
ENDFORM.
* ...
FORM do_top_of_page.
DATA: lt_list TYPE slis_t_listheader.
FIELD-SYMBOLS: <fsls> TYPE slis_listheader.
APPEND INITIAL LINE TO lt_list ASSIGNING <fsls>.
<fsls>-typ = 'H'.
* <fsls>-key =
<fsls>-info = 'Head'.
APPEND INITIAL LINE TO lt_list ASSIGNING <fsls>.
<fsls>-typ = 'S'.
<fsls>-key = 'Key'.
<fsls>-info = 'Info'.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
it_list_commentary = lt_list.
ENDFORM. "do_top_of_page