*-----------------------雙擊后轉到事務ME23N顯示詳細信息------------------*
FORM user_command USING r_ucomm? LIKEsy-ucomm"雙擊
???????????????????????rs_selfield TYPE slis_selfield."行數
*? rs_selfield-refresh ='X'.???"控制grid產生新屏幕
? IF r_ucomm = '&IC1'."雙擊
??? READ TABLEitab_a? INDEX rs_selfield-tabindex.
*??? ifrs_selfield-FIELDNAME = 'EBELN'.
???rs_selfield-value = itab_a-ebeln.
??? SETPARAMETER ID 'BES' FIELD rs_selfield-value . "BES;傳遞的參數ID
??? CALLTRANSACTION 'ME23N' AND SKIP FIRST SCREEN."跳過第一個屏幕
*???endif.
? ENDIF.
ENDFORM.???????????????????"user_command

?

*-------------------------雙擊后彈出信息框顯示詳細信息-------------------*

FORM user_command USING r_ucomm TYPE sy-ucomm
???????????????????????rs_selfield TYPE slis_selfield.
? CASE r_ucomm.? " Linepicking
??? WHEN'&IC1'.
?????DATA msg TYPE string.
?????FIELD-SYMBOLS <line> LIKE LINE OFitab_a.??"定義局部字段符號<LINE>
?????READ TABLE itab_a INDEX rs_selfield-tabindex ASSIGNING<line>.?"ASSIGNING:將數據對象分配給字段符號
?????CHECK sy-subrc = 0.

?

?????CONCATENATE 'You pick line'<line>-text INTO msg SEPARATED BYspace.? "連接字符串
?????MESSAGE msg TYPE 'I'.
??? WHENOTHERS.
? ENDCASE.
ENDFORM.???????????????????"user_command

?

注：ZR_MM_006有比較詳細的例程。

總結

以上是生活随笔為你收集整理的ALV报表中处理双击行项目事件的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。