How to display ICONS in normal report without using icons table

Hi Friends,
I have to display icons(traffic lights) in a normal report.
Can we do that without using icons table?
If yes, please let me know how?
Thanks,

Hi Pagidala,
Go to txcode - ABAPDOCU and in that expand BC-ABAP Programming->ABAP User Dialog->Screens->complex screen elements->status icons on Screens.
In this you can see sample code which may help you.
Cheers!!

Similar Messages

How to create new Custom XML Report without using Form Builder

Hi,
What are the steps to create new Custom XML Report without using Report Builder ?
Thanks and Regards,
Abhi

Hi,
Steps we now follow
1)Create Data Model in Reports Builder
2)Create xml
3)Insert xml in Publisher to build Fomat
4)FTp rdf
5)Create Data Definition and Template
6)Create executable and Concurrent Program
Is there any way we can build reports without use of Report Builder ? By writing PL SQL Package for Before Report and After Report etc ...
Thanks and Regards,
Abhijit Rode

How to display the output of report(9i) using Report Background Engine

Hi,
We are converting the forms and reports from 6i to 9i.
we could run the report in the browser from form using WEB.SHOW_DOCUMENT built-in, but we are not able to display the report output from form using the Report Background Engine.Let us know if you have any solution for this.
Regards,
Pramila.

Pramila,
you have to use Reports Server called from RUN_REPORT_OBJECT(). Please see the Reports Integration whitepaper on otn.oracle.com/products/forms. You can either look it up in the Forms 10g collateral seciton or the Forms 9i collateral section.
Frank

How to convert row data into columns without using pivot table?

Hello guys
I have a report that has several columns about sales call type and call counts
It looks like this:
Calls Type Call Counts
Missed 200
Handled 3000000
Rejected 40000
Dropped 50000
Now I wanna create a report that look like this:
Missed call counts Handled Call counts Rejected Counts Drop counts Other Columns
200 300000000 40000 50000 Data
So that I can perform other calculations on the difference and comparison of handled calls counts vs other call counts..
I know pivot table view can make the report look like in such way, but they cant do further calculations on that..
So I need to create new solid columns that capture call counts based on call types..
How would I be able to do that on Answers? I don't have access to the RPD, so is it possible to do it sololy on answers? Or should I just ask ETL support on this?
Any pointers will be deeply appreciated!
Thank you

Thanks MMA
I followed your guidance and I was able to create a few new columns of call missed count, call handled counts and call abandoned counts.. Then I create new columns of ave missed counts, ave handled counts and so forth..
Then I went to the pivot view, I realized there is a small problem.. Basically the report still includes the column "call types" which has 3 different types of call "miss, abandon and handled". When I exclude this column in my report, the rest of the measures will return wrong values. When I include this column in the report, it shows duplicate values by 3 rows. It looks like this:
Queue name Call types Call handled Call missed Call abondoned
A Miss 8 10 15
A Handled 8 10 15
A Abandoned 8 10 15
in pivot table view, if I move call type to column area, the resulted measures will become 8X3, 10X3 and 15X3
So is there a way to eliminate duplicate rows or let the system know not to mulitply by 3?
Or is this as far as presentation service can go in terms of this? Or should I advice to provide better data from the back end?
Please let me know, thanks

Display the 3rd hieghest value without using rowid

HI All,
Can any one help me how to display the 3rd hieghest valuer without using a ROWID..
Thanks
Basava

