ALV

ALV

Hallo,

ich wollte ein ALV erstellen, aber leider klappt das nicht so gut, wie ich mir das vorgestellt habe;

- Mein Kopf mit Username etc. erscheint nicht
- Die Statusleiste ist nicht da (Buttons zum zurück-gehen, beenden etc.)

Was mache ich falsch?

Danke, Betty


Hier mein Coding:



REFRESH gt_page.
CLEAR gs_fieldcat.

* Aufbau; Kopfdaten
gt_page-typ = 'S'.
gt_page-key = 'Benutzer'.
gt_page-info = sy-uname.
APPEND gt_page.

gt_page-typ = 'S'.
gt_page-key = 'Programm'.
gt_page-info = sy-repid.
APPEND gt_page.



* Aufbau des Feldcatalogs für ALV-Ausgabe
gs_fieldcat-col_pos = '1'.
gs_fieldcat-seltext_l = 'VKO'.
gs_fieldcat-fieldname = 'VKORG'.
gs_fieldcat-outputlen = '4'.
APPEND gs_fieldcat TO gt_fieldcat.

gs_fieldcat-col_pos = '2'.
gs_fieldcat-seltext_l = 'Materialnr'.
gs_fieldcat-fieldname = 'MATNR'.
gs_fieldcat-outputlen = '10'.
APPEND gs_fieldcat TO gt_fieldcat.

gs_fieldcat-col_pos = '3'.
gs_fieldcat-seltext_l = 'Kundennr'.
gs_fieldcat-fieldname = 'KUNNR_SAP'.
gs_fieldcat-outputlen = '10'.
APPEND gs_fieldcat TO gt_fieldcat.

...



* Sonstige Funktionalität für die ALV-Ausgabe
CLEAR: gs_layout.
gs_layout-confirmation_prompt = 'X'.
gs_layout-get_selinfos = 'X'.
gs_layout-zebra = 'X'.
gs_print-no_print_listinfos = 'X'.
gs_print-no_print_selinfos = 'X'.
gs_print-no_coverpage = 'X'.



***
Datenbeschaffung
***



CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
it_list_commentary = gt_page[].

CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
i_list_type = 0
IMPORTING
et_events = gt_events[]
EXCEPTIONS
list_type_wrong = 1
OTHERS = 2.
gf_repid = sy-repid.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = gf_repid
i_callback_pf_status_set = 'SET_PF_STATUS_001'
i_callback_user_command = 'USER_COMMAND_HANDLE'
i_callback_top_of_page = 'TOP_OF_PAGE_ALV'
i_background_id = 'ALV_BACKGROUND'
it_fieldcat = gt_fieldcat[]
i_save = 'A'
is_layout = gs_layout
is_print = gs_print
it_events = gt_events[]
TABLES
t_outtab = i_error.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

HURRA

Es klappt! Lieben Dank!

Hallo,

für die Statusleiste nimm mal die Zeile

i_callback_pf_status_set = 'SET_PF_STATUS_001'

beim ALV-Aufruf raus. Dann kommt die Standartleiste.
Willst du einen eigene haben:

Status anlegen (zb: 0001)
und dann über die Tabelle 'rt_extab' kannst du im Code an der Leiste noch rumbasteln.

zb: Save-Butten deaktivieren mfg
Richard

Wow, ich hab die Zeile auskommentiert und nun geht es...

Da ich voher noch nie ALV gemacht habe, habe ich den Aufruf aus einem anderen Programm kopiert.

Danke für die Erklärung!!!

hallo,

wenn du 'nur' copy und paste verwendest hast,
probier mal folgend Zeilen auszudokumentieren:
i_callback_pf_status_set: für eigenen Status
i_callback_user_command: zum reagieren auf Benutzereingabe: Hotspot, eigene Buttons.....
i_background_id: Hintergrundbild im TOP OF PAGE Bereich


dein Problem ist warscheinlich: (auszug aus deinem Code) Den Aufruf: CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' rausnehmen.
der Erzeugt noch ne Ausgabe des Kopfes, der nach dem Alv angezeigt wird.

auch den zweiten Aufruf: CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
brauchst du (einfache ALV Ausgabe) nicht wirklich.
Der wird Verwendet, wenn du zusätzliche Events brauchst, die du beim Aufruf nicht als Parameter mitgeben kannst

mfg
Richard

Also, das habe ich jetzt alles mal gemacht. Nun sieht das Coding so aus:

perform top_of_page_alv.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = gf_repid
i_callback_top_of_page = 'TOP_OF_PAGE_ALV'
it_fieldcat = gt_fieldcat[]
i_save = 'A'
is_layout = gs_layout
is_print = gs_print
TABLES
t_outtab = i_error.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

Die Wirkung:
Mein Kopf bei ALV ist nun ganz weg und wenn ich Zurück klicke, komme ich noch immer auf die Seite wo der Kopf gedruckt wird.

Hurra!
Richard, ich habs jetzt gerafft!!!

Wo kann ich denn diverse Dinge über ALV nachlesen?