Code: Alles auswählen.
DATA result_icon TYPE icons-text.
Code: Alles auswählen.
result_icon = 'ICON_VERB'.
IF isOK_verb = 'X'.
PERFORM icon_create USING 'ICON_GREEN_LIGHT'
CHANGING result_icon.
ELSE.
PERFORM icon_create USING 'ICON_RED_LIGHT'
CHANGING result_icon.
ENDIF.
Code: Alles auswählen.
FORM icon_create USING name
CHANGING result.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
name = name
IMPORTING
RESULT = RESULT
exceptions
...
ENDFORM. "icon_create
Code: Alles auswählen.
@5B\QGrüne LED; Go; In Ordnung@
Code: Alles auswählen.
LD_ICON = |{ ICON_GREEN_LIGHT(3) }\Q{ ld_quickinfo }@ { ld_text }|.