Frank, using ROWNUM = 1 instead of DISTINCT could be a bit faster:
SQL> SET LINESIZE 132
SQL> EXPLAIN PLAN FOR
2 WITH got_r_num AS (
3                     SELECT DISTINCT sal,
4                                      DENSE_RANK() OVER(ORDER BY sal DESC NULLS LAST) AS r_num
5                       FROM scott.emp
6                    )
7 SELECT sal
8    FROM got_r_num
9    WHERE r_num = 3
10 /
Explained.
SQL> @?\RDBMS\ADMIN\UTLXPLS
PLAN_TABLE_OUTPUT
Plan hash value: 436395657
| Id | Operation                 | Name | Rows | Bytes | Cost (%CPU)| Time     |
|   0 | SELECT STATEMENT          |      |     9 |   234 |     5 (40)| 00:00:01 |
|* 1 | VIEW                     |      |     9 |   234 |     5 (40)| 00:00:01 |
|   2 |   HASH UNIQUE             |      |     9 |    36 |     5 (40)| 00:00:01 |
|* 3 |    WINDOW SORT PUSHED RANK|      |     9 |    36 |     5 (40)| 00:00:01 |
|   4 |     TABLE ACCESS FULL     | EMP |    14 |    56 |     3   (0)| 00:00:01 |
PLAN_TABLE_OUTPUT
Predicate Information (identified by operation id):
   1 - filter("R_NUM"=3)
   3 - filter(DENSE_RANK() OVER ( ORDER BY INTERNAL_FUNCTION("SAL") DESC
              NULLS LAST)<=3)
18 rows selected.
SQL> EXPLAIN PLAN FOR
2 WITH got_r_num AS (
3                     SELECT sal,
4                             DENSE_RANK() OVER(ORDER BY sal DESC NULLS LAST) AS r_num
5                       FROM scott.emp
6                    )
7 SELECT sal
8    FROM got_r_num
9    WHERE r_num = 3
10      AND ROWNUM = 1
11 /
Explained.
SQL> @?\RDBMS\ADMIN\UTLXPLS
PLAN_TABLE_OUTPUT
Plan hash value: 21859616
| Id | Operation                 | Name | Rows | Bytes | Cost (%CPU)| Time     |
|   0 | SELECT STATEMENT          |      |     1 |    26 |     4 (25)| 00:00:01 |
|* 1 | COUNT STOPKEY            |      |       |       |            |          |
|* 2 |   VIEW                    |      |    14 |   364 |     4 (25)| 00:00:01 |
|* 3 |    WINDOW SORT PUSHED RANK|      |    14 |    56 |     4 (25)| 00:00:01 |
|   4 |     TABLE ACCESS FULL     | EMP |    14 |    56 |     3   (0)| 00:00:01 |
PLAN_TABLE_OUTPUT
Predicate Information (identified by operation id):
   1 - filter(ROWNUM=1)
   2 - filter("R_NUM"=3)
   3 - filter(DENSE_RANK() OVER ( ORDER BY INTERNAL_FUNCTION("SAL") DESC
              NULLS LAST)<=3)
19 rows selected.
SQL> SY.

How to display barcode in ABAP report

Hi Experts,
I want to display the barcode of process order number in ABAP report without using SAP script or smart form. Please let me know how is it possible to display and print the barcode in the ABAP report.
Thanks in advance.

Hi,
Please follow the links below
Re: Bar Code Generation in ABAP Report
Create Barcode in ABAP : conversion to PDF
also chk the link below, It also gives info about barcodes..
http://www.mecsw.com/info/appnote/app_024.html
hope it helps
Regards,
Manish

How we can print directly a report without preview to a local printer in web

How we can print directly a report without preview to a local printer in web-environment, whith Oracle 9ias Report server release 6i patch 11.
The user want to print ticket, built by Oracle Report, without previuw on PDF format, in a web three-tier environment.
Please supply my documentation in detail and sample code if you can.

Hello,
Take a look to the example provided in the note :
Note.253881.1 How to Create a Report With a Frame Only on the Last Page at a Fixed Position
Regards

How to Display 'purchase order text' in MM03 using report program

Hi Friends,
Can anybody suggest me how to display 'purchase order text' in MM03 using report program.
'Purchase order text' tab displays purchase long text of particular material .
I coded as:
      SET PARAMETER ID 'MXX' FIELD 'E'.
      SET PARAMETER ID 'MAT' FIELD k_final-matnr.
      SET PARAMETER ID 'WRK' FIELD k_final-werks.
      CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
