业务描述
用户需要在VL06O事务代码下进行批量交货过账，现有的筛选条件不太适用当前公司的业务，需要在报表中新增三个交货单增强字段，方便其筛选（选择屏幕没有加，用户在报表里用标准按钮功能自己筛选）
效果展示
操作步骤
1、扩展LIPOV结构字段
扩展完之后系统会自动带出likp增强字段，如果没有别的表字段就可以结束了
如果有别的表的增强字段
在DisplayALV之前把字段加到gt_outtab中即可
方法1：隐式增强->LV50QF1W->list_display_basic_list
form list_display_basic_list.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form LIST_DISPLAY_BASIC_LIST, Start A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*
ENHANCEMENT 1 ZCL_VL06O_UPDATE. "active version
*
SELECT vbeln ,posnr ,zjqbm FROM lips
INTO TABLE @DATA(ltt_lips)
FOR ALL ENTRIES IN @gt_outtab
WHERE vbeln = @gt_outtab-vbeln .
SORT ltt_lips BY vbeln .
LOOP AT gt_outtab ASSIGNING FIELD-SYMBOL(<fs_outtab>) .
READ TABLE ltt_lips INTO DATA(lss_lips) WITH KEY vbeln = <fs_outtab>-vbeln BINARY SEARCH.
IF sy-subrc = 0 .
<fs_outtab>-zjqbm = lss_lips-zjqbm .
CLEAR : lss_lips .
ENDIF .
ENDLOOP .
ENDENHANCEMENT.
*$*$-End: (1)---------------------------------------------------------------------------------$*$*
data: lf_save_alv_variant type c value 'A'.
data: lt_events type slis_t_event, "v_n_544950
ls_event type slis_alv_event.
ls_event-name = 'TOP_OF_PAGE'.
ls_event-form = 'TOP_OF_PAGE'.
append ls_event to lt_events. "^_n_544950
perform variant_authority_check changing lf_save_alv_variant.
if gf_list_category+1(1) eq 'G'.
call function 'REUSE_ALV_GRID_DISPLAY'
exporting
i_buffer_active = '' "n_1565980
i_callback_program = gf_callback_program
i_callback_pf_status_set = gf_status
i_callback_user_command = gf_user_command
i_structure_name = 'LIPOV'
is_layout = gs_layout
it_fieldcat = gt_fieldcat
it_sort = gt_sort
i_save = lf_save_alv_variant "50A
is_variant = gs_variant
tables
t_outtab = gt_outtab
exceptions
program_error = 1
others = 2.
if sy-subrc <> 0.
message e500 with 'Error: LIST_DISPLAY_BASIC_LIST'. "#EC NOTEXT
endif.
else.
call function 'REUSE_ALV_LIST_DISPLAY'
exporting
i_buffer_active = '' "n_1565980
i_callback_program = gf_callback_program
i_callback_pf_status_set = gf_status
i_callback_user_command = gf_user_command
i_structure_name = 'LIPOV'
is_layout = gs_layout
it_fieldcat = gt_fieldcat
it_events = lt_events "n_544950
it_sort = gt_sort
i_save = lf_save_alv_variant "50A
is_variant = gs_variant
tables
t_outtab = gt_outtab
exceptions
program_error = 1
others = 2.
if sy-subrc <> 0.
message e500 with 'Error: LIST_DISPLAY_BASIC_LIST'. "#EC NOTEXT
endif.
endif.
endform. " LIST_DISPLAY_BASIC_LIST方法2：SMOD->V50Q0001->EXIT_SAPLV50Q_001
同样的方法给ct_postab中添加值
如果业务非要在选择屏幕加的话也可以，选择屏幕在一个INCLUDE里，里面也有隐式增强点，完事在DisplayALV之前在做一个筛选就行
