Ver Mensaje Individual
  #5  
Viejo 02/02/09, 16:05:03
miguel.esteban.martin miguel.esteban.martin is offline
Member
 
Fecha de Ingreso: ene 2009
Mensajes: 89
Muchas gracias pero no me funciona mira te pongo mi codigo echale un vistazo profavor.

Perdona por las molestias enserio me estas ayudando mucho

DATA: gt_exclude TYPE ui_functions.
IF g_custom_container2 IS INITIAL.
g_repid2 = sy-repid.
CREATE OBJECT g_custom_container2
EXPORTING
container_name = 'MUESTRA_ALV2'.

CREATE OBJECT g_grid2
EXPORTING
i_parent = g_custom_container2.



*Catalogo de datos y opciones de layout.
PERFORM definir_alv2.
PERFORM layout_alv.
PERFORM exclude_button.

CALL METHOD g_grid2->set_table_for_first_display
EXPORTING
it_toolbar_excluding = gt_exclude
i_save = 'X'
i_default = 'X'
is_layout = gs_layout
CHANGING
it_outtab = i_pos_bulto[]
it_fieldcatalog = gt_fieldcat2[].

CALL METHOD g_grid2->set_toolbar_interactive.
ELSE.
CALL METHOD g_grid2->refresh_table_display.
ENDIF.


*---------------------------------------------------------------
FORM exclude_button .
* Variables locales
DATA: ls_exclude TYPE ui_func.

REFRESH: gt_exclude.

* ls_exclude = cl_gui_alv_grid=>mc_fc_loc_insert_row.
* APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_undo.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_check.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_append_row.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy_row.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_cut.
APPEND ls_exclude TO gt_exclude.
* ls_exclude = cl_gui_alv_grid=>mc_fc_loc_delete_row.
* APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_move_row.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste_new_row.
APPEND ls_exclude TO gt_exclude.
IF sy-dynnr NE 400 OR sy-dynnr NE 500.
ls_exclude = cl_gui_alv_grid=>mc_fc_subtot.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_sum.
APPEND ls_exclude TO gt_exclude.
ENDIF.
ls_exclude = cl_gui_alv_grid=>mc_fc_print.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_graph.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_help.
APPEND ls_exclude TO gt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_detail.
APPEND ls_exclude TO gt_exclude.



ENDFORM.
Responder Con Cita