It displays Purchasing tab other than Purchase Order Text tab of MM03.
Please suggest me how can i solve this.
Is there any parameter id to set values for Purchase Order text tab

>
Madhu Mano Chitra wrote:
> I want how to navigate to MM03 'Purchase Order text' tab/ view using ABAP code.
> could any suggest me
You can call a transaction and pass it a BDC table that tells it where you want it to go. You have to work out for yourself what to put into the BDC table. The code below works for tcode CATSSHOW.
DATA: bdcdata_wa TYPE bdcdata,
      bdcdata_tab TYPE TABLE OF bdcdata.
DATA opt TYPE ctu_params.
   CLEAR bdcdata_wa.
    bdcdata_wa-program = 'CATSSHOW'.
    bdcdata_wa-dynpro   = '1000'.
    bdcdata_wa-dynbegin = 'X'.
    APPEND bdcdata_wa TO bdcdata_tab.
    CLEAR bdcdata_wa.
    bdcdata_wa-fnam = 'SO_STATU-LOW'.
    bdcdata_wa-fval = '20'.
    APPEND bdcdata_wa TO bdcdata_tab.
    CLEAR bdcdata_wa.
    bdcdata_wa-fnam = 'ANDZEIT'.
    bdcdata_wa-fval = SPACE.
    APPEND bdcdata_wa TO bdcdata_tab.
    CLEAR bdcdata_wa.
    bdcdata_wa-fnam = 'PAST'.
    bdcdata_wa-fval = 'X'.
    APPEND bdcdata_wa TO bdcdata_tab.
    IF p_selscr = SPACE.
       CLEAR bdcdata_wa.
       bdcdata_wa-fnam = 'BDC_OKCODE'.
       bdcdata_wa-fval = '=ONLI'.
       APPEND bdcdata_wa TO bdcdata_tab.
    ENDIF.
    opt-dismode = 'E'.
    opt-defsize = 'X'.
CALL TRANSACTION 'CAPP' USING bdcdata_tab OPTIONS FROM opt.

Doubt , how to display ole objects in report builder

Please tell me, how to display ole objects in report builder.
I mean i wanted to print ole object in report, so how to do that.

Just to clarify Lixia's response.
In Reports 9i we have deprecated our OLE functionality. Reports created in prior versions that contain OLE objects should still run, but you will not be able to create new reports containing OLE objects.

How to release FSG reports without using Program - FSG Transfer across a database link

Hi,
Our project development team have built some reports to meet the requirements of the business customer using Financials Statement Generator (FSG) as part of an implementation of Oracle E-Business Suite (EBS) release 12.1.3.
We know we can use the Program - FSG Transfer across a database link to move the reports from development to another environment.
Oracle General Ledger User's Guide
Copying Report Objects From Another database (FSG Transfer Program)
http://docs.oracle.com/cd/E18727_01/doc.121/e13627/T312864T313620.htm#I_tx2Dfsgx2Dimpex78
However our production environment is on a different network. Therefore this solution will not work since a database link cannot be created from production to the non production databases. Obviously I am asking the network solution architects to consider how to join the networks but do'nt hold out much hope. Has anyone got an alternative solution?
FYI We have considered extracting the report definition, row sets, column sets etc from the back end database tables then transforming that into end user key strokes to simulate what someone would do to create such a report from scratch using the front end forms using a tool such as data loader which I believe has no licence cost implications. We dont have a lot of time so would be interested to know if anyone had any success with an alternative method such as this.
P.S. I had found this question asked already by someone else but without an answer so i am trying again today.
Transfer FSG Report without using FSG Transfer program.

Look here for a potential way: Re: Calling table function on remote server - possible?

CREATE XML PUBLISHER REPORT WITHOUT USING RDF

Hi Every one ,
Can anybody share his/her expertise on following issue ?
"How to create XML Publisher Report without using RDF?"
Your help is appreciated.

Hi Swapnesh
YOu do not need to create the XDODTEXE, its seeded for you. You need to do the following:
1. Create and test the data template
2. Load the data template to the template manager against a data definition
3. Create a concurrent program definition that uses the XDODTEXE as its executable
4. Create parameters (if required) for the CP and DT that match in name
You're done
Regards
Tim

