*Internal table i tanımladık
DATA: gt_mara TYPE mara OCCURS 0 WITH HEADER LINE,
*Classlarımız için objelerimizi tanımlıyoruz.
r_container TYPE REF TO cl_gui_custom_container,
r_grid TYPE REF TO cl_gui_alv_grid.
*İlk önce datayı çekiyoruz.
SELECT * FROM mara INTO TABLE gt_mara UP TO 5 ROWS.
*Ve sonra screen i çagırıyoruz.Screen in için CONTAINER isminde custom container çizdik.
CALL SCREEN 1000.
MODULE status_1000 OUTPUT.
*Objeleri yaratıyoruz.
CREATE OBJECT r_container
EXPORTING
container_name = 'CONTAINER'.
CREATE OBJECT r_grid
EXPORTING
i_parent = r_container.
*Methodu çagırıyoruz.
CALL METHOD r_grid->set_table_for_first_display
EXPORTING
i_structure_name = 'MARA'
CHANGING
it_outtab = gt_mara[].
ENDMODULE.
Ve sonuç olarak output aşağıdaki gibi olur.
***************************************************************
Serkan AKKAVAK
Bilgisayar Mühendisi
serkurumsal@yandex.com
SAP ve ABAP ile ilgili tüm sorun ve sorularınızı gönderebilirsiniz.
Social Plugin