sap 双击文本字段链接到tTCODE

最新推荐文章于 2025-07-08 19:21:23 发布

转载最新推荐文章于 2025-07-08 19:21:23 发布 · 1.1k 阅读

文章标签：

#sap 双击文本字段链接到tTCODE

本文详细介绍了屏幕游标结构类型的定义及使用方法，并通过案例展示了如何在事务处理中获取并利用屏幕游标参数来调用特定交易，实现自动化流程。

CALL SCREEN 100.

*定义屏幕游标结构类型
TYPES:BEGIN OF t_cursor,
        fname LIKE d021s-fnam,
        pos   LIKE sy-stepl,
        value LIKE d021s-fnam,
        tc    LIKE dd04l-rollname,
        tcsec LIKE dd04l-rollname,
        line  LIKE sy-stepl,
      END OF t_cursor.

*&---------------------------------------------------------------------*
*&      Module  STATUS_0100  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE status_0100 OUTPUT.
  SET PF-STATUS 'GUI01'.
*  SET TITLEBAR 'xxx'.
ENDMODULE.                 " STATUS_0100  OUTPUT
*&---------------------------------------------------------------------*
*&      Module  USER_COMMAND_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE user_command_0100 INPUT.
  DATA: l_cursor TYPE t_cursor.   "定义游标类型

  CASE sy-ucomm.
    WHEN 'CLICK'.
      "获取当前屏幕游标所在对象参数值
      GET CURSOR FIELD l_cursor-fname LINE l_cursor-pos
       AREA l_cursor-tc VALUE l_cursor-value.
      "传递料号调用 TCode:MM03
      SET PARAMETER ID: 'MAT' FIELD l_cursor-value.
      CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
    WHEN 'EXIT'.
      LEAVE PROGRAM.
  ENDCASE.