How to exctract data from a report to use it in a process

Hi! I would like to know how to exctract data from a report to use it in a process. Let's say that I have a report which have following fields: id_person, name_person. And then, I want to make a process which introduce the id_person (from report) into an associative tabel. How can I reffer to the fields from my report?
I was thinking about something like that( this should be the code from my process)
insert into associative_table(id_person)
values(id_person) or
insert into associative_table(id_person)
values(Report_name.id_person) but it doesn't work....
Thank you very much.

Another option, use collections.
Create an on load process that loads all the rows you would have in your report into a collection:
begin
HTMLDB_COLLECTION.CREATE_OR_TRUNCATE_COLLECTION(
p_collection_name => 'ASSIGNED_CALENDAR_CONTACTS' );
for x in (SELECT CONTACT_ID, CONTACT_FNAME, CONTACT_LNAME
FROM CONTACT
WHERE InStr( pkg_CalendarMgr.f_FetchContactIDsForDay( TO_DATE( :P3_CALENDAR_DT, 'YYYYMMDD' ), 'OF' ), CONTACT_ID ) > 0 )
loop
htmldb_collection.add_member(p_collection_name => 'ASSIGNED_CALENDAR_CONTACTS',
p_c001 => x.CONTACT_ID,
p_c002 => x.CONTACT_FNAME,
p_c003 => x.CONTACT_LNAME);
end loop;
end;
Then, instead of your report selecting from the table, have it select from the collection, this way your display will match what's in the collection:
SELECT c001, c002 || Chr(32) || c003 CONTACT_NAME, 'Remove' remove
FROM htmldb_collections
WHERE collection_name = 'ASSIGNED_CALENDAR_CONTACTS'
ORDER BY c003, c002
Then you can have a button on the form that steps through the collection, one element at a time and does whatever you want it to.

Drill down report without using heirarchies in OBIEE11g

Hi,
Can we create multiple column drill down report without using hierarchies in OBIEE11g?
Kindly let me know the solution.
Thank you!
-Harshith

Yes, It can be done, but for each drill level you will require one seperate report. Drilling can be achieved using OBIEE Report Navigation.
For eg. If I have to create a drill report which starts from Year and goes to QTR and then to Month level. That means I have to create 3 reports.
1. A year report which will have report data at year level (Consider Year, Product, Order_QTY and Order_Amt are the columns)
2. A QTR report which will have report data at Qtr level. This report will have Year column in filter section as IS PROMPTED (Consider Qtr, Product, Order_QTY and Order_Amt are the columns).
3. A Monthly report which will have report data at Month level. This report will have Year, Qtr column in filter section as IS PROMPTED (Consider Month, Product, Order_QTY and Order_Amt are the columns).
Then we can go to Yearly report and put the OBIEE navigation on Year column and our target report will be QTR report. Similarly in Qtrly report put the OBIEE navigation on QTR column and our Target report will be Monthly report.
This way you can impliment drilling without hierarchy.
For step by step see below URL:
http://www.askjohnobiee.com/2012/07/how-to-drill-through-guided-navigation.html
Appriciate if you can mark Correct.
Thanks,
Kashi
Edited by: K N Yadav on 4 Jun, 2013 10:27 PM

How to call session directly in bdc without using SM35

how to call session directly in bdc without using SM35

HI
good
you r using the sm35 to see the session for calling teh session in your report
ATA:   messtab LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE ,
c_session LIKE   apqi-groupid VALUE 'Z3PL_CUST' ,
c_job      LIKE   tbtcjob-jobname VALUE 'Z3PL_JOB_CUST' ,
c_flag     TYPE    c VALUE 'X' ,
g_qid      TYPE apqi-qid      .
thanks
mrutyun

ALV Tree Report without using ABAP Objects

