Ver Mensaje Individual
  #5  
Viejo 07/06/12, 16:13:37
Avatar de Hector Serrano
Hector Serrano Hector Serrano is offline
Junior Member
 
Fecha de Ingreso: jul 2010
Localización: Monterrey, N.L.,Mex.
Mensajes: 6
La tabla T_dfies es una tabla con el nombre de todos los campos que necesito, en este caso son al rededor de 240 campos,
en pantalla necesito mostrar al menos 120 (entiendo que no es funcional pero asi lo pidieron), el detalle es que no importa lo que haga siempre me muestra 90 columnas solamente.
Lo que pienso es que talvez exista otro objeto que si permita mas de 90 columnas, encontre uno ( cl_salv_table ) pero no me permite darle formato a las celdas ni incluir la barra de herramientas.



el objeto alv es de la clase
DATA: v_grid_200 TYPE REF TO cl_gui_alv_grid.

el layout es
DATA: lw_fieldcat TYPE lvc_s_fcat.


LOOP AT t_dfies
INTO lw_dfies.

lv_pos = lv_pos + 1.

IF sy-tabix <= lv_cant.

* Se construye el layout del reporte del ALV
lw_fieldcat-fieldname = lw_dfies-fieldname.
lw_fieldcat-col_pos = lv_pos.
lw_fieldcat-col_opt = c_x.
lw_rel_field-field = lw_fieldcat-fieldname.
lw_rel_field-fecha = lv_fecha.


* Se valida el fieldcat
PERFORM f_val_fieldcat
USING lw_dfies
lv_fecha
CHANGING lw_fieldcat
lw_rel_field-tipo.

APPEND LINES OF w_estr-style
TO lt_styles.

APPEND lw_rel_field
TO t_rel_field.

APPEND lw_fieldcat
TO t_fieldcat_100.

CLEAR lw_fieldcat.

ELSE.

* Se construye el layout del reporte del ALV
lw_fieldcat-fieldname = lw_dfies-fieldname.
lw_fieldcat-col_pos = lv_pos.
lw_fieldcat-no_out = c_x.

APPEND lw_fieldcat
TO t_fieldcat_100.

CLEAR lw_fieldcat.

ENDIF.
ENDLOOP.




la carga del metodo
* Se muestra el grid por primera vez
CALL METHOD v_grid_200->set_table_for_first_display
EXPORTING
i_structure_name = 'TY_ESTR'
is_layout = w_layout
it_toolbar_excluding = t_excl_100
CHANGING
it_fieldcatalog = t_fieldcat_100
it_outtab = t_estr.

Gracias.
__________________
Hector Serrano

Monterrey,N.L.
Responder Con Cita