How to add Icons to ALV Reprt?

Hi,
I need to display icons (red, yellow) in my ALV Report in the first column in my report.
In my field catalog fieldcat-icon = 'X' has been taken into consideration, but still I am not able to see in my report. In the final internal table that is to display I created a field for this Icon type ICON_D. Is this the correct procedure to work with or else kindly let me know how to proceed?
Regards,
Raghu Ram.

This is the code that has been incorporated in order to display Icon in the ALV Report.
* TABLES Declarations *
Tables: PROJ, " Project definition
 PRPS, " WBS (Work Breakdown Structure) Element Master Data
 ICON.
* TYPE POOLS *
TYPE-POOLS: SLIS, " Globale Typen für generische Listbausteine
 ICON.
* ALV Data Declarations *
DATA:
GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
GT_REPID TYPE SY-REPID.
* Type Declarations *
TYPES:
* STRUCTURE OF TABLE PROJ
BEGIN OF TY_PROJ,
 PSPNR TYPE PROJ-PSPNR,
 PSPID TYPE PROJ-PSPID,
 POST1 TYPE PROJ-POST1,
 OBJNR TYPE PROJ-OBJNR,
 VERNR TYPE PROJ-VERNR,
 VERNA TYPE PROJ-VERNA,
END OF TY_PROJ,
* STRUCTURE OF TABLE PRPS
BEGIN OF TY_PRPS,
 PSPNR TYPE PRPS-PSPNR,
 POSID TYPE PRPS-POSID,
 POST1 TYPE PRPS-POST1,
 OBJNR TYPE PRPS-OBJNR,
 PSPHI TYPE PRPS-PSPHI,
 VERNR TYPE PRPS-VERNR,
END OF TY_PRPS,
BEGIN OF TY_FINAL,
 LIGHT TYPE ICON_D,
 PSPNR TYPE PROJ-PSPNR,
 PSPID TYPE PROJ-PSPID,
 POST1 TYPE PROJ-POST1,
 OBJNR TYPE PROJ-OBJNR,
 VERNR TYPE PROJ-VERNR,
 VERNA TYPE PROJ-VERNA,
 PSPNR_1 TYPE PRPS-PSPNR,
 POSID TYPE PRPS-POSID,
 POST1_1 TYPE PRPS-POST1,
 OBJNR_1 TYPE PRPS-OBJNR,
 PSPHI TYPE PRPS-PSPHI,
 VERNR_1 TYPE PRPS-VERNR,
END OF TY_FINAL.
* Internal Table Declarations *
DATA:
 IT_PROJ TYPE STANDARD TABLE OF TY_PROJ,
 IT_PRPS TYPE STANDARD TABLE OF TY_PRPS,
 IT_FINAL TYPE STANDARD TABLE OF TY_FINAL.
* Work Area Declarations *
DATA:
 WA_PROJ TYPE TY_PROJ,
 WA_PRPS TYPE TY_PRPS,
 WA_FINAL TYPE TY_FINAL.
* Selection Screen *
SELECTION-SCREEN BEGIN OF BLOCK BLK WITH FRAME.
SELECT-OPTIONS: S_PSPNR FOR PROJ-PSPNR.
SELECTION-SCREEN END OF BLOCK BLK.
* Start Of Selection *
START-OF-SELECTION.
PERFORM DATA_RETREVIAL.
PERFORM BUILD_FIELDCAT.
PERFORM DISPLAY_ALV.
* Data Retrevial Logic *
*& Form DATA_RETREVIAL
form DATA_RETREVIAL .
DATA: status_icon TYPE icons-text,
 icon_name(20) TYPE c,
 icon_text(10) TYPE c.
ICON_NAME = 'ICON_RED_LIGHT'.
ICON_TEXT = 'RED'.
CALL FUNCTION 'ICON_CREATE'
 EXPORTING
 name = ICON_NAME
 TEXT = ICON_TEXT
