ABAP-ALV学习(三)增加热键并跳转界面

学习目标:

ALV增加热键,跳转到对应单据


学习内容:

1.接着上一篇,在采购订单编号字段上增加热键
2.点击单号热键进行跳转ME23N
3.点击物料键进行跳转MM03


示例代码:

FORM frm_fill_fieldcat .
"新增
  IF gs_fieldcat-fieldname = 'EBELN'  or gs_fieldcat-fieldname = 'MATNR'.
       gs_fieldcat-hotspot = 'X'.  "热点事件
    ENDIF.
ENDFORM.


FORM user_command USING u_ucomm LIKE sy-ucomm
                    rs_selfield TYPE slis_selfield.

  DATA: lo_grid TYPE REF TO cl_gui_alv_grid,
        lv_code LIKE sy-ucomm.
  DATA: ls_stable TYPE lvc_s_stbl.

  " 刷新alv屏幕数据
  CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
    IMPORTING
      e_grid = lo_grid.

  CALL METHOD lo_grid->check_changed_data.
  CASE u_ucomm.
    WHEN '&IC1' .
      IF rs_selfield-fieldname = 'EBELN'."跳转的语法
        SET PARAMETER ID 'BES' FIELD rs_selfield-value.
        CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
       elseif rs_selfield-fieldname = 'MATNR'.
        SET PARAMETER ID 'MAT' FIELD rs_selfield-value.
        CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
      ENDIF.
  ENDCASE.

ENDFORM.

学习产出:

热键的字段下方会有下划线显示,在显示报表的时候可以快捷的跳转到对应单据进行查看。

  • 2
    点赞
  • 12
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
ABAP中,可以通过使用ALV列表视图(ALV Grid)来为特定的单元格添加颜色提示。下面是一个简单的示例代码,演示如何在ALV Grid中添加颜色提示: 1. 首先,你需要在程序的顶部包含以下两个库: ```abap TYPE-POOLS: slis. INCLUDE: slis. ``` 2. 然后,在程序中定义一个内部表来存储显示的数据: ```abap DATA: lt_data TYPE TABLE OF spfli. ``` 3. 接下来,使用函数模块REUSE_ALV_GRID_DISPLAY来显示ALV Grid: ```abap CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = sy-repid TABLES t_outtab = lt_data. ``` 4. 然后,使用函数模块REUSE_ALV_FIELDCATALOG_MERGE来定义字段目录: ```abap CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = sy-repid i_internal_tabname = 'SPFLI' CHANGING ct_fieldcat = gt_fieldcat[] EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3. ``` 5. 接下来,在字段目录中定义一个颜色字段,并设置其属性: ```abap LOOP AT gt_fieldcat ASSIGNING FIELD-SYMBOL(<fs_fieldcat>). IF <fs_fieldcat>-fieldname = 'CARRID'. <fs_fieldcat>-color-col = 'C'. <fs_fieldcat>-emphasize = 'X'. ENDIF. ENDLOOP. ``` 在上述代码中,我们为字段'CARRID'定义了一个颜色字段,并设置其颜色属性为'C',以及强调属性为'X'。 6. 最后,通过调用函数模块REUSE_ALV_GRID_DISPLAY,显示带有颜色提示的ALV Grid: ```abap CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = sy-repid TABLES t_outtab = lt_data fieldcat = gt_fieldcat. ``` 以上就是一个简单的示例,演示了如何在ABAP中使用ALV Grid来添加颜色提示。你可以根据自己的需求进行进一步的定制和扩展。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

惰小懒

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值