Buenas Tardes,
saludos espero que me puedan ayudar, necesito ocultar unos Radiobuttons y dada una condición se activen para que el usuario haga la selección.
Hola,
Te paso un ejemplo.
Cualquier cosa consultas.
*----------------------------------------------------------------------*
* Pantallas de Selección *
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK blq1 WITH FRAME TITLE text-t01.
PARAMETERS: p_radbt1 RADIOBUTTON GROUP bt1 USER-COMMAND uc,
p_radbt2 RADIOBUTTON GROUP bt1.
SELECTION-SCREEN BEGIN OF BLOCK blq4 WITH FRAME TITLE text-t04.
PARAMETERS: p_rdbt15 RADIOBUTTON GROUP bt4 MODIF ID gr4,
p_rdbt16 RADIOBUTTON GROUP bt4 MODIF ID gr4,
p_rdbt17 RADIOBUTTON GROUP bt4 MODIF ID gr4.
SELECTION-SCREEN END OF BLOCK blq4.
PARAMETERS: p_radbt3 RADIOBUTTON GROUP bt1,
p_radbt4 RADIOBUTTON GROUP bt1.
SELECTION-SCREEN BEGIN OF BLOCK blq2 WITH FRAME TITLE text-t02.
PARAMETERS: p_radbt8 RADIOBUTTON GROUP bt2 MODIF ID gr2,
p_radbt5 RADIOBUTTON GROUP bt2 MODIF ID gr2,
p_radbt6 RADIOBUTTON GROUP bt2 MODIF ID gr2.
SELECTION-SCREEN END OF BLOCK blq2.
PARAMETERS: p_radbt7 RADIOBUTTON GROUP bt1,
p_radbt9 RADIOBUTTON GROUP bt1.
SELECTION-SCREEN BEGIN OF BLOCK blq3 WITH FRAME TITLE text-t03.
PARAMETERS: p_rdbt10 RADIOBUTTON GROUP bt3 MODIF ID gr3,
p_rdbt11 RADIOBUTTON GROUP bt3 MODIF ID gr3,
p_rdbt14 RADIOBUTTON GROUP bt3 MODIF ID gr3,
p_rdbt12 RADIOBUTTON GROUP bt3 MODIF ID gr3,
p_rdbt13 RADIOBUTTON GROUP bt3 MODIF ID gr3.
SELECTION-SCREEN END OF BLOCK blq3.
SELECTION-SCREEN END OF BLOCK blq1.
*----------------------------------------------------------------------*
* Evento AT SELECTION-SCREEN *
*----------------------------------------------------------------------*
AT SELECTION-SCREEN OUTPUT.
IF p_radbt4 IS INITIAL.
LOOP AT SCREEN.
IF screen-group1 EQ 'GR2'.
screen-active = 0.
MODIFY screen.
ENDIF.
ENDLOOP.
ELSE.
LOOP AT SCREEN.
IF screen-group1 EQ 'GR2'.
screen-active = 1.
MODIFY screen.
ENDIF.
ENDLOOP.
ENDIF.
IF p_radbt9 IS INITIAL.
LOOP AT SCREEN.
IF screen-group1 EQ 'GR3'.
screen-active = 0.
MODIFY screen.
ENDIF.
ENDLOOP.
ELSE.
LOOP AT SCREEN.
IF screen-group1 EQ 'GR3'.
screen-active = 1.
MODIFY screen.
ENDIF.
ENDLOOP.
ENDIF.
IF p_radbt2 IS INITIAL.
LOOP AT SCREEN.
IF screen-group1 EQ 'GR4'.
screen-active = 0.
MODIFY screen.
ENDIF.
ENDLOOP.
ELSE.
LOOP AT SCREEN.
IF screen-group1 EQ 'GR4'.
screen-active = 1.
MODIFY screen.
ENDIF.
ENDLOOP.
ENDIF.
Espero que te sirva!
Saludos.
2 Me gusta
Y cómo lo solucionaste?
Este tema se cerró automáticamente 91 días después del último post. No se permiten nuevas respuestas.