Hide columns in ALV

Question

Hello ,
I have a problem in the ALV usage in abap webdrn pro.
I have implemented the ALV by reusing the component SALV_WD_TABLE.
In the interface controller usage, i mapped the DATA node to
component context node, say, node1.
Node1 is has a reference to a structure from data ditionary, say Struc1.
and Stuc1 has some 20 elements.
But in the Node1 i mapped only 10 elements of the structure Struc1 as its attributes.
Now, when i map 'data' node to the Node1 from controller,
My ALV shows all teh 20 columns.
But i want only 10 of these columns to be displayed in the ALV.
Please let me know if.
I already know of referring to the ALV programmatically and hiding the columns.
But my question is taht when the Node1 has only few elements, shouldnt the alv also display the same number of coloumns..
Please let know if there is a way out here.
regards,
Kiran

Answer 1

Hi,
if you want to hide a column named OBJID and OBJTYP then implement following coding
DATA:
lr_comp_alv TYPE REF TO if_wd_component_usage,
lr_comp_if_alv TYPE REF TO iwci_salv_wd_table,
lr_config TYPE REF TO cl_salv_wd_config_table,
lr_column TYPE REF TO cl_salv_wd_column,
ls_column TYPE salv_wd_s_column_ref,
lt_columns TYPE salv_wd_t_column_ref.
data: lr_column_settings TYPE REF TO if_salv_wd_column_settings.
*... ALV Component Usage
lr_comp_alv = wd_this->wd_cpuse_alv( ).
IF lr_comp_alv->has_active_component( ) IS INITIAL.
lr_comp_alv->create_component( ).
ENDIF.
lr_comp_if_alv = wd_this->wd_cpifc_alv( ).
*... Configure ALV
lr_config = lr_comp_if_alv->get_model( ).
lr_config->if_salv_wd_table_settings~set_read_only( abap_false ).
lr_config->if_salv_wd_std_functions~set_edit_insert_row_allowed( ).
lr_config->if_salv_wd_std_functions~set_view_list_allowed( abap_false ).
lr_config->if_salv_wd_std_functions~set_export_allowed( abap_true ).
lt_columns = lr_config->if_salv_wd_column_settings~get_columns( ).
lr_column = lr_config->if_salv_wd_column_settings~get_column('OBJID' ).
*To hide particular coulmn
LOOP AT lt_columns INTO ls_column.
CASE ls_column-id.
when 'OBJID'.
ls_column-r_column->set_visible( value = '99' ).
when 'OBJTP'.
ls_column-r_column->set_visible( value = '99' ).
ENDCASE.
ENDLOOP.