report ztest.
*parameters show_all as checkbox user-command flag.或
parameters show_all radiobutton group grp1 default 'X' user-command flag.
parameters show_no2 radiobutton group grp1 .
selection-screen begin of block b1 with frame.
parameters: p1 type c length 10,
p2 type c length 10,
p3 type c length 10.
selection-screen end of block b1.
selection-screen begin of block b2 with frame.
parameters: p4 type c length 10 modif id bl2,
p5 type c length 10 modif id bl2,
p6 type c length 10 modif id bl2.
selection-screen end of block b2.
at selection-screen output.
loop at screen.
if show_all <> 'X' and screen-group1 = 'BL2'.
screen-active = '0'.
endif.
modify screen.
endloop.
评论