top_of_page

in src/zgoog_i_bqtr_gen_mass_cds_c01.prog.abap [0:0]

• 30 lines of code
• 1 McCabe index (conditional complexity)

  METHOD top_of_page.
    DATA : lr_grid  TYPE REF TO cl_salv_form_layout_grid,

           lr_text  TYPE REF TO cl_salv_form_text,

           lr_label TYPE REF TO cl_salv_form_label,

           lr_head  TYPE string.


    CREATE OBJECT lr_grid.


    lr_grid->create_header_information( row     = 1
                                        column  = 1
                                        text    = lr_head
                                        tooltip = lr_head ).

** Add Row **

    lr_grid->add_row( ).

** Add Label in Grid **

    lr_label = lr_grid->create_label( row     = 2
                                      column  = 1
                                      text    = 'No of CDS views requested :  '
                                      tooltip = 'No of CDS views requested :  ' ).

** Add Text in The Grid **

    lr_text = lr_grid->create_text( row     = 2
                                    column  = 2
                                    text    = gv_input_rec_cnt
                                    tooltip = gv_input_rec_cnt ).


** Add Row **

    lr_grid->add_row( ).

** Add Label in Grid **

    lr_label = lr_grid->create_label( row     = 3
                                      column  = 1
                                      text    = 'No of CDS views created :  '
                                      tooltip = 'No of CDS views created :  ' ).

** Add Text in The Grid **

    lr_text = lr_grid->create_text( row     = 3
                                    column  = 2
                                    text    = gv_output_rec_cnt
                                    tooltip = gv_output_rec_cnt ).

** Set Label and Text Link **

    lr_label->set_label_for( lr_text ).

** Move lr_grid to lr_content **

    ir_content = lr_grid.