Pushbuttons with selection screens

If you want to create pushbuttons with tool tips on a selection screen or you want to assign a tooltip to the pushbuttons created with SLECTION-SCREEN FUCTIONKEY in the GUI status of a selection screen, the correction instructions contain a sample program which demonstrates how you can assign tool tips to pushbuttons or application toolbars in a selection screen.

REPORT ZZTOOLTIPDEMO.
TYPE-POOLS icon.

DATA: funckey TYPE smp_dyntxt.
TABLES: sscrfields.

SELECTION-SCREEN PUSHBUTTON 1(40) pushbutt USER-COMMAND
com VISIBLE LENGTH 12.
SELECTION-SCREEN FUNCTION KEY 1.

INITIALIZATION.

CALL FUNCTION 'ICON_CREATE'
EXPORTING
name = icon_information
text = 'My Text'
info = 'My Quickinfo'
* ADD_STDINF = 'X'
IMPORTING
RESULT = pushbutt
EXCEPTIONS
OTHERS = 1.

IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

MOVE icon_information TO funckey-icon_id.
MOVE 'My text' TO funckey-icon_text.
MOVE 'My quickinfo' TO funckey-quickinfo.
MOVE funckey TO sscrfields-functxt_01.