ABAP code to display SAP icons

Below is the ABAP code to produce a list of icons including what they look like, name and code.

*&---------------------------------------------------------------------*
*& Report  ZICONS                                                      *
*&                                                                     *
*&---------------------------------------------------------------------*
*&                                                                     *
*&                                                                     *
*&---------------------------------------------------------------------*

REPORT  ZICONS                                                  .

TABLES: ICON.
INCLUDE .
FIELD-SYMBOLS: .

SELECT * FROM ICON.
   ASSIGN (ICON-NAME) TO .
   WRITE:   /(5) , 20 '@',21 ICON-ID+1(2),23 '@',ICON-OLENG,
            ICON-BUTTON,ICON-STATUS,ICON-MESSAGE,ICON-FUNCTION,
            ICON-NAME.
ENDSELECT.