Hotspot doubt

[Former Member]

Hi,

Is it possible to create hotspot for two or more fields at the same ALV Grid? If yes, how the user_command perform knows each one to do different "call transaction" by set id parameter command.

E.g.:

Click on EBAN-BANFN column -

---

> Call transaction ME23N

Click on EKKO-EBELP column -

---

> Call transaction ME53N

Thanks

Michel Khouri

[Former Member]

Hi,

Is it possible to create hotspot for two or more fields at the same ALV Grid? If yes, how the user_command perform knows each one to do different "call transaction" by set id parameter command.

E.g.:

Click on EBAN-BANFN column -

---

> Call transaction ME23N

Click on EKKO-EBELP column -

---

> Call transaction ME53N

Thanks

Michel Khouri

[Former Member]

Hi,

You can use the SELFIELD-FIELDNAME to check which field has been clicked..

Check this example..check the code which is marked in bold...

TYPE-POOLS: slis.

DATA: gt_fieldcat TYPE slis_t_fieldcat_alv.

DATA: BEGIN OF wa_ekko,

ebeln like ekko-ebeln,

ekorg like ekko-ekorg,

ekgrp like ekko-ekgrp,

END OF wa_ekko.

DATA: v_repid TYPE syrepid.

v_repid = sy-repid.

DATA it_ekko LIKE STANDARD TABLE OF wa_ekko WITH HEADER LINE.

SELECT * UP TO 100 ROWS

FROM ekko

INTO CORRESPONDING FIELDS OF TABLE it_ekko.

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

i_program_name = v_repid

i_internal_tabname = 'WA_EKKO'

i_inclname = v_repid

CHANGING

ct_fieldcat = gt_fieldcat.

• have hotspot for a PO.

DATA: s_fieldcat LIKE LINE OF gt_fieldcat.

s_fieldcat-hotspot = 'X'.

MODIFY gt_fieldcat FROM s_fieldcat TRANSPORTING hotspot

WHERE fieldname = 'EBELN'.

• Pass the program.

v_repid = sy-repid.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

i_callback_program = v_repid

it_fieldcat = gt_fieldcat

i_callback_user_command = 'USER_COMMAND'

TABLES

t_outtab = it_ekko.

----

---

• FORM display_detail *

----

---

• ........ *

----

---

• --> UCOMM *

• --> SELFIELD *

----

---

FORM user_command USING ucomm LIKE sy-ucomm

selfield TYPE slis_selfield.

<b> IF ucomm = '&IC1' AND selfield-fieldname = 'EBELN'.</b>

READ TABLE it_ekko INDEX selfield-tabindex.

IF sy-subrc = 0.

SET PARAMETER ID 'BES' FIELD it_ekko-ebeln.

CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.

ENDIF.

ENDIF.

ENDFORM.

Thanks,

Naren