SAP abap alv报表实例

这是一个sap alv报表实例

REPORT ztest005.*定义类型组
TYPE-POOLS: abap,slis.*定义ALV变量
DATA : lt_fieldcat TYPE slis_t_fieldcat_alv,wt_fieldcat TYPE slis_fieldcat_alv,ls_layout TYPE slis_layout_alv.
*定义表
TABLES:bkpf.*定义输出表结构
TYPES:BEGIN OF ts_halv,bukrs      TYPE bkpf-bukrs, "CHAR 4 0 0 Company Codegjahr      TYPE bkpf-gjahr, "NUMC  4 0 0 Fiscal Yearbldat      TYPE bkpf-bldat, "DATS  8 0 0 Posting Date in the Documentbelnr      TYPE bkpf-belnr, "CHAR  10  0 0 Accounting Document NumberEND OF   ts_halv.*定义内表和工作区
DATA:ti_halv      TYPE TABLE OF ts_halv,tw_halv      TYPE ts_halv.*设置查询屏幕SELECTION-SCREEN BEGIN OF BLOCK bl WITH FRAME TITLE TEXT-s01.SELECT-OPTIONS:s_bukrs  FOR bkpf-bukrs DEFAULT 'SG10',s_gjahr  FOR bkpf-gjahr DEFAULT sy-datum+0(4),s_bldat  FOR bkpf-bldat, "OBLIGATORY DEFAULT sy-datum,s_belnr  FOR bkpf-belnr.
SELECTION-SCREEN END OF BLOCK bl.*设置查询屏幕后的操作
START-OF-SELECTION.
*获取采购发票校验差异凭证PERFORM frm_get_data.PERFORM frm_set_data.PERFORM frm_display_data.
END-OF-SELECTION.*读取数据
FORM frm_get_data.
SELECT bukrs gjahr bldat belnrFROM BKPFINTO CORRESPONDING FIELDS OF TABLE ti_halv.
ENDFORM.
*处理数据
*ALV格式设置
FORM frm_set_data.ls_layout-zebra = 'X'.ls_layout-detail_popup = 'X'.ls_layout-detail_titlebar = '详细信息'.ls_layout-f2code = '&ETA'.ls_layout-colwidth_optimize = 'X'.CLEAR: ls_layout,lt_fieldcat,wt_fieldcat.PERFORM frm_edit_fieldcat using:'1'  'bukrs' 'ti_halv' '公司',  "这里第三个参数都是it_data，所以你可以在子程序里直接赋值给第三个参数，就不用在这传参。。'2'  'gjahr' 'ti_halv' '年度','3'  'bldat' 'ti_halv' '日期','4'  'belnr' 'ti_halv' '凭证'.ls_layout-colwidth_optimize = 'X'. "列宽最优显示
ENDFORM.*ALV数据显示
FORM frm_display_data.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'EXPORTING
*     I_INTERFACE_CHECK                 = ' '
*     I_BYPASSING_BUFFER                = ' '
*     I_BUFFER_ACTIVE                   = ' '
*     I_CALLBACK_PROGRAM                = ' '
*     I_CALLBACK_PF_STATUS_SET          = ' '
*     I_CALLBACK_USER_COMMAND           = ' '
*     I_CALLBACK_TOP_OF_PAGE            = ' '
*     I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
*     I_CALLBACK_HTML_END_OF_LIST       = ' '
*     I_STRUCTURE_NAME                  =
*     I_BACKGROUND_ID                   = ' '
*     I_GRID_TITLE                      =
*     I_GRID_SETTINGS                   =IS_LAYOUT                         = ls_layoutIT_FIELDCAT                       = lt_fieldcat
*     IT_EXCLUDING                      =
*     IT_SPECIAL_GROUPS                 =
*     IT_SORT                           =
*     IT_FILTER                         =
*     IS_SEL_HIDE                       =
*     I_DEFAULT                         = 'X'
*     I_SAVE                            = ' '
*     IS_VARIANT                        =
*     IT_EVENTS                         =
*     IT_EVENT_EXIT                     =
*     IS_PRINT                          =
*     IS_REPREP_ID                      =
*     I_SCREEN_START_COLUMN             = 0
*     I_SCREEN_START_LINE               = 0
*     I_SCREEN_END_COLUMN               = 0
*     I_SCREEN_END_LINE                 = 0
*     I_HTML_HEIGHT_TOP                 = 0
*     I_HTML_HEIGHT_END                 = 0
*     IT_ALV_GRAPHICS                   =
*     IT_HYPERLINK                      =
*     IT_ADD_FIELDCAT                   =
*     IT_EXCEPT_QINFO                   =
*     IR_SALV_FULLSCREEN_ADAPTER        =
*   IMPORTING
*     E_EXIT_CAUSED_BY_CALLER           =
*     ES_EXIT_CAUSED_BY_USER            =TABLESt_outtab                          = ti_halvEXCEPTIONSPROGRAM_ERROR                     = 1OTHERS                            = 2.IF sy-subrc <> 0.
* Implement suitable error handling hereENDIF.
ENDFORM.FORM frm_edit_fieldcat  USING p_col_pos   TYPE anyp_fieldname TYPE anyp_tabname   TYPE anyp_seltext   TYPE any.wt_fieldcat-col_pos   = p_col_pos.wt_fieldcat-fieldname = p_fieldname.wt_fieldcat-tabname   = p_tabname.wt_fieldcat-seltext_m = p_seltext.APPEND wt_fieldcat TO lt_fieldcat.CLEAR wt_fieldcat.
ENDFORM.                    " FRM_EDIT_FIELDCAT

