2007 Nov 19 2:33 PM
hi,
i want to display an itab using alv oo,
the method:
call method alv_grid->set_table_for_first_display
exporting i_structure_name = 'MYTABLE'
changing it_outtab = itab_mytable
my question is that,
i must new a table called MYTABLE in se11? can i just define
a type and give it to i_structure_name?
i have try and new a table call MYTABLE,but some field's character cann't
be displayed.
2007 Nov 19 2:38 PM
MYTABLE must be a structure or a table in SAP (SE11). Alternatively, you can build the field catalog, and pass the field catalog.
call method lo_alv->set_table_for_first_display
exporting
is_layout = gs_layout
changing
it_outtab = result_alv[]
it_fieldcatalog = i_field. " Field catalog
Albert
hi,
i want to display an itab using alv oo,
the method:
call method alv_grid->set_table_for_first_display
exporting i_structure_name = 'MYTABLE'
changing it_outtab = itab_mytable
my question is that,
i must new a table called MYTABLE in se11? can i just define
a type and give it to i_structure_name?
i have try and new a table call MYTABLE,but some field's character cann't
be displayed.
2007 Nov 19 2:38 PM
hI
Please refer
For object oriented concepts refer this link https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/b6cae890-0201-0010-ef8b-f970a9c4...
REPORT YSIMPLEALVINTERACTIVE .
TABLES : VBAK,VBAP,LIKP,VBRK,VTTK.
PARAMETERS : P_KUNNR LIKE VBAK-KUNNR.
SELECT-OPTIONS: S_VBELN FOR VBAK-VBELN,
S_ERDAT FOR VBAK-ERDAT.
DATA:WA TYPE YLINE22,
ITAB TYPE YROW22.
DATA : REPID LIKE SY-REPID,
CONTAINER TYPE SCRFNAME VALUE 'ALVCONTROL',
CUST TYPE REF TO CL_GUI_CUSTOM_CONTAINER,
GRID TYPE REF TO CL_GUI_ALV_GRID.
*CLASS DEFINITATION.
CLASS CL_GRID DEFINITION.
PUBLIC SECTION .
METHODS: DC FOR EVENT DOUBLE_CLICK OF CL_GUI_ALV_GRID IMPORTING
E_ROW E_COLUMN.
ENDCLASS. "
*CLASS IMPLEMENTATION.
CLASS CL_GRID IMPLEMENTATION.
METHOD DC.
DATA : WA1 TYPE YLINE22.
READ TABLE ITAB INDEX E_ROW-INDEX INTO WA1.
SET PARAMETER ID 'AVN' FIELD WA1-VBELN.
CALL TRANSACTION 'VA02' AND SKIP FIRST SCREEN .
ENDMETHOD. "DC
ENDCLASS. "CL_GRID IMPLEMENTATION
CALLING CLASS.
DATA : OBJ_CL_GRID TYPE REF TO CL_GRID.
START-OF-SELECTION.
PERFORM CALLSUB.
IF SY-SUBRC = 0.
CALL SCREEN 100.
ELSE.
MESSAGE I000(0) WITH 'no data for your salesorder'.
ENDIF.
&----
*& Module STATUS_0100 OUTPUT
&----
text
----
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
REPID = SY-REPID.
IF CUST IS INITIAL.
CREATE OBJECT CUST EXPORTING CONTAINER_NAME = CONTAINER .
CREATE OBJECT GRID EXPORTING I_PARENT = CUST.
CALL METHOD GRID->SET_TABLE_FOR_FIRST_DISPLAY
EXPORTING
I_STRUCTURE_NAME = 'YLINE22'
CHANGING
IT_OUTTAB = ITAB.
CREATE OBJECT OBJ_CL_GRID.
SET HANDLER OBJ_CL_GRID->DC FOR GRID.
ENDIF.
ENDMODULE. " STATUS_0100 OUTPUT
FORM CALLSUB.
SELECT VBAPVBELN VBAPKWMENG VBAPNETWR LIPSERDAT VTTP~ERDAT
VBRK~FKDAT INTO TABLE ITAB FROM VBAK
INNER JOIN VBAP ON VBAKVBELN = VBAPVBELN INNER JOIN LIPS ON VBAP~VBELN
= LIPSVGBEL INNER JOIN VTTP ON LIPSVBELN = VTTP~VBELN INNER JOIN VBRP
ON LIPSVBELN = VBRPVGBEL INNER JOIN VBRK ON VBRKVBELN = VBRKVBELN
WHERE
VBAK~KUNNR = P_KUNNR AND
VBAKVBELN IN S_VBELN AND VBAKERDAT IN S_ERDAT.
ENDFORM. "CALL
&----
*& Module USER_COMMAND_0100 INPUT
&----
text
----
MODULE USER_COMMAND_0100 INPUT.
CASE SY-UCOMM.
WHEN'EXIT'.
LEAVE PROGRAM.
ENDCASE.
ENDMODULE.
Reward if useful.
2007 Nov 19 2:38 PM
MYTABLE must be a structure or a table in SAP (SE11). Alternatively, you can build the field catalog, and pass the field catalog.
call method lo_alv->set_table_for_first_display
exporting
is_layout = gs_layout
changing
it_outtab = result_alv[]
it_fieldcatalog = i_field. " Field catalog
Albert