Hi all,
I want to know the name of a function module to create ALV Tree in SE38 as a report. I am required to create this ALV Tree Report without using ABAP OBJECTS. Can u pls help me as early as possible.

Hi
see this link
http://www.sapdev.co.uk/reporting/alv/alvtree.htm
*& Report ZBCALV_TREE
REPORT ZBCALV_TREE.
class cl_gui_column_tree definition load.
class cl_gui_cfw definition load.
data tree1 type ref to cl_gui_alv_tree.
data mr_toolbar type ref to cl_gui_toolbar.
include <icon>.
include bcalv_toolbar_event_receiver.
include bcalv_tree_event_receiver.
data: toolbar_event_receiver type ref to lcl_toolbar_event_receiver.
data: gt_VBAK type VBAK occurs 0,      "Output-Table
      gt_fieldcatalog type lvc_t_fcat, "Fieldcatalog
      ok_code like sy-ucomm.           "OK-Code
start-of-selection.
end-of-selection.
call screen 100.
*&      Module STATUS_0100 OUTPUT
      text
module STATUS_0100 output.
SET PF-STATUS 'MAIN'.
if tree1 is initial.
    perform Zinit_tree.
endif.
call method cl_gui_cfw=>flush.
endmodule.                 " STATUS_0100 OUTPUT
*&      Form Zinit_tree
      text
--> p1        text
<-- p2        text
form Zinit_tree .
perform Zbuild_fieldcatalog.
create container for alv-tree
data: l_tree_container_name(30) type c,
        l_custom_container type ref to cl_gui_custom_container.
l_tree_container_name = 'TREE1'.
if sy-batch is initial.
    create object l_custom_container
      exporting
            container_name = l_tree_container_name
      exceptions
            cntl_error                  = 1
            cntl_system_error           = 2
            create_error                = 3
            lifetime_error              = 4
            lifetime_dynpro_dynpro_link = 5.
    if sy-subrc <> 0.
      message x208(00) with 'ERROR'.                        "#EC NOTEXT
    endif.
endif.
create tree control
create object tree1
    exporting
        parent              = l_custom_container
        node_selection_mode = cl_gui_column_tree=>node_sel_mode_single
        item_selection      = 'X'
        no_html_header      = ''
        no_toolbar          = ''
    exceptions
        cntl_error                   = 1
        cntl_system_error            = 2
        create_error                 = 3
        lifetime_error               = 4
        illegal_node_selection_mode = 5
        failed                       = 6
        illegal_column_name          = 7.
if sy-subrc <> 0.
    message x208(00) with 'ERROR'.                          "#EC NOTEXT
endif.
create Hierarchy-header
data l_hierarchy_header type treev_hhdr.
perform zbuild_hierarchy_header changing l_hierarchy_header.
create info-table for html-header
data: lt_list_commentary type slis_t_listheader,
        l_logo             type sdydo_value.
perform Zbuild_comment using
                 lt_list_commentary
                 l_logo.
repid for saving variants
data: ls_variant type disvariant.
ls_variant-report = sy-repid.
create emty tree-control
call method tree1->set_table_for_first_display
    exporting
      is_hierarchy_header = l_hierarchy_header
      it_list_commentary = lt_list_commentary
      i_logo              = l_logo
      i_background_id     = 'ALV_BACKGROUND'
      i_save              = 'A'
      is_variant          = ls_variant
    changing
      it_outtab           = gt_VBAK "table must be emty !!
      it_fieldcatalog     = gt_fieldcatalog.
create hierarchy
perform Zcreate_hierarchy.
add own functioncodes to the toolbar
perform zchange_toolbar.
register events
perform zregister_events.
endform.                    " Zinit_tree
*&      Form Zbuild_fieldcatalog
      text
--> p1        text
<-- p2        text
form Zbuild_fieldcatalog .
get fieldcatalog
call function 'LVC_FIELDCATALOG_MERGE'
    exporting
      i_structure_name = 'VBAK'
    changing
      ct_fieldcat      = gt_fieldcatalog.
