abap新进者

导航

 

定义:

DATA: LR_GRID TYPE REF TO CL_GUI_ALV_GRID.
DATA : ET_FILTERED TYPE LVC_T_FIDX.
DATA:LV_TABIX TYPE SY-TABIX.

CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
IMPORTING
E_GRID = LR_GRID.
CALL METHOD LR_GRID->CHECK_CHANGED_DATA.
CLEAR : ET_FILTERED.
CALL METHOD LR_GRID->GET_FILTERED_ENTRIES
IMPORTING
ET_FILTERED_ENTRIES = ET_FILTERED.

 

LV_TABIX = SY-TABIX.
READ TABLE ET_FILTERED WITH KEY TABLE_LINE = LV_TABIX TRANSPORTING NO FIELDS.
IF SY-SUBRC NE 0.
GS_OUTD-SELCT = 'X'.
MODIFY GT_OUTD FROM GS_OUTD.
ENDIF.

posted on 2019-02-13 08:47  sap开发工作者  阅读(697)  评论(0)    收藏  举报