Hi all,
at the moment I'm building a selection-screen which, have a radiobutton group with two options. When one radiobutton is been selected, a couple of fields are disabled for input, or could be hidden. What I want to accomplish is to make these fields OBLIGATORY when they're ready for input. The only thing what is messing this up, is that the OBLIGATORY check already set an error message before the AT SELECTION-SCREEN OUTPUT is been triggered.
Some suggestions are welcome.
Some reference code:
PARAMETERS p_dele TYPE boolean RADIOBUTTON GROUP a USER-COMMANDSELECT.
SELECTION-SCREENCOMMENT/1(79) s01.
PARAMETERS p_geraet TYPE gernr OBLIGATORYMODIF ID del.
PARAMETERS p_equnr TYPE equnr OBLIGATORYMODIF ID del.
PARAMETERS p_logik TYPE logiknr OBLIGATORYMODIF ID del.
PARAMETERS p_ins1 TYPE anlage OBLIGATORYMODIF ID del.
PARAMETERS p_ins2 TYPE anlage MODIF ID del.
SELECTION-SCREENULINE.
PARAMETERS p_rest TYPE boolean RADIOBUTTON GROUP a.
PARAMETERS p_uname TYPE uname MODIF ID res.
PARAMETERS p_time TYPETIMESTAMPMODIF ID res.
DATA go_report TYPEREF TO lcl_report.
INITIALIZATION.
LOOP AT SCREEN.
CASE screen-group1.
WHEN'RES'.
screen-INPUT ='0'.
screen-OUTPUT ='1'.
screen-invisible ='0'.
MODIFY SCREEN.
WHEN'DEL'.
screen-INPUT ='1'.
screen-OUTPUT ='1'.
screen-invisible ='0'.
MODIFY SCREEN.
ENDCASE.
ENDLOOP.
AT SELECTION-SCREENOUTPUT.
LOOP AT SCREEN.
IF p_dele EQ'X'.
CASE screen-group1.
WHEN'RES'.
screen-INPUT ='0'.
screen-OUTPUT ='1'.
screen-invisible ='0'.
screen-required ='0'.
MODIFY SCREEN.
WHEN'DEL'.
screen-INPUT ='1'.
screen-OUTPUT ='1'.
screen-invisible ='0'.
MODIFY SCREEN.
ENDCASE.
ENDIF.
IF p_rest EQ'X'.
CASE screen-group1.
WHEN'DEL'.
screen-INPUT ='0'.
screen-OUTPUT ='1'.
screen-invisible ='0'.
MODIFY SCREEN.
WHEN'RES'.
screen-INPUT ='1'.
screen-OUTPUT ='1'.
screen-invisible ='0'.
MODIFY SCREEN.
ENDCASE.
ENDIF.
*
ENDLOOP.
START-OF-SELECTION.