POPUP_WITH_TABLE_DISPLAY

最新推荐文章于 2026-05-18 07:17:20 发布

原创最新推荐文章于 2026-05-18 07:17:20 发布 · 1.3k 阅读

0 ·

本内容遵循CC 4.0 BY-SA版权协议

收录于

SAP&Function

当前文章被收录于：

SAP&Function

184 篇文章 10 人学习

订阅专栏查看详情

当前文章被以下社区和专栏收录：

本文介绍了一个 ABAP 程序中如何创建并操作内部表的具体实例。该示例展示了如何定义内部表结构、填充数据、调用显示功能，并获取用户选择的行数据进行后续处理。

DATA: BEGIN OF itab_nba OCCURS 0,
        a TYPE c LENGTH 10,
        b TYPE c LENGTH 10,
      END OF itab_nba.
DATA: counts LIKE  sy-tabix.

itab_nba-a = '11'.
itab_nba-b = '22'.
APPEND itab_nba.

itab_nba-a = '112'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '13'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '14'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '111'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '11'.
itab_nba-b = '22'.
APPEND itab_nba.

itab_nba-a = '112'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '13'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '14'.
itab_nba-b = '222'.
APPEND itab_nba.

itab_nba-a = '111'.
itab_nba-b = '222'.
APPEND itab_nba.

CALL FUNCTION 'POPUP_WITH_TABLE_DISPLAY'
  EXPORTING
    endpos_col   = 50    "右下角X
    endpos_row   = 10    "右下角Y
    startpos_col = 10    "左上角X
    startpos_row = 5     "左上角Y
    titletext    = 'Please Choose Your Entry'
  IMPORTING
    choise       = counts   "返回選中行
  TABLES
    valuetab     = itab_nba  "可選擇的表
  EXCEPTIONS
    break_off    = 1
    OTHERS       = 2.
IF counts NE 0.
  READ TABLE itab_nba INDEX counts.
  WRITE: itab_nba-a.
ENDIF.
CLEAR :itab_nba,counts.
REFRESH:itab_nba.

标签

#POPUP_WITH_TABLE_DISPLAY