* INFO = ' '
 ADD_STDINF = 'X'
 IMPORTING
 RESULT = STATUS_ICON
 EXCEPTIONS
 ICON_NOT_FOUND = 1
 OUTPUTFIELD_TOO_SHORT = 2
 OTHERS = 3
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
SELECT PSPNR
 PSPID
 POST1
 OBJNR
 VERNR
 VERNA
 FROM PROJ
 INTO TABLE IT_PROJ
 WHERE PSPNR IN S_PSPNR.
 SELECT PSPNR
 POSID
 POST1
 OBJNR
 PSPHI
 VERNR
 FROM PRPS
 INTO TABLE IT_PRPS
 FOR ALL ENTRIES IN IT_PROJ
 WHERE PSPHI EQ IT_PROJ-PSPNR.
 LOOP AT IT_PROJ INTO WA_PROJ.
 LOOP AT IT_PRPS INTO WA_PRPS.
 WA_FINAL-PSPNR = WA_PROJ-PSPNR.
 WA_FINAL-PSPID = WA_PROJ-PSPID.
 WA_FINAL-POST1 = WA_PROJ-POST1.
 WA_FINAL-OBJNR = WA_PROJ-OBJNR.
 WA_FINAL-VERNR = WA_PROJ-VERNR.
 WA_FINAL-VERNA = WA_PROJ-VERNA.
 WA_FINAL-PSPNR_1 = WA_PRPS-PSPNR.
 WA_FINAL-POSID = WA_PRPS-POSID.
 WA_FINAL-POST1_1 = WA_PRPS-POST1.
 WA_FINAL-OBJNR_1 = WA_PRPS-OBJNR.
 WA_FINAL-PSPHI = WA_PRPS-PSPHI.
 WA_FINAL-VERNR_1 = WA_PRPS-VERNR.
 WA_FINAL-light = STATUS_ICON.
 APPEND WA_FINAL TO IT_FINAL.
 CLEAR: WA_FINAL.
 ENDLOOP.
 ENDLOOP.
endform. " DATA_RETREVIAL
* Field Catalog *
*& Form BUILD_FIELDCAT
form BUILD_FIELDCAT .
* DATA: FIELDCAT TYPE GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'LIGHTS'.
 GT_FIELDCAT-SELTEXT_M = 'STAUTS'.
 GT_FIELDCAT-COL_POS = 0.
 GT_FIELDCAT-ICON = 'X'.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'PSPNR'.
 GT_FIELDCAT-SELTEXT_M = 'PROJECT DEFINITION(INTERNAL)'.
 GT_FIELDCAT-COL_POS = 1.
 GT_FIELDCAT-OUTPUTLEN = 8.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'PSPID'.
 GT_FIELDCAT-SELTEXT_M = 'PROJECT DEFINITION'.
 GT_FIELDCAT-COL_POS = 2.
 GT_FIELDCAT-OUTPUTLEN = 24.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'POST1'.
 GT_FIELDCAT-SELTEXT_M = 'PROJECT DESC'.
 GT_FIELDCAT-COL_POS = 3.
 GT_FIELDCAT-OUTPUTLEN = 40.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'OBJNR'.
 GT_FIELDCAT-SELTEXT_M = 'Object number'.
 GT_FIELDCAT-COL_POS = 4.
 GT_FIELDCAT-OUTPUTLEN = 22.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'VERNR'.
 GT_FIELDCAT-SELTEXT_M = 'Responsible Person'.
 GT_FIELDCAT-COL_POS = 5.
 GT_FIELDCAT-OUTPUTLEN = 8.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'VERNA'.
 GT_FIELDCAT-SELTEXT_M = 'Responsible Person Desc'.
 GT_FIELDCAT-COL_POS = 6.
 GT_FIELDCAT-OUTPUTLEN = 25.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'PSPNR_1'.
 GT_FIELDCAT-SELTEXT_M = 'WBS Element'.
 GT_FIELDCAT-COL_POS = 7.
 GT_FIELDCAT-OUTPUTLEN = 8.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'POSID'.
 GT_FIELDCAT-SELTEXT_M = 'WBS Element'.
 GT_FIELDCAT-COL_POS = 8.
 GT_FIELDCAT-OUTPUTLEN = 24.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'POST1_1'.
 GT_FIELDCAT-SELTEXT_M = 'WBS DESC'.
 GT_FIELDCAT-COL_POS = 9.
 GT_FIELDCAT-OUTPUTLEN = 40.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'OBJNR_1'.
 GT_FIELDCAT-SELTEXT_M = 'Object number'.
 GT_FIELDCAT-COL_POS = 10.
 GT_FIELDCAT-OUTPUTLEN = 22.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'PSPHI'.
 GT_FIELDCAT-SELTEXT_M = 'Currnet Projct'.
 GT_FIELDCAT-COL_POS = 11.
 GT_FIELDCAT-OUTPUTLEN = 8.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
 GT_FIELDCAT-FIELDNAME = 'VERNR_1'.
 GT_FIELDCAT-SELTEXT_M = 'Responsible Person'.
 GT_FIELDCAT-COL_POS = 12.
 GT_FIELDCAT-OUTPUTLEN = 8.
 APPEND GT_FIELDCAT TO GT_FIELDCAT.
 CLEAR GT_FIELDCAT.
