以表MARDH为例,来开发ALV报表。
<强> <你>一、最简单的ALV报表强>
先来做一个最简单的ALV报表。源码如下:
REPORT zquy_alv_test_01。
TYPE-POOLS学校图书馆。
表:mardh。
数据:it_fieldcat slis_t_fieldcat_alv类型,
,,,,,wa_fieldcat slis_fieldcat_alv类型,
,,,,,wa_data开始,
,,,,,检查类型c
,,,,,matnr matnr类型,
,,,,,lgort lgort_d类型,
,,,,,labst labst类型,
,,,,,wa_data年底,
,,,,,wt_data wa_data发生100标题行。
参数:p_lfgja类型lfgja义务,
,,,,,,,,,,,,p_lfmon类型lfmon必修课。
START-OF-SELECTION。
,执行。get_data。
,执行。set_alv_layout。
,执行。dis_alv_grid。
*, - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,,,,,Form get_data
*, - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,,,,,填充数据
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,在,p1 ,,,,,,文本
*,- & lt;p2 ,,,,,,文本
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
的形式。get_data。
,SELECT *到相应字段的表从mardh wt_data lfgja=p_lfgja lfmon=p_lfmon labst比;1000年。
ENDFORM只,,,,,,,,,,,,,,,,,,“get_data
*, - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,,,,,Form set_alv_layout
*, - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,,,,,设置数据的显示格式
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,在,p1 ,,,,,,文本
*,- & lt;p2 ,,,,,,文本
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
的形式。set_alv_layout。
,wa_fieldcat-col_pos=1。
,wa_fieldcat-fieldname=matnr。
,wa_fieldcat-seltext_m='物料编码”。
,APPEND wa_fieldcat it_fieldcat。
,wa_fieldcat-col_pos=2。
,wa_fieldcat-fieldname=lgort。
,wa_fieldcat-seltext_m='库区”。
,APPEND wa_fieldcat it_fieldcat。
,wa_fieldcat-col_pos=3。
,wa_fieldcat-fieldname=labst。
,wa_fieldcat-seltext_m='非限制使用库存的。
,APPEND wa_fieldcat it_fieldcat。
ENDFORM只,,,,,,,,,,,,,,,,,,“set_alv_layout
*, - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,,,,,Form dis_alv_grid
*, - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,,,,,输出ALV列表
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
*,,在,p1 ,,,,,,文本
*,- & lt;p2 ,,,,,,文本
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
的形式。dis_alv_grid。
,调用函数的REUSE_ALV_GRID_DISPLAY
,
*出口,,I_INTERFACE_CHECK ,,,,,,,,,,,,,,,=' '
*,,I_BYPASSING_BUFFER ,,,,,,,,,,,,,,=' '
*,,I_BUFFER_ACTIVE ,,,,,,,,,,,,,,,,,=' '
*,,I_CALLBACK_PROGRAM ,,,,,,,,,,,,,,=' '
*,,I_CALLBACK_PF_STATUS_SET ,,,,,,,,=' '
*,,I_CALLBACK_USER_COMMAND ,,,,,,,,,=' '
*,,I_CALLBACK_TOP_OF_PAGE ,,,,,,,,,,=' '
*,,I_CALLBACK_HTML_TOP_OF_PAGE ,,,,,=' '
*,,I_CALLBACK_HTML_END_OF_LIST ,,,,,=' '
*,,I_STRUCTURE_NAME ,,,,,,,,,,,,,,,,=
*,,null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null
null