sort gt_fieldcatalog by scrtext_l.
change fieldcatalog
data: ls_fieldcatalog type lvc_s_fcat.
loop at gt_fieldcatalog into ls_fieldcatalog.
    case ls_fieldcatalog-fieldname.
      when 'AUART' .
        ls_fieldcatalog-no_out = 'X'.
        ls_fieldcatalog-key    = ''.
    endcase.
    modify gt_fieldcatalog from ls_fieldcatalog.
endloop.
endform.                    " Zbuild_fieldcatalog
*&      Form zbuild_hierarchy_header
      text
     <--P_L_HIERARCHY_HEADER text
form zbuild_hierarchy_header changing
                               p_hierarchy_header type treev_hhdr.
p_hierarchy_header-heading = 'Hierarchy Header'.          "#EC NOTEXT
p_hierarchy_header-tooltip =
                         'This is the Hierarchy Header !'. "#EC NOTEXT
p_hierarchy_header-width = 30.
p_hierarchy_header-width_pix = ''.
endform.                    " zbuild_hierarchy_header
*&      Form Zbuild_comment
      text
     -->P_LT_LIST_COMMENTARY text
     -->P_L_LOGO text
form Zbuild_comment   using
                       pt_list_commentary type slis_t_listheader
                       p_logo             type sdydo_value.
data: ls_line type slis_listheader.
LIST HEADING LINE: TYPE H
clear ls_line.
ls_line-typ = 'H'.
LS_LINE-KEY: NOT USED FOR THIS TYPE
ls_line-info = 'ALV-tree-demo: flight-overview'.          "#EC NOTEXT
append ls_line to pt_list_commentary.
STATUS LINE: TYPE S
clear ls_line.
ls_line-typ = 'S'.
ls_line-key = 'valid until'.                             "#EC NOTEXT
ls_line-info = 'January 29 1999'.                         "#EC NOTEXT
append ls_line to pt_list_commentary.
ls_line-key = 'time'.
ls_line-info = '2.00 pm'.                                 "#EC NOTEXT
append ls_line to pt_list_commentary.
ACTION LINE: TYPE A
clear ls_line.
ls_line-typ = 'A'.
LS_LINE-KEY: NOT USED FOR THIS TYPE
ls_line-info = 'actual data'.                             "#EC NOTEXT
append ls_line to pt_list_commentary.
p_logo = 'ENJOYSAP_LOGO'.
endform.                    " Zbuild_comment
*&      Form Zcreate_hierarchy
      text
--> p1        text
<-- p2        text
form Zcreate_hierarchy .
data: ls_vbak type vbak,
      lt_vbak type vbak occurs 0.
get data
select * from vbak into table lt_vbak
                        up to 200 rows .                "#EC CI_NOWHERE
sort lt_vbak by AUART.
add data to tree
data: l_AUART_key type lvc_nkey.
loop at lt_vbak into ls_vbak.
    on change of ls_vbak-AUART.
      perform Zadd_AUART_line using   ls_vbak
                              changing l_AUART_key.
    endon.
endloop.
calculate totals
call method tree1->update_calculations.
this method must be called to send the data to the frontend
call method tree1->frontend_update.
endform.                    " Zcreate_hierarchy
*&      Form Zadd_AUART_line
      text
     -->P_LS_vbak text
     -->P_0379   text
     <--P_L_AUART_KEY text
form Zadd_AUART_line using    p_ls_vbak type vbak
                               p_relat_key type lvc_nkey
                     changing p_node_key type lvc_nkey.
data: l_node_text type lvc_value,
        ls_vbak type vbak.
set item-layout
data: lt_item_layout type lvc_t_layi,
        ls_item_layout type lvc_s_layi.
ls_item_layout-t_image = '@3P@'.
ls_item_layout-fieldname = tree1->c_hierarchy_column_name.
ls_item_layout-style   =
                        cl_gui_column_tree=>style_intensifd_critical.
