在alv list小计之后输出分割线

程序代码:
  1. *---type pools
  2. TYPE-POOLS: slis.
  3. *---internal tables
  4. DATA: BEGIN OF it_flight OCCURS 0,
  5.        carrid  LIKE sflight-carrid,
  6.        connid   LIKE sflight-connid,
  7.        fldate   LIKE sflight-fldate,
  8.        seatsmax LIKE sflight-seatsmax,
  9.        seatsocc LIKE sflight-seatsocc,
  10.       END OF it_flight,
  11. *--internal tables for ALV
  12.       it_fieldcat TYPE  slis_t_fieldcat_alv,
  13.       wa_fcat LIKE LINE OF it_fieldcat,
  14.       layout TYPE  slis_layout_alv,
  15.       it_sort type  slis_t_sortinfo_alv,
  16.       wa_sort like line of it_sort.
  17. *---start-of-selection .
  18. START-OF-SELECTION.
  19. CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
  20.   EXPORTING
  21.     i_program_name         = sy-repid
  22.     i_internal_tabname     = 'IT_FLIGHT'
  23.     i_inclname             = sy-repid
  24.   CHANGING
  25.     ct_fieldcat            = it_fieldcat
  26.   EXCEPTIONS
  27.     inconsistent_interface = 1
  28.     program_error          = 2.
  29. *----get data
  30.   SELECT carrid
  31.          connid
  32.          fldate
  33.          seatsmax
  34.          seatsocc
  35.    FROM sflight
  36.    INTO CORRESPONDING FIELDS OF TABLE it_flight
  37.    UP TO 20 ROWS.
  38.   .
  39.   wa_fcat-do_sum = 'X'.
  40.   MODIFY it_fieldcat FROM wa_fcat TRANSPORTING do_sum
  41.    WHERE fieldname = 'SEATSOCC' .
  42.   wa_sort-fieldname = 'CARRID'.
  43.   wa_sort-group = 'UL'.  "显示分割线
  44.   wa_sort-up = 'X'.
  45.   APPEND wa_sort TO it_sort.
  46.   wa_sort-fieldname = 'CONNID'.
  47.   wa_sort-subtot = 'X'.
  48.   wa_sort-up = 'X'.
  49.   APPEND wa_sort TO it_sort.

  50.   CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
  51.     EXPORTING
  52.       i_callback_program = sy-repid
  53.       is_layout          = layout
  54.       it_fieldcat        = it_fieldcat
  55.       it_sort            = it_sort
  56.     TABLES
  57.       t_outtab           = it_flight
  58.     EXCEPTIONS
  59.       program_error      = 1.
复制代码


程序执行效果:
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

打赏作者

SAP剑客

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

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

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

打赏作者

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

抵扣说明:

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

余额充值