Disposicion en layout

[brujop]

Buen dia amigos de mundo sap, al querer seleccionar una variante en mi pantalla de seleccion me aparece el siguiente mensaje:

no se ha podido encontrar ninguna disposicion....

Por favor indicarme que he podido realizar mal, este es el codigo

SELECTION-SCREEN BEGIN OF BLOCK b05 WITH FRAME TITLE text-b05.
PARAMETERS: p_vari TYPE slis_vari.
SELECTION-SCREEN END OF BLOCK b05.

DATA: w_variant TYPE disvariant.

START-OF-SELECTION.
....
....
....
END-OF-SELECTION.

PERFORM main_prog.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_vari. "Evento para activar el match code del layout"
PERFORM get_variant.

FORM get_variant.

data: lw_variant type disvariant,
l_exit type char1.

lw_variant-report = sy-repid.


CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
EXPORTING
is_variant = lw_variant
i_save = 'A'
IMPORTING
e_exit = l_exit
es_variant = lw_variant
EXCEPTIONS
NOT_FOUND = 2.
IF sy-subrc = 2.
MESSAGE ID sy-msgid TYPE 'S' NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
IF l_exit EQ space.
p_vari = lw_variant-variant.

* IF NOT p_vari IS INITIAL.
* PERFORM get_w_variant.
* ENDIF.
ENDIF.
ENDIF.


ENDFORM. " get_w_variant


*&---------------------------------------------------------------------*
*& FORM MAIN_PROG
*&---------------------------------------------------------------------*
* The main program
*----------------------------------------------------------------------*

FORM main_prog.

PERFORM create_fcat.
w_repid = sy-repid.
w_comm = 'USER_COMMAND'.
w_status = ''.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
EXPORTING
it_fieldcat_lvc = gt_fcat
i_callback_program = w_repid
i_callback_pf_status_set = w_status
* i_callback_user_command = w_comm
i_save = 'A'
is_variant = w_variant
i_grid_title = w_title
i_callback_html_top_of_page = 'F_HTML_TOP_OF_PAGE'
TABLES
* t_outtab = gt_resultado
t_outtab = gt_result
EXCEPTIONS
program_error = 1
OTHERS = 2.

IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

ENDFORM. " MAIN_PROG.


Agradezco de antemano su ayuda

[Mauricio Hidalgo]

Y le haz grabado ya variantes (Disposiciones) a tu ALV ?...

[brujop]

Si ya grabe una variante, alguna otra ayuda amigos....

Saludos