diegogui
19/01/11, 11:58:29
Para quienes quieran trabajar con colores sobre las filas , columnas y celdas de las ALV, dejo los códigos para cada caso.
Agregar a la estructura los siguientes campos para pintar una celda
color_c type lvc_t_scol, "Color de celda
FORM f_color_celda CHANGING pee_porcen TYPE tye_porcen.
DATA: lv_col2 TYPE lvc_s_scol.
IF pee_porcen-planetype = 'A319'.
lv_col2-fname = 'PLANETYPE'.
lv_col2-color-col = '3'.
lv_col2-color-int = '1'.
lv_col2-color-inv = '0'.
APPEND lv_col2 TO pee_porcen-color_c.
ELSE.
REFRESH pee_porcen-color_c.
ENDIF.
ENDFORM. "f_color_celda
Agregar en layout
pei_layout-coltab_fieldname = 'COLOR_C' .
Agregar a la estructura los siguientes campos para pintar una fila
color(4),"Color de fila
Pasarle a la estructura el color CXYZ (C:Indica que es un color, X: 1 a 9 , Y: intensidad 0 o 1 Z: invertir color 0 o 1)
pee_total-color = 'C300'.
Agregar a la estructura los siguientes campos para pintar una columna
le_fieldcat-emphasize = 'C700'.
Saludos
Diego G.
Argentina - Córdoba - San francisco
Agregar a la estructura los siguientes campos para pintar una celda
color_c type lvc_t_scol, "Color de celda
FORM f_color_celda CHANGING pee_porcen TYPE tye_porcen.
DATA: lv_col2 TYPE lvc_s_scol.
IF pee_porcen-planetype = 'A319'.
lv_col2-fname = 'PLANETYPE'.
lv_col2-color-col = '3'.
lv_col2-color-int = '1'.
lv_col2-color-inv = '0'.
APPEND lv_col2 TO pee_porcen-color_c.
ELSE.
REFRESH pee_porcen-color_c.
ENDIF.
ENDFORM. "f_color_celda
Agregar en layout
pei_layout-coltab_fieldname = 'COLOR_C' .
Agregar a la estructura los siguientes campos para pintar una fila
color(4),"Color de fila
Pasarle a la estructura el color CXYZ (C:Indica que es un color, X: 1 a 9 , Y: intensidad 0 o 1 Z: invertir color 0 o 1)
pee_total-color = 'C300'.
Agregar a la estructura los siguientes campos para pintar una columna
le_fieldcat-emphasize = 'C700'.
Saludos
Diego G.
Argentina - Córdoba - San francisco