添加页头(Top of page)和页脚(End of page)
直接看代码
代码语言：javascript复制 *$*$*.....CODE_ADD_1 - Begin..................................1..*$*$*
PRIVATE SECTION.
"Set Top of page"
METHODS: set_top_of_page
CHANGING co_alv TYPE REF TO cl_salv_table.
"Set End of page"
METHODS: set_end_of_page
CHANGING co_alv TYPE REF TO cl_salv_table.
*$*$*.....CODE_ADD_1 - End....................................1..*$*$*
*$*$*.....CODE_ADD_2 - Begin..................................2..*$*$*
CALL METHOD me->set_top_of_page
CHANGING co_alv = go_alv.
CALL METHOD me->set_end_of_page
CHANGING co_alv = go_alv.
*$*$*.....CODE_ADD_2 - End....................................2..*$*$*
*$*$*.....CODE_ADD_3 - Begin..................................3..*$*$*
METHOD set_top_of_page.
DATA: lr_header TYPE REF TO cl_salv_form_layout_grid,
lr_h_label TYPE REF TO cl_salv_form_label,
lr_h_flow TYPE REF TO cl_salv_form_layout_flow.
"Header object"
CREATE OBJECT lr_header.
"To create a Lable or Flow we have to specify the target row and column number"
"where we need to set up the output text."
"Information in Bold"
lr_h_label = lr_header->create_label( row = 1 column = 1 ).
lr_h_label->set_text( 'Header in Bold' ).
"Information in tabular format"
lr_h_flow = lr_header->create_flow( row = 2 column = 1 ).
lr_h_flow->create_text( text = 'This is text of flow' ).
lr_h_flow = lr_header->create_flow( row = 3 column = 1 ).
lr_h_flow->create_text( text = 'Number of Records in the output' ).
lr_h_flow = lr_header->create_flow( row = 3 column = 2 ).
lr_h_flow->create_text( text = 20 ).
"Set the top of list using the header for Online."
co_alv->set_top_of_list( lr_header ).
"Set the top of list using the header for Print."
co_alv->set_top_of_list_print( lr_header ).
ENDMETHOD. "set_top_of_page"
METHOD set_end_of_page.
DATA: lr_footer TYPE REF TO cl_salv_form_layout_grid,
lr_f_label TYPE REF TO cl_salv_form_label,
lr_f_flow TYPE REF TO cl_salv_form_layout_flow.
"Footer object"
CREATE OBJECT lr_footer.
"Information in bold"
lr_f_label = lr_footer->create_label( row = 1 column = 1 ).
lr_f_label->set_text( 'Footer .. here it goes' ).
"Tabular information"
lr_f_flow = lr_footer->create_flow( row = 2 column = 1 ).
lr_f_flow->create_text( text = 'This is text of flow in footer' ).
lr_f_flow = lr_footer->create_flow( row = 3 column = 1 ).
lr_f_flow->create_text( text = 'Footer number' ).
lr_f_flow = lr_footer->create_flow( row = 3 column = 2 ).
lr_f_flow->create_text( text = 1 ).
"Online footer"
co_alv->set_end_of_list( lr_footer ).
"Footer in print"
co_alv->set_end_of_list_print( lr_footer ).
ENDMETHOD. "set_end_of_page"
*$*$*.....CODE_ADD_3 - End....................................3..*$*$*
