二维码

[fmalv] 在假脱机中隐藏ALV list的头部提示等打印信息

Twilight发表于 2014-08-28 22:19Twilight 最后回复于 2014-08-28 22:19 [复制链接] 4239 0

当我们用function module:REUSE_ALV_LIST_DISPLAY执行alv list打印时,在假脱机中会如下显示(我们可参照程序SAPBC405_408OTHD_FB_ALV_LIST):
t-code:sp01
SPOOL 1.jpg
执行F8
SPOOL 2.jpg
SPOOL 3.jpg
这里系统sbook是空表,所以没数据;我们会看到有额外的附加记录条数等信息,但是实际打印时并不需要打印输出。
我们可以cory程序:SAPBC405_408OTHD_FB_ALV_LIST ,然后做如下处理
  1. ***add begin of***
  2. TYPE-POOLS:SLIS.
  3. DATA:W_ALV_PRINT_CAT TYPE SLIS_PRINT_ALV.
  4. ***add end of***
  5. DATA: it_sbook TYPE TABLE OF sbook,
  6.       wa_sbook TYPE sbook.

  7. SELECT-OPTIONS: so_car FOR wa_sbook-carrid,
  8.                 so_con FOR wa_sbook-connid,
  9.                 so_dat FOR wa_sbook-fldate.

  10. SELECT * FROM sbook
  11. INTO TABLE it_sbook
  12. WHERE carrid IN so_car
  13.   AND connid IN so_con
  14.   AND fldate IN so_dat.
  15. ***add begin of***
  16. W_ALV_PRINT_CAT-NO_PRINT_LISTINFOS = 'X'.
  17. ***add end of***
  18. CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
  19. EXPORTING
  20. *   I_INTERFACE_CHECK              = ' '
  21. *   I_BYPASSING_BUFFER             =
  22. *   I_BUFFER_ACTIVE                = ' '
  23. *   I_CALLBACK_PROGRAM             = ' '
  24. *   I_CALLBACK_PF_STATUS_SET       = ' '
  25. *   I_CALLBACK_USER_COMMAND        = ' '
  26.    i_structure_name               = 'SBOOK'
  27. *   IS_LAYOUT                      =
  28. *   IT_FIELDCAT                    =
  29. *   IT_EXCLUDING                   =
  30. *   IT_SPECIAL_GROUPS              =
  31. *   IT_SORT                        =
  32. *   IT_FILTER                      =
  33. *   IS_SEL_HIDE                    =
  34. *   I_DEFAULT                      = 'X'
  35. *   I_SAVE                         = ' '
  36. *   IS_VARIANT                     =
  37. *   IT_EVENTS                      =
  38. *   IT_EVENT_EXIT                  =
  39.    IS_PRINT                       = W_ALV_PRINT_CAT "add
  40. *   IS_REPREP_ID                   =
  41. *   I_SCREEN_START_COLUMN          = 0
  42. *   I_SCREEN_START_LINE            = 0
  43. *   I_SCREEN_END_COLUMN            = 0
  44. *   I_SCREEN_END_LINE              = 0
  45. * IMPORTING
  46. *   E_EXIT_CAUSED_BY_CALLER        =
  47. *   ES_EXIT_CAUSED_BY_USER         =
  48.   TABLES
  49.     t_outtab                       = it_sbook
  50. * EXCEPTIONS
  51. *   PROGRAM_ERROR                  = 1
  52. *   OTHERS                         = 2
  53.           .
  54. IF sy-subrc <> 0.
  55. * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
  56. *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  57. ENDIF.
复制代码

执行程序将该报表发送到假脱机中,我们会发现额外的附加记录条数等信息 被隐藏
SPOOL 4.jpg
回复

使用道具 举报

快速回帖

本版积分规则
您需要登录后才可以回帖 登录 | 注册有礼

快速回复 返回顶部 返回列表