// This script displays all SAP icons that are available in your system. 
// The icon id is shown as a quickinfo for each icon.
// You can put the script on any screen you like, but choose the right start coordinates (see Offset command below) 

// Choose coordinates for icon display
offset (10,0)


Set V[alpha] "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"

Set V[i] 1
Set V[k] 1

Box (0,0) (37,112) "SAP Icons and internal id"

label display_icon
Set V[icon] "&V[alpha](&V[i]-&V[i])&V[alpha](&V[k]-&V[k])"

Set V[row] &V[i]
Set V[col] &V[k] * 3

Text  (&V[row],&V[col]) "@&V[icon]\Q&V[icon]@"

Set V[k] &V[k] + 1
if V[k<37]
  goto display_icon
endif
Set V[k] 1
Set V[i] &V[i] + 1
if V[i<37]
  goto display_icon
endif