Checkboxen auf selection-screen dynamisch rendern

Copy & Paste ready: Checkboxen auf selection-screen dynamisch rendern.

Like it? Share it!
REPORT zdyn_checkpoints. DATA: it_data TYPE TABLE OF t001. DATA: lv_check TYPE char3. DATA: lv_syindx TYPE char2. DEFINE checkbox. parameters:&1 as checkbox. END-OF-DEFINITION. checkbox:c01,c02,c03,c04,c05,c06,c07,c08,c09,c10, c11,c12,c13,c14,c15,c16,c17,c18,c19,c20. AT SELECTION-SCREEN OUTPUT. DESCRIBE TABLE it_data LINES sy-tfill. sy-tfill = 19. "Abhängig von der Anzahl der Einträge in der Tabelle sy_index = 1. LOOP AT SCREEN. CONCATENATE 'C' lv_syindx INTO lv_check. IF screen-name = lv_check. IF sy_index GT sy-tfill. screen-active = '0'. MODIFY SCREEN. lv_syindx = lv_syindx + 1. CONTINUE. ENDIF. lv_syindx = lv_syindx + 1. ENDIF. ENDLOOP.

>_ Author

>_ last updated 5 yearss ago

>_ Language: ABAP

SELECTION-SCREEN checkbox