SAP abap alv报表实例相关推荐

如何在 SAP ABAP ALV 报表里以交通灯的方式显示某一列的值
在本教程的这篇步骤里,我们介绍了 ALV 层次顺序表的输出实现明细. SAP ABAP ALV 层次顺序表如何使用双表头(Multiple Headers)进行数据输出本文介绍如何在 ALV 层次顺 ...
具备自动刷新功能的 SAP ABAP ALV 报表
该报表主要结构如下,完整代码见文末. f_call_rfc_wait: 发起异步调用,等待 1 秒钟,来模拟每隔 1 秒刷新屏幕的效果. f_display_data: ALV 常规操作,调用函数 R ...
给 ABAP ALV 报表的数据行增添颜色效果试读版
零基础 ABAP 学习教程系列文章的目录 ABAP 标准培训教程 BC400 学习笔记之一:ABAP 服务器的架构和一个典型的 ABAP 程序结构介绍 ABAP 标准培训教程 BC400 学习笔记之二 ...
SAP ABAP ALV控制显示的网格中的每一个字段属性
字段目录是用来控制ALV显示的网格中每个字段的属性的,比如字段的顺序,对齐方式,可编辑状态,颜色,等等.常用的字段如下: row_pos:默认值为0,可选值为1.2.3,既最大分3级别显示 field ...
48 行代码给 ABAP ALV 报表的数据行增添颜色效果
按照前一步骤 27 行代码开发一个最简单的 SAP ALV 报表完成之后,我们仅使用 27 行代码,就得到了如下图所示的 ABAP ALV 输出: 本步骤我们在此基础上,为这个朴素的 ALV 报表,增 ...
SAP ABAP ALV（LVC）的一个自定义事件（F4帮助事件，回车ENTER按钮事件）的一个实例
1. 定义和注册事件接受器类 *----------------------------------------------------------------------* * CLASS LCL_ ...
SAP ABAP ALV构建动态输出列与构建动态内表
首先,简单说明一下要用到的表类型.类.函数: 表类型 LVC_T_FCAT-(存放自定义列属性的表类型,一般用到的属性有:FIELDNAME.OUTPUTLEN.DATATYPE.INTTYPE.IN ...
SAP ABAP ALV 整理
本人诚心接ABAP远程开发任务,价格公道,有需要的联系我,欢迎个人,甲方爸爸,乙方私信联系. 客制化的F4帮助 DEMO 如下 AT SELECTION-SCREEN ON VALUE-REQUEST ...
SAP ABAP ALV list background render
Created by Jerry Wang, last modified on Jun 23, 2014 以后台方式运行report BCALV_GRID_DEMO: 该background job运 ...

SAP abap alv报表实例

SAP abap alv报表实例相关推荐

最新文章

热门文章