实现ALV的TOP_OF_PAGE的两种方法(一)
这种是HTML方法,很容易操作的一种方法
1、在ALV方法中调用 TOP_OF_PAGE这个FORM
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
EXPORTING
i_callback_program = sy-repid
it_fieldcat_lvc = fieldcat
is_layout_lvc = layout
i_save = 'A'
i_default = 'X'
* I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
* I_CALLBACK_PF_STATUS_SET = 'PF_STATUS'
i_callback_html_top_of_page ='TOP_OF_PAGE' "调用TOP_OF_PAGE FORM
* IT_EVENTS = IT_XSMB
* IS_VARIANT = IT_XSMB
TABLES
t_outtab = it_out.
2、写TOP_OF_PAGE这个FORM
FORM top_of_page USING cl_dd TYPE REF TO cl_dd_document.
DATA: m_p TYPE i,
m_buff TYPE string.
IF s_date-high IS INITIAL.
CONCATENATE '<html>'
'<body style="font-size:13pt;margin:0;padding:0; line-height:25px;font-weight:bold; text-align:center;">'
'采购价格历史清单' '<BR/>'
'</body>'
'</html>' INTO m_buff.
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
CONCATENATE '<BR/> 时间:</HTML>' s_date-low INTO m_buff."传入变量
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
ELSEIF s_date-high IS NOT INITIAL.
CONCATENATE '<html>'
'<body style="font-size:13pt;margin:0;padding:0; line-height:25px;font-weight:bold; text-align:center;">'
'采购价格历史清单' '<BR/>'
'</body>'
'</html>' INTO m_buff.
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
CONCATENATE '<BR/><BR> 起始时间:</HTML>' s_date-low '        ' '截止时间:</HTML>' s_date-high INTO m_buff."传入变量
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
ENDIF.
ENDFORM. "TOP_OF_PAGE
这种是HTML方法,很容易操作的一种方法
1、在ALV方法中调用 TOP_OF_PAGE这个FORM
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
EXPORTING
i_callback_program = sy-repid
it_fieldcat_lvc = fieldcat
is_layout_lvc = layout
i_save = 'A'
i_default = 'X'
* I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
* I_CALLBACK_PF_STATUS_SET = 'PF_STATUS'
i_callback_html_top_of_page ='TOP_OF_PAGE' "调用TOP_OF_PAGE FORM
* IT_EVENTS = IT_XSMB
* IS_VARIANT = IT_XSMB
TABLES
t_outtab = it_out.
2、写TOP_OF_PAGE这个FORM
FORM top_of_page USING cl_dd TYPE REF TO cl_dd_document.
DATA: m_p TYPE i,
m_buff TYPE string.
IF s_date-high IS INITIAL.
CONCATENATE '<html>'
'<body style="font-size:13pt;margin:0;padding:0; line-height:25px;font-weight:bold; text-align:center;">'
'采购价格历史清单' '<BR/>'
'</body>'
'</html>' INTO m_buff.
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
CONCATENATE '<BR/> 时间:</HTML>' s_date-low INTO m_buff."传入变量
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
ELSEIF s_date-high IS NOT INITIAL.
CONCATENATE '<html>'
'<body style="font-size:13pt;margin:0;padding:0; line-height:25px;font-weight:bold; text-align:center;">'
'采购价格历史清单' '<BR/>'
'</body>'
'</html>' INTO m_buff.
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
CONCATENATE '<BR/><BR> 起始时间:</HTML>' s_date-low '        ' '截止时间:</HTML>' s_date-high INTO m_buff."传入变量
CALL METHOD cl_dd->html_insert
EXPORTING
contents = m_buff
CHANGING
position = m_p.
ENDIF.
ENDFORM. "TOP_OF_PAGE