参考用实例学web dynpro filter.pdfVIP

methodGET_FILTER.

DATALO_ND_LORDERTYPEREFTOIF_WD_CONTEXT_NODE.

DATALO_EL_LORDERTYPEREFTOIF_WD_CONTEXT_ELEMENT.

DATALT_LORDERTYPEWD_THIS-ELEMENTS_N_LORDER.

DATALS_LORDERLIKELINEOFLT_LORDER.

*******************************

*...GETALVCOMPONENTUSAGE

*******************************

DATA:

LR_COMP_ALVTYPEREFTOIF_WD_COMPONENT_USAGE,

LR_COMP_IF_ALVTYPEREFTOIWCI_SALV_WD_TABLE,

LR_CONFIGTYPEREFTOCL_SALV_WD_CONFIG_TABLE.

*GETREFERENCEOFCOMPONENT_USAGEINTERFACE

LR_COMP_ALV=WD_THIS-WD_CPUSE_ALV().

*INSTANTCOMPONENT_USAGE

IFLR_COMP_ALV-HAS_ACTIVE_COMPONENT()ISINITIAL.

LR_COMP_ALV-CREATE_COMPONENT().

ENDIF.

*GETCOMPONENTCONTROLLER

LR_COMP_IF_ALV=WD_THIS-WD_CPIFC_ALV().

*GETCONFIGUREALV

LR_CONFIG=LR_COMP_IF_ALV-GET_MODEL().

WD_THIS-LR_CONFIG=LR_CONFIG.

***************************

*SETTABLEPROPERTYOFALV

***************************

DATA:IF_TABLE_SETTINGTYPEREFTOIF_SALV_WD_TABLE_SETTINGS.

IF_TABLE_SETTING?=LR_CONFIG.

*****************************

*SETCOLUMNPROPERTYOFALV

*****************************

*DEFINECOLUMNTABLE

DATA:LT_COLUMNSTYPESALV_WD_T_COLUMN_REF,

LS_COLUMNSTYPESALV_WD_S_COLUMN_REF.

DATALR_FIELDTYPEREFTOCL_SALV_WD_FIELD.

DATA:L_FIELMETYPESTRING.

DATA:RULESTYPESALV_WD_T_FILTER_RULE_REF.

*SETCOLUMNSTABLE

LT_COLUMNS=WD_THIS-LR_CONFIG-IF_SALV_WD_COLUMN_SETTINGS~GET_COL

UMNS().

*

LOOPATLT_COLUMNSINTOLS_COLUMNS.

CASELS_COLUMNS-ID.

WHENZLORDER.

l_fielme=cl_salv_wd_model_table_util=if_salv_wd_table_ut

il_column~get_field(

r_model=LR_CONFIG

co