PDA

Ver la Versión Completa : Guardar Variante en UN ALV


Consultor Oscuro
07/09/10, 16:02:46
Hola a todos, tengo un problema, sucede que estoy creando un ALV orientado a Objetos pero no puedo habilitar la opcion donde se guardan las variantes, es decir, la disposicion que se le podrian dar a los campos que se muestran, el orden, y esas cosas. Cuando lo hacia con funciones no habia problema, bastaba con mandarle 'X' al parametro I_SAVE de la funcion, les envio la funcion para que se pueda observar los parametros que estoy utilizando en el metodo en cuestion .

FORM SHOW_ALV .

* DATA : wa_alv TYPE ty_alv .
DATA : t_exclude TYPE ui_functions .
DATA: s_layo TYPE lvc_s_layo ."para el layout

IF O_ALVGRID IS NOT INITIAL and w_flag <> 'X'.

PERFORM prepare_catalog .

CALL METHOD o_aplication->EXCLUDE_TB_FUNCTIONS "Excluimos algunos botones
CHANGING
pt_exclude = t_exclude .

CALL METHOD o_aplication->PREPARE_LAYOUT
CHANGING
lvc_s_layo = s_layo.

CALL METHOD O_ALVGRID->SET_TABLE_FOR_FIRST_DISPLAY
EXPORTING
IT_TOOLBAR_EXCLUDING = t_exclude
IS_LAYOUT = s_layo
* IS_VARIANT = l_variant
I_SAVE = 'A'
CHANGING
IT_OUTTAB = ty_t_ekko
IT_FIELDCATALOG = lvc_t_fcat
* IT_SORT = lvc_t_sort
* IT_FILTER = lvc_t_filt
EXCEPTIONS
INVALID_PARAMETER_COMBINATION = 1
PROGRAM_ERROR = 2
TOO_MANY_LINES = 3
others = 4.
IF SY-SUBRC <> 0.
MESSAGE text-m03 TYPE 'E' .
ENDIF.

CALL METHOD O_ALVGRID->set_ready_for_input
EXPORTING
i_ready_for_input = 1.
w_flag = 'X' .
ELSE .
CALL METHOD O_ALVGRID->REFRESH_TABLE_DISPLAY .
ENDIF.

ENDFORM. " SHOW_ALV

jossnet
07/09/10, 21:20:01
te falta pasarle el parametro IS_VARIANT, colocale el nombre del programa y el usuario.

Consultor Oscuro
16/09/10, 16:30:05
Muchas gracias, habia dejado eso de lado, pero ahora modifique todos mis ALV pendientes, realmente era demasiado sencillo =D .