append ls_item_layout to lt_item_layout.
add node
l_node_text = p_ls_vbak-AUART.
data: ls_node type lvc_s_layn.
ls_node-n_image   = space.
ls_node-exp_image = space.
call method tree1->add_node
    exporting
      i_relat_node_key = p_relat_key
      i_relationship   = cl_gui_column_tree=>relat_last_child
      i_node_text      = l_node_text
      is_outtab_line   = ls_vbak
      is_node_layout   = ls_node
      it_item_layout   = lt_item_layout
    importing
      e_new_node_key   = p_node_key .
endform.                    " Zadd_AUART_line
*&      Form zchange_toolbar
      text
--> p1        text
<-- p2        text
form zchange_toolbar .
get toolbar control
call method tree1->get_toolbar_object
    importing
      er_toolbar = mr_toolbar.
check not mr_toolbar is initial.
add seperator to toolbar
call method mr_toolbar->add_button
    exporting
      fcode     = ''
      icon      = ''
      butn_type = cntb_btype_sep
      text      = ''
      quickinfo = 'This is a Seperator'.                    "#EC NOTEXT
add Standard Button to toolbar (for Delete Subtree)
call method mr_toolbar->add_button
    exporting
      fcode     = 'DELETE'
      icon      = '@18@'
      butn_type = cntb_btype_button
      text      = ''
      quickinfo = 'Delete subtree'.                         "#EC NOTEXT
add Dropdown Button to toolbar (for Insert Line)
call method mr_toolbar->add_button
    exporting
      fcode     = 'INSERT_LC'
      icon      = '@17@'
      butn_type = cntb_btype_dropdown
      text      = ''
      quickinfo = 'Insert Line'.                            "#EC NOTEXT
set event-handler for toolbar-control
create object toolbar_event_receiver.
set handler toolbar_event_receiver->on_function_selected
                                                      for mr_toolbar.
set handler toolbar_event_receiver->on_toolbar_dropdown
                                                      for mr_toolbar.
endform.                    " zchange_toolbar
*&      Form zregister_events
      text
--> p1        text
<-- p2        text
form zregister_events .
define the events which will be passed to the backend
data: lt_events type cntl_simple_events,
          l_event type cntl_simple_event.
define the events which will be passed to the backend
l_event-eventid = cl_gui_column_tree=>eventid_expand_no_children.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_checkbox_change.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_header_context_men_req.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_node_context_menu_req.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_item_context_menu_req.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_header_click.
append l_event to lt_events.
l_event-eventid = cl_gui_column_tree=>eventid_item_keypress.
append l_event to lt_events.
call method tree1->set_registered_events
    exporting
      events                    = lt_events
    exceptions
      cntl_error                = 1
      cntl_system_error         = 2
      illegal_event_combination = 3.
if sy-subrc <> 0.
    message x208(00) with 'ERROR'.                          "#EC NOTEXT
endif.
set Handler
data: l_event_receiver type ref to lcl_tree_event_receiver.
create object l_event_receiver.
set handler l_event_receiver->handle_node_ctmenu_request
                                                        for tree1.
set handler l_event_receiver->handle_node_ctmenu_selected
                                                        for tree1.
set handler l_event_receiver->handle_item_ctmenu_request
                                                        for tree1.
set handler l_event_receiver->handle_item_ctmenu_selected
                                                        for tree1.
endform.                    " zregister_events
*&      Module USER_COMMAND_0100 INPUT
      text
module USER_COMMAND_0100 input.
ok_code = sy-ucomm.
clear sy-ucomm.
case ok_code.
    when 'EXIT' or 'BACK' or 'CANC'.
      perform Zexit_program.
    when others.
      call method cl_gui_cfw=>dispatch.
endcase.
clear ok_code.
call method cl_gui_cfw=>flush.
endmodule.                 " USER_COMMAND_0100 INPUT
*&      Form Zexit_program
      text
--> p1        text
<-- p2        text
form Zexit_program .
call method tree1->free.
leave program.
endform.                    " Zexit_program
<b>Reward if usefull</b>

How to display ICONS in normal report without using icons table

Similar Messages

Maybe you are looking for