ABAP ALV
ALV参数:
I_INTERFACE_CHECK: 检查接口一致性
I_BYPASSING_BUFFER: 是否使用缓存
I_BUFFER_ACTIVE：是否**缓存，如果每次显示ALV都是相同的字段目录，则该字段目录会被放到一特殊的缓存里，加快显示速度。
I_CALLBACK_PROGRAM：调用ALV的程序名称
I_CALLBACK_PF_STATUS_SET：ALV工具栏
I_CALLBACK_USER_COMMAND：ALV User Command Subroutine（子程序），实现对应菜单项及相应事件功能
I_CALLBACK_TOP_OF_PAGE：ALV抬头内容信息
I_CALLBACK_HTML_TOP_OF_PAGE：ALV HTML格式抬头内容信息
I_CALLBACK_HTML_END_OF_LIST：ALV HTML格式页脚内容信息
I_STRUCTURE_NAME：为输出表数据结构的命名，指定了这个参数，域目录将会自动生成
I_BACKGROUND_ID：ALV背景图片Object ID
I_GRID_TITLE：ALV 标题
I_GRID_SETTINGS：GRID信息
IS_LAYOUT / IS_LAYOUT_LVC：ALV输出布局样式
IT_FIELDCAT / IT_FIELDCAT_LVC：设定显示的项目名称及输出设定
IT_EXCLUDING：隐藏设置的ALV工具栏
IT_SPECIAL_GROUPS / IT_SPECIAL_GROUPS_LVC：若内表中一些字段通过SP_GROUP被分组在一起，必须为这些组传递组文本内表
IT_SORT / IT_SORT_LVC：ALV排序设置
IT_FILTER / IT_FILTER_LVC：ALV过滤设置
IS_SEL_HIDE：替换或修改屏幕中select-option的值
I_DEFAULT：用户是否可以定义默认的布局，’X'-可以定义默认布局，Space-不可以定义默认布局 （默认：X）
I_SAVE：保存表格布局,’X'-只能保存全局变式；’U'-只能保存特定变式；’A'-都可以保存；Space-不能保存变式 （默认：space）
IS_VARIANT：表格布局变式
IT_EVENTS：设置事件, 类型为slis_t_event的内表（name：事件名称，form：事件的FORM）
IT_EVENT_EXIT：设置回调的方法的执行行为，表明用户所写的代码是在执行标准执行之前还是之后
IS_PRINT：后台打印的相关参数
I_SCREEN_START_COLUMN：以对话框形式显示的开始列
I_SCREEN_START_LINE：以对话框形式显示的开始行
I_SCREEN_END_COLUMN：以对话框形式显示的结束列
I_SCREEN_END_LINE：以对话框形式显示的结束行
I_HTML_HEIGHT_TOP：HTML抬头的高度
I_HTML_HEIGHT_END：HTML页脚的高度
IT_ALV_GRAPHICS：是否可以在图表中显示ALV
IT_HYPERLINK：使用超链接
ALV中的标准工具的名称、代码、图标名称、快捷键：
| 名称 | 代码 | 图标名称 | 快捷键 |
| 刷新 | REFRESH | ICON_REFRESH | F8（可随便更改） |
| 导出为EXCEL表格 | EXCEL | 无 | Shift-F8（可随便更改） |
| ABC 分析 | &ABC | ICON_ABC | Ctrl-F1 |
| 按升序排列 | &OUP | ICON_SORT_UP | Ctrl-F4 |
| 设置过滤器 | &ILT | ICON_FILTER | Ctrl-F5 |
| 总计 | &UMC | ICON_SUM | Ctrl-F6 |
| 邮件查收件 | %SL | ICON_MAIL | Ctrl-F7 |
| 更改布局… | &OL0 | ICON_ALV_VARIANTS | Ctrl-F8 |
| 选择布局… | &OAD | ICON_ALV_VARIANT_CHOOSE | Ctrl-F9 |
| 保存布局… | &AVE | ICON_ALV_VARIANT_SAVE | Ctrl-F10 |
| 信息 | &INFO | ICON_INFORMATION | Ctrl-F12 |
| 明细 | &ETA | ICON_SELECT_DETAIL | Ctrl-Shift-F3 |
| 按降序排列 | &ODN | ICON_SORT_DOWN | Ctrl-Shift-F4 |
| 删除过滤器 | &ILD | ICON_FILTER_UNDO | Ctrl-Shift-F5 |
| 小计 | &SUM | ICON_INTERMEDIATE_SUM | Ctrl-Shift-F6 |
| Microsof | &VEXCEL | ICON_XLS | Ctrl-Shift-F7 |
| 字处理 | &AQW | ICON_WORD_PROCESSING | Ctrl-Shift-F8 |
| 本地文件 | %PC | ICON_EXPORT | Ctrl-Shift-F9 |
| 打印预览 | &RNT_PREV | ICON_LAYOUT_CONTROL | Ctrl-Shift-F10 |
| 图形 | &GRAPH | ICON_GRAPHICS | Ctrl-Shift-F11 |
ALV 控制: 布局结构
ZEBRA 1 类型 LVC_ZEBRA CHAR 1 0 ALV 控制: 可选行颜色 (带)
EDIT 1 类型 LVC_EDIT CHAR 1 0 ALV 控制: 准备输入
EDIT_MODE 1 类型 LVC_EDMO CHAR 1 0 ALV 控制: 编辑模式
NO_KEYFIX 1 类型 LVC_NOKFIX CHAR 1 0 ALV 控制: 不要固定关键列
FRONTEND 1 类型 LVC_FRONT CHAR 1 0 ALV 控制: Excel, Crystal 或 ALV
OBJECT_KEY 1 类型 BDS_TYPEID CHAR 70 0 业务文档服务：对象键值
DOC_ID 1 类型 BDS_DOCID CHAR 42 0 业务文档服务：文档标识
TEMPLATE 1 类型 BDS_FILENA CHAR 255 0 业务文档服务：文件名称
LANGUAGE 1 类型 LANG LANG 1 0 语言标识符
GRAPHICS 1 类型 GUID_32 CHAR 32 0 'CHAR' 格式的大写的 GUID
SMALLTITLE 1 类型 LVC_TITSZ CHAR 1 0 ALV 控制: 标题大小
NO_HGRIDLN 1 类型 LVC_HGRID CHAR 1 0 ALV 控制: 隐藏水平网格线
NO_VGRIDLN 1 类型 LVC_VGRID CHAR 1 0 ALV 控制: 隐藏垂直网格线
NO_HEADERS 1 类型 LVC_HEADS CHAR 1 0 ALV 控制: 隐藏列抬头
NO_MERGING 1 类型 LVC_MERGE CHAR 1 0 ALV 控制: 禁用单元格合并
CWIDTH_OPT 1 类型 LVC_CWO CHAR 1 0 ALV 控制: 优化列宽度
TOTALS_BEF 1 类型 LVC_TOTBEF CHAR 1 0 ALV 控制：在单个记录前总计输出
NO_TOTARR 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
NO_TOTEXP 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
NO_ROWMOVE 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
NO_ROWINS 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
NO_COLEXPD 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
NO_F4 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
COUNTFNAME 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
COL_OPT 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
VAL_DATA 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
BLOB_SCOPE 1 类型 SALV_BS_BLOB_SCOPE CHAR 1 0 Identifier if BLOB is from SAP or Customer
BLOB_FLAVOUR 1 类型 SALV_BS_BLOB_FLAVOUR CHAR 6 0 Key Field for BLOB Store in SALV_BS_BLOB_...
BLOB_NAME 1 类型 SALV_BS_BLOB_NAME CHAR 24 0 Name for BLOB Store in SALV_BS_BLOB_...
BLOB_KEY 1 类型 SLIS_BLOB_KEY CHAR 10 0 BLOB 存储的关键字字段
BLOB_TYPE 1 类型 SLIS_BLOB_TYPE CHAR 1 0 BLOB 显示模式下 ALV 布局的标识
.INCLUDE 1 类型 LVC_S_L001 0 0 ALV 控制: 一般显示选项
STYLEFNAME 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
.INCLUDE 1 类型 LVC_S_L002 0 0 ALV 控制: 网格定制
NO_ROWMARK 1 类型 LVC_ROWMK CHAR 1 0 ALV 控制: 禁用行选择
NO_TOOLBAR 1 类型 LVC_TOOLB CHAR 1 0 ALV 控制: 隐藏工具栏
GRID_TITLE 1 类型 LVC_TITLE CHAR 70 0 ALV 控制: 标题栏文本
SEL_MODE 1 类型 LVC_LIBOX CHAR 1 0 ALV 控制: 选择方式
BOX_FNAME 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
SGL_CLK_HD 1 类型 LVC_SGLCLH CHAR 1 0 ALV 控制: 单击列标题
.INCLUDE 1 类型 LVC_S_L003 0 0 ALV 控制: 总计选项
NO_TOTLINE 1 类型 LVC_NOTOTL CHAR 1 0 ALV 控制: 不要输出总计行
NUMC_TOTAL 1 类型 LVC_NUMCTO CHAR 1 0 ALV 控制: 禁止 NUMC 字段总计
NO_UTSPLIT 1 类型 LVC_UNITSP CHAR 1 0 ALV 控制: 按单元拆分总计行
.INCLUDE 1 类型 LVC_S_L004 0 0 ALV 控制: 例外
EXCP_FNAME 1 类型 LVC_EXFNM CHAR 30 0 ALV 控制: 字段名称带有例外编码
EXCP_ROLLN 1 类型 LVC_EXROL CHAR 30 0 ALV 控制: 例外文档的数据元素
EXCP_CONDS 1 类型 LVC_EXCON CHAR 1 0 ALV 控制: 合计例外
EXCP_LED 1 类型 LVC_EXLED CHAR 1 0 ALV 控制: 例外作为 LED
EXCP_GROUP 1 类型 LVC_EXGRP CHAR 1 0 ALV 控制：例外组
.INCLUDE 1 类型 LVC_S_L005 0 0 ALV 控制: 接口控制
DETAILINIT 1 类型 LVC_DETINI CHAR 1 0 ALV 控制：在细节屏幕显示初始值
DETAILTITL 1 类型 LVC_DETTIT CHAR 60 0 ALV 控制: 细节屏幕的标题栏
KEYHOT 1 类型 LVC_KEYHOT CHAR 1 0 ALV 控制: 关键列作为热点
NO_AUTHOR 1 类型 LVC_NOAUTH CHAR 1 0 ALV 控制: 不执行 ALV 标准授权检查
XIFUNCKEY 1 类型 AQS_XIKEY CHAR 30 0 SAP 查询 (S): 附加功能名
XIDIRECT 1 类型 FLAG CHAR 1 0 一般标记
S_DRAGDROP 1 类型 LVC_S_DD01 0 0 ALV 控制: 拖&放控制设置
.INCLUDE 1 类型 LVC_S_L006 0 0 ALV 控制: 颜色
INFO_FNAME 1 类型 LVC_CIFNM CHAR 30 0 ALV 控制: 带有简单行彩色代码的字段名称
CTAB_FNAME 1 类型 LVC_CTFNM CHAR 30 0 ALV 控制: 带有复杂单元格颜色编码的字段名称
.INCLUDE 1 类型 LVC_S_LOO8 0 0 ALV 控制: Web 选项
WEBLOOK 1 类型 LVC_LOOK CHAR 10 0 ALV 控制: Web 查看
WEBSTYLE 1 类型 LVC_STYLE RAW 4 0 ALV 控制: 样式
WEBROWS 1 类型 LVC_WEBROW INT4 10 0 ALV 控制: Web 中显示的行数
WEBXWIDTH 1 类型 INT4 INT4 10 0 自然数
WEBXHEIGHT 1 类型 INT4 INT4 10 0 自然数
LVC_S_FCAT
ROW_POS 1 类型 LVC_ROWPOS INT4 10 0 ALV 控制: 输出行 (内部使用)
COL_POS 1 类型 LVC_COLPOS INT4 10 0 ALV 控制: 输出列
FIELDNAME 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
TABNAME 1 类型 LVC_TNAME CHAR 30 0 LVC 标签名称
CURRENCY 1 类型 LVC_CURR CHAR 5 0 ALV 控制: 货币单位
CFIELDNAME 1 类型 LVC_CFNAME CHAR 30 0 ALV 控制: 参考的当前单位的字段名称
QUANTITY 1 类型 LVC_QUAN CHAR 3 0 ALV 控制: 计量单位
QFIELDNAME 1 类型 LVC_QFNAME CHAR 30 0 ALV 控制: 参考计量单位的字段名称
IFIELDNAME 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
ROUND 1 类型 LVC_ROUND INT4 10 0 ALV 控制: ROUND 值
EXPONENT 1 类型 LVC_EXPONT CHAR 3 0 ALV 控制：流动表示的指数
KEY 1 类型 LVC_KEY CHAR 1 0 ALV 控制: 关键字段
KEY_SEL 1 类型 LVC_KEYSEL CHAR 1 0 ALV 控制: 可以被隐藏的关键列
ICON 1 类型 LVC_ICON CHAR 1 0 ALV 控制: 作为图标输出
SYMBOL 1 类型 LVC_SYMBOL CHAR 1 0 ALV 控制: 输出作为符号
CHECKBOX 1 类型 LVC_CHECKB CHAR 1 0 ALV 控制: 作为复选框输出
JUST 1 类型 LVC_JUST CHAR 1 0 ALV 控制: 对齐
LZERO 1 类型 LVC_LZERO CHAR 1 0 ALV 控制: 输出前导零
NO_SIGN 1 类型 LVC_NOSIGN CHAR 1 0 ALV 控制：输出抑制符号
NO_ZERO 1 类型 LVC_NOZERO CHAR 1 0 ALV 控制: 为输出隐藏零
NO_CONVEXT 1 类型 LVC_NOCONV CHAR 1 0 SAP 列表查看器控件：忽略输出的转换出口
EDIT_MASK 1 类型 LVC_EDTMSK CHAR 60 0 ALV 控制: 为输出编辑掩码
EMPHASIZE 1 类型 LVC_EMPHSZ CHAR 4 0 ALV 控制: 带有颜色的高亮列
FIX_COLUMN 1 类型 LVC_FIXCOL CHAR 1 0 ALV 控制: 固定列
DO_SUM 1 类型 LVC_DOSUM CHAR 1 0 ALV 控制: 总计列值
NO_SUM 1 类型 LVC_NOSUM CHAR 1 0 ALV 控制: 没有总计列值
NO_OUT 1 类型 LVC_NOOUT CHAR 1 0 ALV 控制: 列没有输出
TECH 1 类型 LVC_TECH CHAR 1 0 ALV 控制: 技术字段
OUTPUTLEN 1 类型 LVC_OUTLEN NUMC 6 0 ALV 控制: 列的字符宽度
CONVEXIT 1 类型 CONVEXIT CHAR 5 0 转换例程
SELTEXT 1 类型 LVC_TXT CHAR 40 0 ALV 控制: 对话功能的列标识符
TOOLTIP 1 类型 LVC_TIP CHAR 40 0 SAP 列表查看器控件：列抬头的工具提示
ROLLNAME 1 类型 LVC_ROLL CHAR 30 0 ALV 控制: F1 帮助的数据元素
DATATYPE 1 类型 DATATYPE_D CHAR 4 0 ABAP 字典中的数据类型
INTTYPE 1 类型 INTTYPE CHAR 1 0 ABAP 数据类型(C,D,N,...)
INTLEN 1 类型 INTLEN NUMC 6 0 内部长度（字节）
LOWERCASE 1 类型 LOWERCASE CHAR 1 0 允许/不允许小写字母
REPTEXT 1 类型 REPTEXT CHAR 55 0 标题
HIER_LEVEL 1 类型 LVC_HIERL INT4 10 0 ALV 控制: 内部使用
REPREP 1 类型 LVC_CRPRP CHAR 1 0 ALV 控制: 价值是补充/补充接口的选择标准
DOMNAME 1 类型 DOMNAME CHAR 30 0 定义域名
SP_GROUP 1 类型 LVC_SPGRP CHAR 4 0 组代码
HOTSPOT 1 类型 LVC_HOTSPT CHAR 1 0 ALV 控制: 单击敏感
DFIELDNAME 1 类型 LVCDBGFN CHAR 30 0 ALV 控制: 数据库中列组的字段名称
COL_ID 1 类型 LVC_COLID INT4 10 0 ALV 控制: 列 ID
F4AVAILABL 1 类型 DDF4AVAIL CHAR 1 0 字段有输入帮助吗
AUTO_VALUE 1 类型 LVC_AUTO CHAR 1 0 ALV 控制: 自动复制值
CHECKTABLE 1 类型 TABNAME CHAR 30 0 表名
VALEXI 1 类型 VALEXI CHAR 1 0 固定值存在
WEB_FIELD 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
HREF_HNDL 1 类型 INT4 INT4 10 0 自然数
STYLE 1 类型 LVC_STYLE RAW 4 0 ALV 控制: 样式
STYLE2 1 类型 LVC_STYLE RAW 4 0 ALV 控制: 样式
STYLE3 1 类型 LVC_STYLE RAW 4 0 ALV 控制: 样式
STYLE4 1 类型 LVC_STYLE RAW 4 0 ALV 控制: 样式
DRDN_HNDL 1 类型 INT4 INT4 10 0 自然数
DRDN_FIELD 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
NO_MERGING 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
H_FTYPE 1 类型 LVC_FTYPE CHAR 3 0 ALV 树控制: 功能类型 (总计,平均,最大.最小, ...)
COL_OPT 1 类型 LVC_COLOPT CHAR 1 0 可选列优化的条目
NO_INIT_CH 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
DRDN_ALIAS 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
DECFLOAT_STYLE 1 类型 OUTPUTSTYLE NUMC 2 0 DD: Output Style (Output Style) for Decfloat Types
PARAMETER0 1 类型 CHAR30 CHAR 30 0 30 个字符
PARAMETER1 1 类型 CHAR30 CHAR 30 0 30 个字符
PARAMETER2 1 类型 CHAR30 CHAR 30 0 30 个字符
PARAMETER3 1 类型 CHAR30 CHAR 30 0 30 个字符
PARAMETER4 1 类型 CHAR30 CHAR 30 0 30 个字符
PARAMETER5 1 类型 INT4 INT4 10 0 自然数
PARAMETER6 1 类型 INT4 INT4 10 0 自然数
PARAMETER7 1 类型 INT4 INT4 10 0 自然数
PARAMETER8 1 类型 INT4 INT4 10 0 自然数
PARAMETER9 1 类型 INT4 INT4 10 0 自然数
REF_FIELD 1 类型 LVC_RFNAME CHAR 30 0 ALV 控制: 内部表字段的参考字段名称
REF_TABLE 1 类型 LVC_RTNAME CHAR 30 0 ALV 控制: 内部表字段的参考表名称
TXT_FIELD 1 类型 LVC_FNAME CHAR 30 0 ALV 控制: 内部表字段的字段名称
ROUNDFIELD 1 类型 LVC_RNDFN CHAR 30 0 ALV 控制: 带有 ROUND 说明的字段名称
DECIMALS_O 1 类型 LVC_DECMLS CHAR 6 0 ALV 控制: 输出小数位的编号
DECMLFIELD 1 类型 LVC_DFNAME CHAR 30 0 ALV 控制: 带有 DECIMALS 说明的字段名称
DD_OUTLEN 1 类型 LVC_DDLEN NUMC 6 0 ALV 控制: 输出字符长度
DECIMALS 1 类型 DECIMALS NUMC 6 0 小数位数
COLTEXT 1 类型 LVC_TXTCOL CHAR 40 0 ALV 控制: 列标题
SCRTEXT_L 1 类型 SCRTEXT_L CHAR 40 0 长字段标签
SCRTEXT_M 1 类型 SCRTEXT_M CHAR 20 0 中字段标签
SCRTEXT_S 1 类型 SCRTEXT_S CHAR 10 0 短字段标签
COLDDICTXT 1 类型 LVC_DDICT CHAR 1 0 ALV 控制: 确定 DDIC 文本参考
SELDDICTXT 1 类型 LVC_DDICT CHAR 1 0 ALV 控制: 确定 DDIC 文本参考
TIPDDICTXT 1 类型 LVC_DDICT CHAR 1 0 ALV 控制: 确定 DDIC 文本参考
EDIT 1 类型 LVC_EDIT CHAR 1 0 ALV 控制: 准备输入
TECH_COL 1 类型 LVC_TCOL INT4 10 0 ALV 控制: 内部使用
TECH_FORM 1 类型 LVC_TFORM INT4 10 0 ALV 控制: 内部使用
TECH_COMP 1 类型 LVC_TCOMP CHAR 1 0 ALV 控制: 内部使用
HIER_CPOS 1 类型 LVCHCOLPOS INT2 5 0 ALV 控制: 层次列位置
H_COL_KEY 1 类型 TV_ITMNAME CHAR 12 0 树控制: 列名称/项目名称
H_SELECT 1 类型 LVC_SELECT CHAR 1 0 标识是否可以选择树控制中的列
DD_ROLL 1 类型 ROLLNAME CHAR 30 0 数据元素 (语义域)
DRAGDROPID 1 类型 LVC_DDID INT4 10 0 ALV 控制: 拖&放处理拖放对象
MAC 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
INDX_FIELD 1 类型 INT4 INT4 10 0 自然数
INDX_CFIEL 1 类型 INT4 INT4 10 0 自然数
INDX_QFIEL 1 类型 INT4 INT4 10 0 自然数
INDX_IFIEL 1 类型 INT4 INT4 10 0 自然数
INDX_ROUND 1 类型 INT4 INT4 10 0 自然数
INDX_DECML 1 类型 INT4 INT4 10 0 自然数
GET_STYLE 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
MARK 1 类型 CHAR01 CHAR 1 0 长度为 1 的字符字段
______________________________ ______________________________ ____________________________________________________________________________________________________________________________________ ______ ______ ____________________________________________________________
上传图片
T-CODE :OAER
IT_FIELDCAT
单列优化宽度
wa_fieldcat-col_opt = 'X'.
单列求和或者取消求和，添加属性
wa_fieldcat-do_sum = ‘X’. " 求和 wa_fieldcat-no_sum = ‘X’. " 取消求和
对齐方式
wa_fieldcat-just = 'L' . " 左对齐 wa_fieldcat-just = 'C' . " 居中对齐 wa_fieldcat-just = 'R' . " 右对齐
I_DEFAULT/ I_SAVE/ IS_VARIANT 参数属性
这三个参数都是用于ALV 布局的保存设置：
01). I_DEFAULT参数用于设置用户是否可以定义默认的布局: ’X' 可以定义默认布局， SPACE 不可以定义默认布局 （默认：X）
02). I_SAVE 参数 保存表格布局： ’X' 只能保存全局变式 ’U' 只能保存特定变式 ’A' 都可以保存 SPACE 不能保存变式 （默认：space）
03). IS_VARIANT 参数用于启用用户表格布局变式
*&---------------------------------------------------------------------*
*& Report YHX_ALV*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT YHX_ALV.
TYPES: BEGIN OF GY_TAB ,
LINECOLOR TYPE CHAR04 ,"设置报表行颜色
CELLCOLOR TYPE LVC_T_SCOL ,"设置单元格颜色
* CELLCOLOR TYPE SLIS_T_SPECIALCOL_ALV,
BOX TYPE CHAR01 .
INCLUDE STRUCTURE MAKT .
TYPES END OF GY_TAB .
DATA: GW_FIELDCAT TYPE LVC_S_FCAT,
GT_FIELDCAT TYPE LVC_T_FCAT ,
GT_TAB TYPE TABLE OF GY_TAB .
"查询条件 选择画面
TABLES MARA.
SELECT-OPTIONS: P_MATNR FOR MARA-MATNR .
*1----------------------------------------------------------------------
*INITIALIZATION
*“初始化变量/内标/结果。
*----------------------------------------------------------------------
INITIALIZATION.
*2----------------------------------------------------------------------
*AT SELECTION-SCREEN OUTPUT
*选择画面显示之前走这段代码
*----------------------------------------------------------------------
AT SELECTION-SCREEN OUTPUT.
*3----------------------------------------------------------------------
*AT SELECTION-SCREEN
*按选择画面按钮后的操作--检查，权限检查。
*----------------------------------------------------------------------
AT SELECTION-SCREEN.
*4----------------------------------------------------------------------
*START-OF-SELECTION
*主处理，alv，查询数据
*----------------------------------------------------------------------
START-OF-SELECTION.
PERFORM FRM_GET_DATA.
PERFORM FRM_SHOW_ALV .
*5----------------------------------------------------------------------
*END-OF-SELECTION
*清空变量，内表
*----------------------------------------------------------------------
END-OF-SELECTION.
*&---------------------------------------------------------------------*
*& 包含 YHX_ALV_DEMO_FORM
*&---------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*& Form FRM_GET_DATA
*&---------------------------------------------------------------------*
*& text
*&---------------------------------------------------------------------*
*& --> p1 text
*& <-- p2 text
*&---------------------------------------------------------------------*
FORM FRM_GET_DATA .
"获取报表显示的数据
SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_TAB FROM MAKT UP TO 100 ROWS
WHERE MATNR IN P_MATNR .
ENDFORM.
*&---------------------------------------------------------------------*
*& Form FRM_SHOW_ALV
*&---------------------------------------------------------------------*
*& text
*&---------------------------------------------------------------------*
*& --> p1 text
*& <-- p2 text
*&---------------------------------------------------------------------*
FORM FRM_SHOW_ALV .
"获取报表字段
PERFORM FRM_GET_FIELID .
"显示报表
PERFORM FRM_DISPLAY_ALV .
ENDFORM.
*&---------------------------------------------------------------------*
*& Form FRM_GET_FIELID
*&---------------------------------------------------------------------*
*& text
*&---------------------------------------------------------------------*
*& --> p1 text
*& <-- p2 text
*&---------------------------------------------------------------------*
FORM FRM_GET_FIELID .
DEFINE FCATADD.
CLEAR GW_FIELDCAT.
GW_FIELDCAT-FIELDNAME = &1.
GW_FIELDCAT-TABNAME = &2.
GW_FIELDCAT-SCRTEXT_L = &3.
GW_FIELDCAT-SCRTEXT_M = &3.
GW_FIELDCAT-SCRTEXT_S = &3.
GW_FIELDCAT-OUTPUTLEN = &4.
GW_FIELDCAT-REF_FIELD = &5.
GW_FIELDCAT-REF_TABLE = &6.
GW_FIELDCAT-JUST = 'C'.
IF GW_FIELDCAT-FIELDNAME = 'BOX'.
GW_FIELDCAT-EDIT = 'X' .
GW_FIELDCAT-CHECKBOX = 'X' .
ENDIF.
"设置指定列的单元格颜色
IF GW_FIELDCAT-FIELDNAME = 'MAKTG'.
GW_FIELDCAT-EMPHASIZE = 'C511' .
ENDIF.
APPEND GW_FIELDCAT TO GT_FIELDCAT.
END-OF-DEFINITION.
FCATADD 'BOX' 'GT_TAB' '选择' '8' '' ''.
FCATADD 'MATNR' 'GT_TAB' '物料号码' '20' '' ''.
FCATADD 'SPRAS' 'GT_TAB' '语言代码' '15' '' ''.
FCATADD 'MAKTX' 'GT_TAB' '物料描述' '30' '' ''.
FCATADD 'MAKTG' 'GT_TAB' '物料描述' '30' '' ''.
"直接获取表或者结构中的字段 用于报表字段的显示
*CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
* EXPORTING
** I_BUFFER_ACTIVE =
* I_STRUCTURE_NAME = 'MAKT'
** I_CLIENT_NEVER_DISPLAY = 'X'
** I_BYPASSING_BUFFER =
** I_INTERNAL_TABNAME =
* CHANGING
* CT_FIELDCAT = GT_FIELDCAT
** EXCEPTIONS
** INCONSISTENT_INTERFACE = 1
** PROGRAM_ERROR = 2
** OTHERS = 3
* .
ENDFORM.
*&---------------------------------------------------------------------*
*& Form FRM_DISPLAY_ALV
*&---------------------------------------------------------------------*
*& text
*&---------------------------------------------------------------------*
*& --> p1 text
*& <-- p2 text
*&---------------------------------------------------------------------*
FORM FRM_DISPLAY_ALV .
DATA:LS_LAYOUT TYPE LVC_S_LAYO.
DATA:L_EVENTS TYPE SLIS_T_EVENT.
"控制ALV 隔行的 颜色带
LS_LAYOUT-ZEBRA = 'X'.
* LS_LAYOUT-DETAILTITL = '详细内容' .
"设置行颜色
LS_LAYOUT-INFO_FNAME = 'LINECOLOR' .
LOOP AT GT_TAB INTO DATA(GW_TAB).
IF SY-TABIX = 5.
GW_TAB-LINECOLOR = 'C411'.
ENDIF.
MODIFY GT_TAB FROM GW_TAB.
ENDLOOP.
"设置单元格颜色
DATA: LT_COLOR TYPE LVC_T_SCOL,"SLIS_T_SPECIALCOL_ALV," LVC_T_SCOL ,
LS_COLOR TYPE LVC_S_SCOL."SLIS_SPECIALCOL_ALV." LVC_S_SCOL.
LS_LAYOUT-CTAB_FNAME = 'CELLCOLOR' .
LOOP AT GT_TAB INTO DATA(GW_TAB1).
LOOP AT GT_FIELDCAT INTO GW_FIELDCAT.
CLEAR LS_COLOR .
LS_COLOR-FNAME = GW_FIELDCAT-FIELDNAME .
IF LS_COLOR-FNAME EQ 'SPRAS' .
CASE GW_TAB1-SPRAS.
WHEN '1'.
LS_COLOR-COLOR-COL = '1' . "颜色种类
* LS_COLOR-COLOR-INT = '1' . "“单元格颜色
LS_COLOR-COLOR-INV = '1' ."字体颜色
WHEN OTHERS.
ENDCASE.
REFRESH: GW_TAB-CELLCOLOR ,LT_COLOR.
INSERT LS_COLOR INTO TABLE LT_COLOR .
ENDIF.
ENDLOOP.
INSERT LINES OF LT_COLOR INTO TABLE GW_TAB1-CELLCOLOR .
MODIFY GT_TAB FROM GW_TAB1 .
ENDLOOP.
DATA: I_GRID_TITLE TYPE LVC_TITLE .
I_GRID_TITLE = '小标题' .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
I_CALLBACK_TOP_OF_PAGE = 'FRM_TOP_OF_PAGE'
* I_CALLBACK_HTML_TOP_OF_PAGE = 'HTML_TOP_OF_PAGE'
I_GRID_TITLE = I_GRID_TITLE
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
I_CALLBACK_PF_STATUS_SET = 'F_SET_STATUS'
IS_LAYOUT_LVC = LS_LAYOUT
IT_FIELDCAT_LVC = GT_FIELDCAT
I_SAVE = 'A'
IT_EVENTS = L_EVENTS[]
I_HTML_HEIGHT_TOP = 24
TABLES
T_OUTTAB = GT_TAB
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
ENDFORM.
FORM FRM_TOP_OF_PAGE .
DATA: I_HEADER TYPE SLIS_T_LISTHEADER,
WA_HEADER TYPE SLIS_LISTHEADER ,
L_DATE TYPE STRING ,
L_NAME TYPE STRING ,
NAME_FIRST LIKE ADRP-NAME_FIRST ,
NAME_LAST LIKE ADRP-NAME_LAST .
* 拼接制表日期
CONCATENATE SY-DATUM+0(4) '.'
SY-DATUM+4(2) '.'
SY-DATUM+6(2) INTO L_DATE.
CONCATENATE '制表人：' SY-UNAME INTO L_NAME .
CONCATENATE '制表日期：' L_DATE INTO L_DATE .
* 位于标题第一行
WA_HEADER-TYP = 'H'. " H = Header, S = Selection, A = Action
WA_HEADER-INFO = 'ALV DEMO' .
APPEND WA_HEADER TO I_HEADER .
CLEAR WA_HEADER .
* 相关内容信息，这里用于显示登录用户信息描述
WA_HEADER-TYP = 'S'.
WA_HEADER-KEY = L_NAME .
WA_HEADER-INFO = L_DATE .
APPEND WA_HEADER TO I_HEADER .
APPEND WA_HEADER TO I_HEADER .
CLEAR WA_HEADER .
WA_HEADER-TYP = 'A'.
WA_HEADER-KEY = L_NAME .
WA_HEADER-INFO = L_DATE .
APPEND WA_HEADER TO I_HEADER .
APPEND WA_HEADER TO I_HEADER .
CLEAR WA_HEADER .
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = I_HEADER
I_LOGO = 'Z_LOGO'
* I_END_OF_LIST_GRID =
I_ALV_FORM = 'X'.
ENDFORM .
FORM HTML_TOP_OF_PAGE USING DOCUMENT TYPE REF TO CL_DD_DOCUMENT.
DATA: TEXT TYPE SDYDO_TEXT_ELEMENT.
DATA: M_P TYPE I ,
M_BUFFER TYPE STRING .
CONCATENATE
'<h1 align="center">ALV 模板</h1>'
'<table width="800" height="34" >'
' <tr>'
' <td width="400" height="28" align="left">名称1:' 'ALV1'
' </td>'
' <td width="200" align="center">名称2:' 'ALV2' '</td>'"'-' S_RPMAX+1(2)
' <td width="200" align="center">名称3:ALV3' '</td>'
' <td width="200" align="right">名称4:ALV4</td>'
' </tr>'
'</table>'
INTO M_BUFFER.
CALL METHOD DOCUMENT->HTML_INSERT
EXPORTING
CONTENTS = M_BUFFER
CHANGING
POSITION = M_P
.
ENDFORM.
FORM F_SET_STATUS USING P_EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'ZGUI101'.
ENDFORM. "F_SET_STATUS
FORM USER_COMMAND USING UCOMM TYPE SYUCOMM SELFIELD TYPE SLIS_SELFIELD.
DATA: LR_GRID TYPE REF TO CL_GUI_ALV_GRID ,
ZLINE TYPE STRING ,
ZANSWER TYPE C .
CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
IMPORTING
E_GRID = LR_GRID.
"刷新
CALL METHOD LR_GRID->CHECK_CHANGED_DATA.
SELFIELD-REFRESH = 'X'.
CASE UCOMM.
WHEN '&DATA_SAVE'.
MESSAGE '你点击了保存按钮' TYPE 'I' .
WHEN 'LOAD'.
MESSAGE '你点击了下载按钮' TYPE 'I' .
WHEN '&IC1'.
DATA:MSG TYPE STRING .
CLEAR MSG .
ZLINE = SELFIELD-TABINDEX .
CONCATENATE '你双击的是' ZLINE '行，字段是：' SELFIELD-FIELDNAME
',它的值是：' SELFIELD-VALUE INTO MSG .
CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA'
EXPORTING
TEXTLINE1 = MSG
* TEXTLINE2 = '第二行'
TITEL = '表头行'
* START_COLUMN = 25
* START_ROW = 6
* DEFAULTOPTION = 'N'
IMPORTING
ANSWER = ZANSWER
.
ENDCASE.
ENDFORM.