hotspot

Former Member — Wed, 25 Apr 2007 21:18:48 GMT

as I can call a ALV within a table control from an icon, depending if it has or non information, such icon activates?

Re: hotspot

Former Member — Wed, 25 Apr 2007 21:58:53 GMT

What? please exaplan better, what do you want?

Re: hotspot

sonu_p2 — Thu, 26 Apr 2007 04:27:47 GMT

Hello jaime,

Check out the code below :-

REPORT zdocking_splitter.

TABLES: ekko, ekpo, makt.

TYPE-POOLS: slis.

TYPE-POOLS: icon.

User Commands on Screens.

DATA: ok_code TYPE sy-ucomm,

Object references

ref_custom_container TYPE REF TO cl_gui_custom_container,

l_docking_left TYPE REF TO cl_gui_docking_container,

l_docking_top TYPE REF TO cl_gui_docking_container,

l_docking_bottom TYPE REF TO cl_gui_docking_container,

l_docking_bottom2 TYPE REF TO cl_gui_docking_container,

l_container_top TYPE REF TO cl_gui_container,

l_container_bottom TYPE REF TO cl_gui_container,

g_grid_ref1 TYPE REF TO cl_gui_alv_grid,

g_grid_ref2 TYPE REF TO cl_gui_alv_grid,

g_grid_ref3 TYPE REF TO cl_gui_alv_grid.

Variable for Filling the Field Catalog

DATA: fcat TYPE lvc_t_fcat,

lt_fieldcat TYPE lvc_t_fcat,

lt_fieldcat1 TYPE lvc_t_fcat,

lt_fieldcat2 TYPE lvc_t_fcat,

ls_layout TYPE lvc_s_layo.

CONSTANTS: c_marked TYPE c VALUE 'X'.

DATA: counter TYPE i VALUE 0.

*Internal Tables.

DATA: BEGIN OF itab_ekko OCCURS 0,

id TYPE icont-id,

ebeln TYPE ekko-ebeln,

END OF itab_ekko.

DATA: wa_ekko LIKE LINE OF itab_ekko.

DATA: BEGIN OF itab_ekpo OCCURS 0,

ebeln TYPE ekpo-ebeln,

ebelp TYPE ekpo-ebelp,

matnr TYPE ekpo-matnr,

meins TYPE ekpo-meins,

menge TYPE ekpo-menge,

END OF itab_ekpo.

DATA: BEGIN OF itab_makt OCCURS 0,

matnr TYPE ekpo-matnr,

maktx TYPE makt-maktx,

END OF itab_makt.

Selection Screen Parameters.

SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

SELECT-OPTIONS: s_ebeln FOR ekpo-ebeln.

SELECTION-SCREEN END OF BLOCK b1.

----

CLASS lcl_event_control DEFINATION

----

CLASS lcl_event_control DEFINITION.

PUBLIC SECTION.

METHODS handle_hotspot_click

FOR EVENT hotspot_click OF cl_gui_alv_grid

IMPORTING e_column_id es_row_no.

ENDCLASS. "lcl_event_control DEFINATION

----

CLASS lcl_event_control IMPLEMENTATION

----

CLASS lcl_event_control IMPLEMENTATION.

METHOD handle_hotspot_click.

PERFORM handle_double_click USING es_row_no

e_column_id.

ENDMETHOD. "handle_hotspot_click

ENDCLASS. "lcl_event_control IMPLEMENTATION

******************************************************************************

DATA: gr_event_handler TYPE REF TO lcl_event_control.

*******************************************************************************

AT SELECTION-SCREEN.

IF NOT s_ebeln IS INITIAL.

SELECT ebeln FROM ekko

INTO CORRESPONDING FIELDS OF TABLE itab_ekko

WHERE ebeln IN s_ebeln.

IF sy-subrc NE 0.

MESSAGE e002(zsplit).

ENDIF.

ELSE.

MESSAGE e001(zsplit).

ENDIF.

*************************************************************************

START-OF-SELECTION.

CLEAR itab_ekko.

REFRESH itab_ekko.

SELECT ebeln FROM ekko

INTO CORRESPONDING FIELDS OF TABLE itab_ekko

WHERE ebeln IN s_ebeln.

LOOP AT itab_ekko INTO wa_ekko.

MOVE '@B0@' TO wa_ekko-id.

MODIFY itab_ekko FROM wa_ekko.

ENDLOOP.

CALL SCREEN 100.

************************************************************************

*
E N D O F M A I N P R O G R A M *
*

************************************************************************

Reward points if helpful :-)

Thanks,

Sachin

topic hotspot in Application Development and Automation Discussions

hotspot

Re: hotspot

Re: hotspot