endform. " BUILD_FIELDCAT
* Display ALV Grid *
*& Form DISPLAY_ALV
form DISPLAY_ALV .
GT_REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = GT_REPID
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_CALLBACK_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
* I_GRID_TITLE =
* I_GRID_SETTINGS =
* IS_LAYOUT =
 IT_FIELDCAT = GT_FIELDCAT[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
* I_SAVE = ' '
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV_FULLSCREEN_ADAPTER =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
 TABLES
 t_outtab = IT_FINAL
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
endform. " DISPLAY_ALV

Similar Messages

How To add Logo in ALV Report

Hi,
How To add Logo in ALV Report?
I need step by step explanation.

Hi uday,
go through this hope u can understand.
*&amp; Report Z_OOALV_LOGO
*&--Sample Program using ooalv-> by SrikanthV--
REPORT z_ooalv_logo.
****DECLARATION FOR LOGO INSERT
CONSTANTS: cntl_true TYPE i VALUE 1,
cntl_false TYPE i VALUE 0.
DATA:h_picture TYPE REF TO cl_gui_picture,
h_pic_container TYPE REF TO cl_gui_custom_container.
DATA: graphic_url(255),
graphic_refresh(1),
g_result LIKE cntl_true.
DATA: BEGIN OF graphic_table OCCURS 0,
line(255) TYPE x,
END OF graphic_table.
DATA: graphic_size TYPE i.
CALL SCREEN 100.
*&----
*& Module PICTURE OUTPUT
text
MODULE picture OUTPUT.
DATA: l_graphic_xstr TYPE xstring,
l_graphic_conv TYPE i,
l_graphic_offs TYPE i.
CALL METHOD cl_ssf_xsf_utilities=>get_bds_graphic_as_bmp
EXPORTING
p_object = 'GRAPHICS'
p_name = 'EDS'"IMAGE NAME - Image name from SE78
p_id = 'BMAP'
p_btype = 'BCOL'
RECEIVING
p_bmp = l_graphic_xstr
EXCEPTIONS
not_found = 1
OTHERS = 2.
graphic_size = XSTRLEN( l_graphic_xstr ).
CHECK graphic_size > 0.
l_graphic_conv = graphic_size.
l_graphic_offs = 0.
WHILE l_graphic_conv > 255.
graphic_table-line = l_graphic_xstr+l_graphic_offs(255).
APPEND graphic_table.
l_graphic_offs = l_graphic_offs + 255.
l_graphic_conv = l_graphic_conv - 255.
ENDWHILE.
graphic_table-line = l_graphic_xstr+l_graphic_offs(l_graphic_conv).
APPEND graphic_table.
CALL FUNCTION 'DP_CREATE_URL'
EXPORTING
type = 'image'
subtype = cndp_sap_tab_unknown " 'X-UNKNOWN'
size = graphic_size
lifetime = cndp_lifetime_transaction "'T'
TABLES
data = graphic_table
CHANGING
url = graphic_url
EXCEPTIONS
dp_invalid_parameter = 1
dp_error_put_table = 2
dp_error_general = 3
OTHERS = 4 .
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
EXIT.
ENDIF.
CREATE OBJECT h_pic_container
EXPORTING container_name = 'LOGO'.
CREATE OBJECT h_picture EXPORTING parent = h_pic_container.
CALL METHOD h_picture->load_picture_from_url
EXPORTING
url = graphic_url
IMPORTING
RESULT = g_result.
ENDMODULE. " PICTURE OUTPUT
Reward points if helpful.
Thanks

How to add icons in native menu with text

Hello Guys
                 Can Anybody guides me how to add icon in nativemenu system tray.Actually i am making a simple application in adobe air and use minimizing the application into system tray.On Right click on the icon present in system tray it open naitive menu with open and exit option.
i just want to add an icon with each menuItem.Please guide how can i do it.please give me some example for it.i am using this
                                 http://www.swamicharan.com/blog/air/minimizing-an-air-app-to-systemtray/
link for dock and undock my application.And also tell me how to enhace the width of that naitive menu .please help me out.
Thanks And Regards
     Vineet Osho.

           the native menu means in ur application menu or flex system menu?

How to write ICONS in ALV TOP of Page

Hai experts,
How to ICON in ALV Top of PAGE
i want to wrire
ICON_LED_RED for cancellation Invioce
ICON_LED_GREEN for Invioce
but i pass this values to wa_header-info it comes @5C@ @5B@
thanks
sitaram

Hi...
 I think this code is help full for u....
*& Report ZFI_TEST *
REPORT ZFI_ICON_TEST MESSAGE-ID zz .
*& TABLES DECLARATION *
TABLES: vbak.
*& TYPE POOLS DECLARATION *
TYPE-POOLS: slis.
*& INTERNAL TABLE DECLARATION *
DATA: BEGIN OF itab OCCURS 0,
icon TYPE icon-id, "itab-icon = '@08@' -> Green ; '@09@' -> Yellow ; '@0A@' -> Red
vbeln LIKE vbak-vbeln,
audat LIKE vbak-audat,
vbtyp LIKE vbak-vbtyp,
auart LIKE vbak-auart,
augru LIKE vbak-augru,
netwr LIKE vbak-netwr,
waerk LIKE vbak-waerk,
END OF itab.
*INTERNAL TABLE FOR FIELD CATALOG
DATA: wa_fieldcat TYPE slis_fieldcat_alv,
it_fieldcat TYPE slis_t_fieldcat_alv.
IT_FIELDCAT TYPE STANDARD TABLE OF SLIS_FIELDCAT_ALV
WITH HEADER LINE,
*INTERNAL TABLE FOR EVENTS
DATA: it_event TYPE slis_t_event,
wa_event TYPE slis_alv_event,
*INTERNAL TABLE FOR SORTING
it_sort TYPE slis_t_sortinfo_alv,
wa_sort TYPE slis_sortinfo_alv,
*INTERNAL TABLE FOR LAYOUT
wa_layout TYPE slis_layout_alv.
*& VARIABLE DECLARATION *
DATA : v_repid TYPE sy-repid,
v_pagno(4) TYPE n,
v_date(8) TYPE c.
*& CONSTANTS *
CONSTANTS: c_x TYPE c VALUE 'X'.
*& SELECTION SCREEN *
SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_vbeln FOR vbak-vbeln,
s_vbtyp FOR vbak-vbtyp DEFAULT 'C'.
SELECTION-SCREEN: END OF BLOCK b1.
SELECTION-SCREEN: BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
SELECTION-SCREEN : BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(20) text-003.
PARAMETERS: p_list RADIOBUTTON GROUP rad1 DEFAULT 'X'.
SELECTION-SCREEN : END OF LINE.
SELECTION-SCREEN : BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(20) text-004.
PARAMETERS: p_grid RADIOBUTTON GROUP rad1.
SELECTION-SCREEN : END OF LINE.
SELECTION-SCREEN: END OF BLOCK b2.
AT SELECTION-SCREEN.
PERFORM validate_screen.
*& START OF SELECTION *
START-OF-SELECTION.
CLEAR: itab, itab[].
V_REPID = SY-REPID.
PERFORM get_data.
PERFORM display_data.
*& END OF SELECTION *
END-OF-SELECTION.
*--DO ALV Process
v_repid = sy-repid.
*--Sort the Output Fields
PERFORM sort_fields.
*--Build Field catalog for the Output fields
PERFORM BUILD_FIELDCAT.
*--Set the Layout for ALV
PERFORM set_layout.
*& Form GET_DATA
text
TO GET THE DATA FROM TABLES INTO ITAB
FORM get_data .
SELECT vbeln
audat
vbtyp
auart
augru
netwr
waerk
INTO CORRESPONDING FIELDS OF TABLE itab
FROM vbak
WHERE vbeln IN s_vbeln AND
audat > '04.04.2005'
AND netwr > 0.
LOOP AT itab.
IF itab-netwr < 10000.
itab-icon = '@08@'.
ELSEIF itab-netwr > 10000 AND itab-netwr < 100000.
itab-icon = '@09@'.
ELSEIF itab-netwr > 100000.
itab-icon = '@0A@'.
ENDIF.
MODIFY itab INDEX sy-tabix.
ENDLOOP.
ENDFORM. " GET_DATA
*& Form sort_fields
FORM sort_fields .
CLEAR wa_sort.
wa_sort-fieldname = 'VBTYP'.
wa_sort-spos = '1'.
wa_sort-up = 'X'.
APPEND wa_sort TO it_sort.
CLEAR wa_sort.
wa_sort-fieldname = 'NETWR'.
wa_sort-spos = '2'.
wa_sort-up = 'X'.
wa_sort-subtot = 'X'.
APPEND wa_sort TO it_sort.
ENDFORM. " sort_fields
*& Form set_layout
FORM set_layout .
IF p_list = c_x .
wa_layout-window_titlebar = 'LIST DISPLAY'(016).
wa_layout-zebra = 'X'.
 +
 +
ALV LIST DISPLAY
PERFORM list_display TABLES itab.
 o
 +
 + ALV GRID DISPLAY
ELSEIF p_grid = c_x.
wa_layout-window_titlebar = 'GRID DISPLAY'(017).
wa_layout-zebra = 'X'.
PERFORM grid_display TABLES itab.
ENDIF.
ENDFORM. " set_layout
*& Form list_display
FORM list_display TABLES p_itab .
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
i_callback_program = v_repid
is_layout = wa_layout
it_fieldcat = it_fieldcat[]
it_sort = it_sort[]
i_save = 'U'
TABLES
t_outtab = itab
EXCEPTIONS
program_error = 1
OTHERS = 2.
IF sy-subrc 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM. " list_display
*& Form GRID_DISPLAY
FORM grid_display TABLES p_itab .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = v_repid
is_layout = wa_layout
it_fieldcat = it_fieldcat[]
it_sort = it_sort[]
it_events = it_event
TABLES
t_outtab = itab
EXCEPTIONS
program_error = 1
OTHERS = 2.
IF sy-subrc 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM. " GRID_DISPLAY
*& Form VALIDATE_SCREEN
text
--> p1 text
<-- p2 text
FORM validate_screen .
DATA: lv_vbeln LIKE vbak-vbeln.
IF NOT s_vbeln IS INITIAL.
SELECT vbeln
INTO lv_vbeln
UP TO 1 ROWS
FROM vbak
WHERE vbeln IN s_vbeln.
ENDSELECT.
IF sy-subrc <> 0.
MESSAGE e000 WITH 'INVALID SALES DOC'.
ENDIF.
ENDIF.
ENDFORM. " VALIDATE_SCREEN
*& Form display_data
text
--> p1 text
<-- p2 text
FORM display_data .
DEFINE m_fieldcat.
add 1 to wa_fieldcat-col_pos.
wa_fieldcat-fieldname = &1.
wa_fieldcat-ref_tabname = 'VBAK'.
wa_fieldcat-do_sum = &2.
wa_fieldcat-cfieldname = &3.
append wa_fieldcat to it_fieldcat.
END-OF-DEFINITION.
DATA:
ls_fieldcat TYPE slis_fieldcat_alv,
lt_fieldcat TYPE slis_t_fieldcat_alv.
m_fieldcat 'ICON' '' ''.
m_fieldcat 'VBELN' '' ''.
m_fieldcat 'AUDAT' '' ''.
m_fieldcat 'VBTYP' '' ''.
m_fieldcat 'AUART' '' ''.
m_fieldcat 'AUGRU' '' ''.
m_fieldcat 'NETWR' 'C' 'WAERK'.
m_fieldcat 'WAERK' '' ''.
ENDFORM. " display_data[/code]
Regards,
Rahul
Edited by: Rahul Reddy on Apr 14, 2008 12:33 PM

How to add radiobuttons in ALV Grid

Hi,
I refered the threads in SDN but i am not able to get proper solution for my requirement.
I am displaying output in ALV Grid format. After displaying the output i mean in the output screen i need few buttons and radio buttons . when user selects the record and clicks the radio button accordingly my logic should work. Anybody can tell me how to add the radiobuttons in the output of the screen. Please find the below output format for the requirement is
Push button1 Pushbutton2 Radiobutton1 Radio button2
MY program output in Grid format.
Anybody can suggest me how to approach.
Regards,
Maheedhar

Check if this link helps..
http://wiki.sdn.sap.com/wiki/display/Snippets/ABAP-RadioButtonsinALVGRIDREPORT

How to add icons to JTabbedPane?

hi, how to add an icon on each tabbed in JTabbedPane?

Use JTabbedPane's setIconAt(...) method tabPane.setIconAt(int index, Icon icon) Please read the API a little more carefully.
ICE

How to add header in ALV

Hi Friends,
How to add a header in ALV, Can you please tell me.
Regards,
Venu.

hi,
chk this sample code.
call function 'REUSE_ALV_GRID_DISPLAY'
 exporting
 i_callback_program = gd_repid
 i_callback_top_of_page = 'TOP-OF-PAGE' "see FORM
 is_layout = gd_layout
 it_fieldcat = fieldcatalog[]
 i_save = 'X'
 tables
 t_outtab = it_ekko
 exceptions
 program_error = 1
 others = 2.
Form TOP-OF-PAGE *
ALV Report Header *
Form top-of-page.
*ALV Header declarations
data: t_header type slis_t_listheader,
 wa_header type slis_listheader,
 t_line like wa_header-info,
 ld_lines type i,
 ld_linesc(10) type c.
Title
wa_header-typ = 'H'.
wa_header-info = 'EKKO Table Report'.
append wa_header to t_header.
clear wa_header.
Date
wa_header-typ = 'S'.
wa_header-key = 'Date: '.
CONCATENATE sy-datum+6(2) '.'
 sy-datum+4(2) '.'
 sy-datum(4) INTO wa_header-info. "todays date
append wa_header to t_header.
clear: wa_header.
Total No. of Records Selected
describe table it_ekko lines ld_lines.
ld_linesc = ld_lines.
concatenate 'Total No. of Records Selected: ' ld_linesc
 into t_line separated by space.
wa_header-typ = 'A'.
wa_header-info = t_line.
append wa_header to t_header.
clear: wa_header, t_line.
call function 'REUSE_ALV_COMMENTARY_WRITE'
 exporting
 it_list_commentary = t_header.
 i_logo = 'Z_LOGO'.
endform.
rgds
anver
if hlped mark points

How to add Icon in Tree View in Forms 6.0 (URGENT..!)

Hello All,
I want to add icons in tree view (hierarchical tree) by using
forms 6.0.
So pls. help me to find out the solution for the same.
thanks
Pradeep
null

Pradeep (guest) wrote:
: Hello All,
: I want to add icons in tree view (hierarchical tree) by using
: forms 6.0.
: So pls. help me to find out the solution for the same.
: thanks
: Pradeep
hello pradeep,
for adding icons in the tree, u willhave to look closely to the
data format for the tree.in the data format used for populating
the tree we are supplying 5 fields. the state of the tree node
(expanded or collapsed), the depth of the node w.r.t the parent
node, the node value, the node label(what we see on the tree)
and the node icon which we want to use. for the node icon we
have to provide the entire path of the icon file. that's it.
hope this will solve the problem
null

How to show icons in ALV grid ...

Hi guyz ,
A lill query ....
In an ALV gird ,if i need to display icons in one of the columns , say i have
a field called Status , where i need show some icons like green , yellow and
red circles , depending on some other fileds say invoice reciept date .
So can i get icons in ALV colums.
Please advise .
Thanks
Jahan

This is very easy. IN your status field in your internal table, you simply write the icon to it. Make sure that the status field is defined as a character field with a length of 4. Then write the icon to it.
Type-pools: icon.
write icon_green_light as icon to itab-status.
Then when filling the field catalog, set the ICON flag. This puts the icon in the center of the cell in ALV.
xfc-icon = 'X'.
append xfc to ifc.
Regards,
Rich Heilman

How to add icon in front of Send To menu in context menu?

Is it possible to add icon to the Send To entry in the windows explorer context menu?

Hi,
To add icon to send to context menu, please locate following registry key:
HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\SendTo
1. In the right-pane create a String value (REG_SZ) named Icon
2. Double-click Icon and type the path to an icon (.ico) file, or mention the icon library file name and the icon index.
3. Exit the Registry Editor.
Hope this could be helpful.
Kate Li
TechNet Community Support

How to add icon field in the alv grid output

Hi Experts,
i need to add one icom column in the alvgrid.That icon if the contract is inacitve then it should shows inactive symbol.if the contract is account assignment lock then it should show that lock symbol.Please send me the any code or approach.
Thanks,
Venkat.

Hello Venkat
Set ls_fcat-icon = 'X' in the fieldcatalog for the column where you want to display icons. In addition, add the following statement to your report:
TYPE-POOLS: icon. " replaces INCLUDE <icon>.
Do not use the coded values (e.g. '@01@') but the "normal" icon names, e.g. ICON_DETAIL.. In order to see the icon names call transaction SE38/SA38 and run report RSTXICON.
Regards
Uwe

How to add button in ALV report (Class method )?

Hello experts,
I have developed one ALV report using classes.
I want to add one more button on the report like already is there named DISPLQUA
How ca i do that here?
Following the code of CLASS definition & implimentation
CLASS lcl_handle_events DEFINITION.
PUBLIC SECTION.
 METHODS:
 handle_on_user_command FOR EVENT added_function OF cl_salv_events
 IMPORTING e_salv_function.
ENDCLASS. "lcl_handle_events DEFINITION
 CLASS lcl_handle_events IMPLEMENTATION
CLASS lcl_handle_events IMPLEMENTATION.
METHOD handle_on_user_command.
 CASE e_salv_function.
 WHEN 'DISPLQUA'.
 PERFORM show_quant_record.
 WHEN 'DISPQM03'. " Here i want to add button
 PERFORM display_quality_notification.
 WHEN OTHERS.
 ENDCASE.
ENDMETHOD. "handle_on_user_command
ENDCLASS. "lcl_handle_events IMPLEMENTATION

HI Ronny.
Code snippet for reference.
CLASS LCL_EVENT_HANDLER DEFINITION .
PUBLIC SECTION.
 METHODS :
*--Toolbar control
 HANDLE_TOOLBAR FOR EVENT TOOLBAR
 OF CL_GUI_ALV_GRID IMPORTING E_OBJECT
 E_INTERACTIVE,
ENDCLASS
CLASS LCL_EVENT_HANDLER IMPLEMENTATION.
*--handle toolbar
METHOD HANDLE_TOOLBAR.
* append a separator to normal toolbar
 CLEAR G_TOOLBAR.
 G_TOOLBAR-BUTN_TYPE = 3.
 APPEND G_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
 CLEAR G_TOOLBAR.
 G_TOOLBAR-FUNCTION = 'SAVE'.
 G_TOOLBAR-ICON = ICON_SYSTEM_SAVE.
 G_TOOLBAR-BUTN_TYPE = 0.
 G_TOOLBAR-QUICKINFO = 'Save the Customer'(203).
 APPEND G_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
ENDMETHOD. "HANDLE_TOOLBAR
Hope this helps.
Gary.
<REMOVED BY MODERATOR>
Edited by: Alvaro Tejada Galindo on Apr 7, 2008 5:41 PM

How to display icon in alv report output

hi,
my ewquirement in in alv report in one column to diaplay the icon(tickmark) based on some codition.
how to achieve it??
condition is
Affected (Locked on Current ECM) u2013 can use symbols    for affected and   for changing u2013
u2022     Lock AEOI u2013 CCLCK for AE01-OBJKT (Material) lock.
Condition:
If AEOI u2013 CCLCK is activated then display symbols (tickmark) in line of their AE01-OBJKT (Material). else display
(x mark)

Hi,
In field catalog of grid set
Ex--
when 'Field'.
lwa_fcat-icon      = c_true.
based on your condition
set the desired icon in table.
Ex.... lwa_table-field = icon_tick.

Need to add icon in ALV

i had declared atype and internal table repcetively,
TYPES : BEGIN OF ty_pr ,
 icon LIKE icon-id ,
 banfn LIKE eban-banfn ,
 txz01 LIKE eban-txz01 ,
 ernam LIKE eban-ernam ,
 END OF ty_pr.
DATA : it_pr TYPE STANDARD TABLE OF ty_pr
 WITH HEADER LINE.
i need to add one icon(not light) in the first column of ALV.Can anyone help me.
Thks,
Manish.

Check the following example it may help u.
report z_example.
TYPE-POOLS: slis,icon.
DATA: x_fieldcat TYPE slis_fieldcat_alv,
 it_fieldcat TYPE slis_t_fieldcat_alv,
 l_layout TYPE slis_layout_alv.
DATA: BEGIN OF itab OCCURS 0,
 vbeln LIKE vbak-vbeln,
 posnr LIKE vbap-posnr,
 icon(1),
 END OF itab.
data:program type sy-repid.
SELECT vbeln
 posnr
 FROM vbap
 UP TO 20 ROWS
 INTO TABLE itab.
LOOP AT itab.
IF sy-tabix = 1 OR sy-tabix = 2.
 itab-icon = '1'.
ELSEIF sy-tabix = 10 OR sy-tabix = 20.
 itab-icon = '2'.
ELSE.
 itab-icon = '3'.
ENDIF.
MODIFY itab INDEX sy-tabix.
ENDLOOP.
program = sy-repid.
x_fieldcat-fieldname = 'VBELN'.
x_fieldcat-seltext_l = 'VBELN'.
x_fieldcat-hotspot = 'X'.
x_fieldcat-tabname = 'ITAB'.
x_fieldcat-col_pos = 1.
APPEND x_fieldcat TO it_fieldcat.
CLEAR x_fieldcat.
x_fieldcat-fieldname = 'POSNR'.
x_fieldcat-seltext_l = 'POSNR'.
x_fieldcat-tabname = 'ITAB'.
x_fieldcat-col_pos = 2.
APPEND x_fieldcat TO it_fieldcat.
CLEAR x_fieldcat.
l_layout-lights_fieldname = 'ICON'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = program
 is_layout = l_layout
 it_fieldcat = it_fieldcat
 TABLES
 t_outtab = itab
 EXCEPTIONS
 program_error = 1
 OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
regards

How to add icons to Dock

I just want to add an icon for Amazon to my dock (I use OS 10.6.8), but have become confused byTMI. How do I do it?

seventy one wrote:
Hi Niku,
And thank you for the acknowledgement. That is why I wrote you may have to hunt for it. But there is another way.
Go to bookmarks > show all bookmarks. Make sure that in the 'Collections" column to your left, the highlight is on Bookmarks bar. Then when 'show all bookmarks' comes up it will show you the entire contents of your bookmarks bar.
By resting your cursor on Amazon you can drag it up to the number one position ... and Bingo.
Sorry, but I don't find that very useful. Sometimes, many--most--times, you can't remember the name of the site you're looking for. The only answer is to have the Bookmarks organized in a way that will make finding things much easier. Tools do exist for such organization, and I have already used the Apple system for deleting all of those that I don't need or want--an amazing number of them. That took time. Some day when I have nothing better to do, I'll use such a system to clean out and organize all of my Bookmarks, so that they can become the valuable tool they're supposed to be. Funny, the first time I had a total computer wipe-out, the only thing I really grieved about were my Bookmarks, but now, and for a long, long time., I very seldom bother using them to find anything.

How to add Icons to ALV Reprt?

Similar Messages

Maybe you are looking for