07-14-2009 9:21 AM
I want RIGHT-JUSTIFIED the ALV header of Selection text,
How can I do it ?
Thanks
Sun
07-14-2009 10:05 AM
Hi,
Use this code snippet.
TYPES: BEGIN OF x_sflight.
INCLUDE STRUCTURE sflight.
TYPES: end of x_sflight.
DATA: i_sflight TYPE STANDARD TABLE OF x_sflight,
wa_sflight TYPE x_sflight,
l_text_alv_e TYPE string,
vref_alv TYPE REF TO cl_salv_table, " ALV instance
oref_error TYPE REF TO cx_salv_error. " Error instance
SELECT-OPTIONS: so_car FOR wa_sflight-carrid MEMORY ID car,
so_con FOR wa_sflight-connid.
START-OF-SELECTION.
* retrieve data into internal table
SELECT * FROM sflight
INTO CORRESPONDING FIELDS OF TABLE i_sflight
WHERE carrid IN so_car
AND connid IN so_con.
END-OF-SELECTION.
try.
CALL METHOD cl_salv_table=>factory
EXPORTING
list_display = if_salv_c_bool_sap=>false
IMPORTING
r_salv_table = vref_alv
CHANGING
t_table = i_sflight.
CATCH cx_salv_msg INTO oref_error.
l_text_alv_e = oref_error->get_text( ).
MESSAGE i000(ZZ) WITH l_text_alv_e.
LEAVE LIST-PROCESSING.
ENDTRY.
perform sub_set_header USING vref_alv.
vref_alv->display( ).
*&------------------------------------------------
*& Form sub_set_header
*&------------------------------------------------
* -->P_ALV text
*-------------------------------------------------
FORM sub_set_header
USING p_alv TYPE REF TO cl_salv_table.
DATA: lr_grid TYPE REF TO cl_salv_form_layout_grid,
lr_gridx TYPE REF TO cl_salv_form_layout_grid,
lr_label TYPE REF TO cl_salv_form_label,
lr_text TYPE REF TO cl_salv_form_text,
lr_logo TYPE REF TO cl_salv_form_layout_logo.
* Create the grid object
CREATE OBJECT lr_grid.
lr_grid->create_header_information( row = 1 column = 1
text = text-200 ).
lr_gridx = lr_grid->create_grid( row = 2 column = 2 ).
lr_label = lr_gridx->create_label( row = 2 column = 2
text = 'Run Date :'(201) ).
lr_text = lr_gridx->create_text( row = 2 column = 3
text = sy-datum ).
lr_label = lr_gridx->create_label( row = 2 column = 4
text = 'Run Time :'(202) ).
lr_text = lr_gridx->create_text( row = 2 column = 5
text = sy-uzeit ).
CREATE OBJECT lr_logo.
lr_logo->set_left_content( lr_grid ).
lr_logo->set_right_logo( 'ENJOYSAP_LOGO' ).
p_alv->set_top_of_list( lr_logo ).
ENDFORM.
Amitava
07-14-2009 9:28 AM
ALV is default Left-JUSTIFIED the header of Selection text ,and delete all space only reserved one space character.
07-14-2009 10:05 AM
Hi,
Use this code snippet.
TYPES: BEGIN OF x_sflight.
INCLUDE STRUCTURE sflight.
TYPES: end of x_sflight.
DATA: i_sflight TYPE STANDARD TABLE OF x_sflight,
wa_sflight TYPE x_sflight,
l_text_alv_e TYPE string,
vref_alv TYPE REF TO cl_salv_table, " ALV instance
oref_error TYPE REF TO cx_salv_error. " Error instance
SELECT-OPTIONS: so_car FOR wa_sflight-carrid MEMORY ID car,
so_con FOR wa_sflight-connid.
START-OF-SELECTION.
* retrieve data into internal table
SELECT * FROM sflight
INTO CORRESPONDING FIELDS OF TABLE i_sflight
WHERE carrid IN so_car
AND connid IN so_con.
END-OF-SELECTION.
try.
CALL METHOD cl_salv_table=>factory
EXPORTING
list_display = if_salv_c_bool_sap=>false
IMPORTING
r_salv_table = vref_alv
CHANGING
t_table = i_sflight.
CATCH cx_salv_msg INTO oref_error.
l_text_alv_e = oref_error->get_text( ).
MESSAGE i000(ZZ) WITH l_text_alv_e.
LEAVE LIST-PROCESSING.
ENDTRY.
perform sub_set_header USING vref_alv.
vref_alv->display( ).
*&------------------------------------------------
*& Form sub_set_header
*&------------------------------------------------
* -->P_ALV text
*-------------------------------------------------
FORM sub_set_header
USING p_alv TYPE REF TO cl_salv_table.
DATA: lr_grid TYPE REF TO cl_salv_form_layout_grid,
lr_gridx TYPE REF TO cl_salv_form_layout_grid,
lr_label TYPE REF TO cl_salv_form_label,
lr_text TYPE REF TO cl_salv_form_text,
lr_logo TYPE REF TO cl_salv_form_layout_logo.
* Create the grid object
CREATE OBJECT lr_grid.
lr_grid->create_header_information( row = 1 column = 1
text = text-200 ).
lr_gridx = lr_grid->create_grid( row = 2 column = 2 ).
lr_label = lr_gridx->create_label( row = 2 column = 2
text = 'Run Date :'(201) ).
lr_text = lr_gridx->create_text( row = 2 column = 3
text = sy-datum ).
lr_label = lr_gridx->create_label( row = 2 column = 4
text = 'Run Time :'(202) ).
lr_text = lr_gridx->create_text( row = 2 column = 5
text = sy-uzeit ).
CREATE OBJECT lr_logo.
lr_logo->set_left_content( lr_grid ).
lr_logo->set_right_logo( 'ENJOYSAP_LOGO' ).
p_alv->set_top_of_list( lr_logo ).
ENDFORM.
Amitava
07-14-2009 10:12 AM
Thanks.
this issue is solved.
/people/community.user/blog/2007/05/07/alignment-of-data-in-top-of-page-in-alv-grid