Problem mit Checkbox in Custom Control

Problem mit Checkbox in Custom Control

Hallo

Meine Problem ist eine Checkbox auf eine Custom Control. Es darf nur immer eine Checkbox aktiv sein.

Kann ich das irgendwie vorbelegen ?

DATA ls_fcat TYPE lvc_s_fcat.
h_callback_pgm = sy-repid. "Rahmenprogramm übergeben

CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = '/INTENTIO/V_016'
CHANGING
ct_fieldcat = pt_fieldcat.
*


LOOP AT pt_fieldcat INTO ls_fcat.
*If ls_fcat-ROW_POS = 1.
CASE ls_fcat-fieldname.
WHEN 'ANTWJA' .
ls_fcat-checkbox = 'X'.
ls_fcat-edit = 'X'.
ls_fcat-row_pos = 5.
WHEN 'ANTWNE'.
ls_fcat-checkbox = 'X'.
ls_fcat-edit = 'X'.
ENDCASE.
*endif.

MODIFY pt_fieldcat FROM ls_fcat.



ENDLOOP.
CLEAR ls_fcat.

APPEND ls_fcat TO pt_fieldcat.


Bei einen normalem Dynpro würde ich ich es folgendermaßen Lösen

If Check_01 = 'X' and Check_02 = ' '
Dann Check_01
If Check_02 = 'X' and Check_01 = ' '
Dann Check_02