*************************************   CHECKBOX **********************************************
*parameters: p_cat8 as checkbox user-command chk.
*
*parameters: p_lifnr type lfa1-lifnr modif id chk.
*
*parameters: p_belnr type bsak-belnr modif id chk.
*
*
*
*at selection-screen output.
*
*
*
*if p_cat8 ne 'X'."p_cat8 = space.
*
*loop at screen.
*
*if screen-group1 = 'CHK'.
*
*screen-input = '0'.
*
*modify screen.
*
*endif.
*
*endloop.
*
*endif.
*