ABAP - SALV教程12 显示图标和提示信息

  • ALV要求字段的值为图标的需求并不多见,一般都用于红黄绿灯,来表示单据的执行状态,添加图标的方式也可以实现红黄绿灯的功能,也可以参考SALV实现红黄绿灯这篇文章:http://t.csdnimg.cn/Dzx7x
  • 效果图
  • SAVL列设置为图标图标显示实现步骤:
  1. 输出内表增加一个char30的字段类型,然后赋值。图标的值:SE38执行showicon程序
        TYPES:BEGIN OF TY_dATA,icon  TYPE char30,TYPES:END  OF ty_data.DATA mt_data TYPE TABLE OF ty_data.INCLUDE: <icon>.LOOP AT mt_data ASSIGNING FIELD-SYMBOL(<fs_data>).<fs_data>-icon = icon_checked.ENDLOOP.

  2. 将该字段设置为图标显示列
        DATA: lo_functional_settings  TYPE REF TO cl_salv_functional_settings.DATA: lo_tooltips TYPE REF TO cl_salv_tooltips,lv_value    TYPE lvc_value.DATA: lo_columns              TYPE REF TO cl_salv_columns.DATA: lo_column               TYPE REF TO cl_salv_column_table.INCLUDE: <icon>.lo_columns = co_alv->get_columns( ).TRY.lo_column ?= lo_columns->get_column( 'ICON' )." 将列设置为显示ICONlo_column->set_icon( if_salv_c_bool_sap=>true )." 设置列标签 labello_column->set_long_text( '图标' )." 图标对齐方式lo_column->set_alignment( if_salv_c_alignment=>centered )." 字段长度lo_column->set_output_length( 6 ).CATCH cx_salv_not_found.ENDTRY."这里做鼠标悬停时的提示信息lo_functional_settings = co_alv->get_functional_settings( ).lo_tooltips = lo_functional_settings->get_tooltips( ).TRY."当图标代码值为icon_checked,提示 Everything is Processedlv_value = icon_checked.lo_tooltips->add_tooltip(type    = cl_salv_tooltip=>c_type_iconvalue   = lv_valuetooltip = 'Everything is Processed' ).CATCH cx_salv_existing.ENDTRY.ENDMETHOD.


  • 完整代码 
    CLASS lcl_model DEFINITION.PUBLIC SECTION.TYPES:BEGIN OF TY_dATA,icon  TYPE char30,vbeln TYPE vbak-vbeln,erdat TYPE erdat,erzet TYPE erzet,ernam TYPE ernam,auart TYPE auart.TYPES:END  OF ty_data.DATA mt_data TYPE TABLE OF ty_data.DATA mo_salv TYPE REF TO cl_salv_table."获取数据的方法METHODS get_data."展示SALV的方法METHODS alv_show.PRIVATE SECTION.METHODS:set_icon CHANGING co_alv TYPE REF TO cl_salv_table.METHODS:set_status CHANGING co_alv TYPE REF TO cl_salv_table.ENDCLASS.CLASS lcl_model IMPLEMENTATION.METHOD get_data.SELECT vbeln erdat erzet ernam auartINTO CORRESPONDING FIELDS OF TABLE mt_dataFROM vbakUP TO 20 ROWS.INCLUDE: <icon>.LOOP AT mt_data ASSIGNING FIELD-SYMBOL(<fs_data>).<fs_data>-icon = icon_checked.ENDLOOP.ENDMETHOD.METHOD alv_show.DATA: lx_msg TYPE REF TO cx_salv_msg.TRY.cl_salv_table=>factory(IMPORTINGr_salv_table = mo_salvCHANGINGt_table      = mt_data ).CATCH cx_salv_msg INTO lx_msg.ENDTRY.me->set_status( CHANGING co_alv = mo_salv ).me->set_icon( CHANGING co_alv = mo_salv ).mo_salv->display( ).ENDMETHOD.METHOD set_status.DATA(lo_functions) = co_alv->get_functions( )."cl_salv_functions_list类型的实例对象的添加状态方法lo_functions->set_all( abap_true )."lo_functions->set_default( abap_true ).ENDMETHOD.METHOD set_icon.DATA: lo_functional_settings  TYPE REF TO cl_salv_functional_settings.DATA: lo_tooltips TYPE REF TO cl_salv_tooltips,lv_value    TYPE lvc_value.DATA: lo_columns              TYPE REF TO cl_salv_columns.DATA: lo_column               TYPE REF TO cl_salv_column_table.INCLUDE: <icon>.lo_columns = co_alv->get_columns( ).TRY.lo_column ?= lo_columns->get_column( 'ICON' )." 将列设置为显示ICONlo_column->set_icon( if_salv_c_bool_sap=>true )." 设置列标签 labello_column->set_long_text( '图标' )." 图标对齐方式lo_column->set_alignment( if_salv_c_alignment=>centered )." 字段长度lo_column->set_output_length( 6 ).CATCH cx_salv_not_found.ENDTRY."这里做鼠标悬停时的提示信息lo_functional_settings = co_alv->get_functional_settings( ).lo_tooltips = lo_functional_settings->get_tooltips( ).TRY."当图标代码值为icon_checked,提示 Everything is Processedlv_value = icon_checked.lo_tooltips->add_tooltip(type    = cl_salv_tooltip=>c_type_iconvalue   = lv_valuetooltip = 'Everything is Processed' ).CATCH cx_salv_existing.ENDTRY.ENDMETHOD.ENDCLASS.START-OF-SELECTION.DATA(lo_model) = NEW lcl_model( ).lo_model->get_data( ).lo_model->alv_show( ).

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处:http://www.rhkb.cn/news/271357.html

如若内容造成侵权/违法违规/事实不符,请联系长河编程网进行投诉反馈email:809451989@qq.com,一经查实,立即删除!

相关文章

【Web - 框架 - Vue】随笔 - Vue的简单使用(01) - 快速上手

【Web - 框架 - Vue】随笔 - Vue的简单使用(01) - 快速上手 Vue模板代码 代码 <!DOCTYPE html> <html lang"en"> <head><meta charset"UTF-8"><title>模板</title> </head> <body> <div></di…

新能源车高压线束更换VR虚拟互动教学保障了培训安全可控

随着新能源汽车市场的快速发展&#xff0c;对于新能源汽车检修人才的需求也日益增长。然而&#xff0c;传统的培训模式往往存在一些限制&#xff0c;如培训周期长、成本高、实践机会少等。为了解决这些问题&#xff0c;新能源车检修VR互动培训应运而生&#xff0c;成为一种创新…

Go的安装

一. 下载地址 Go官方下载地址&#xff1a;https://golang.org/dl/ Go中文网&#xff1a;https://go.p2hp.com/go.dev/dl/ 根据不同系统下载不同的包。 二. 配置GOPATH GOPATH是一个环境变量&#xff0c;用来表明你写的go项目的存放路径。 GOPATH路径最好只设置一个&#xff0…

印象笔记 - Markdown 入门指南

一、Markdown 是什么&#xff1f; Markdown 是一种轻量级的「标记语言」&#xff0c;创始人为约翰格鲁伯&#xff0c;用简洁的语法代替排版&#xff0c;目前被越来越多的知识工作者、写作爱好者、程序员或研究员广泛使用。其常用的标记符号不超过十个&#xff0c;相对于更为复…

游戏视频怎么录制?超实用的干货来了!

随着游戏产业的蓬勃发展&#xff0c;游戏视频录制与分享已经成为许多玩家和游戏爱好者展示技巧、分享经验、记录精彩瞬间的重要方式。可是很多人不知道游戏视频怎么录制&#xff0c;本文旨在为广大游戏玩家提供两种简单易用的游戏视频录制方法&#xff0c;这两种方法各有特点&a…

OpenCV开发笔记(七十六):相机标定(一):识别棋盘并绘制角点

若该文为原创文章&#xff0c;转载请注明原文出处 本文章博客地址&#xff1a;https://blog.csdn.net/qq21497936/article/details/136535848 各位读者&#xff0c;知识无穷而人力有穷&#xff0c;要么改需求&#xff0c;要么找专业人士&#xff0c;要么自己研究 红胖子(红模仿…

SinoDB卸载

1.进入卸载目录程序 命令&#xff1a;cd /opt/uninstall/uninstall_ids/ 2.启动卸载程序&#xff0c;开始卸载SinoDB 命令&#xff1a;./uninstallids 我们需要删除 SinoDB 数据库组件和全部的数据库&#xff0c;输入 2 并回车。 3.卸载程序开始运行 4.SinoDB 数据库卸载成功…

音频库及分析软件介绍

搞音频的兄弟必须要看一下的&#xff0c;俗话说&#xff0c;工欲善其事必先利其器&#xff0c;好的音频分析软件&#xff0c;对于音频分析工程师来讲&#xff0c;可谓是非常重要的&#xff0c;下面由小编介绍一下&#xff1a;

DailyNotes个人笔记管理工具

DailyNotes 是记录笔记和跟踪任务的应用程序&#xff0c;使用markdown进行编辑 部署 下载镜像 docker pull m0ngr31/dailynotes创建目录并授权 mkdir -p /data/dailynotes/config_dir chmod -R 777 /data/dailynotes启动容器 docker run -d --restart always --name mynot…

SMiC矩阵将于3月6日正式上线,开启数字化经济新纪元

在数字化浪潮的推动下&#xff0c;全球瞩目的SMiC矩阵将于2024年3月6日正式上线。这一里程碑式的事件标志着数字化经济迈入了一个全新的时代&#xff0c;为思洣客、合作伙伴和整个经济生态带来了前所未有的机遇和挑战。 SMiC矩阵作为引领数字化经济的新力量&#xff0c;始终致…

【Ubuntu 20.04 / 22.04 LTS】最新 esp-matter SDK 软件编译环境搭建步骤

仓库链接&#xff1a;esp-matter SDK官方软件说明&#xff1a;ESP Matter Programming Guide官方参考文档&#xff1a;使用 Matter-SDK 快速搭建 Matter 环境 (Linux) 环境要求 Ubuntu 20.04 或 Ubuntu22.04网络环境支持访问 Gihub 在安装 esp-matter SDK 软件编译环境之前&a…

CAN总线及通讯的工作原理

一、CAN总线 CAN是控制器局域网络(Controller Area Network)的简称&#xff0c; 它是由研发和生产汽车电子产品著称的德国BOSCH公司开发的&#xff0c; 并最终成为国际标准&#xff08;ISO11519&#xff09;&#xff0c;是国际上应用最广泛的现场总线之一。 二、工作原理 …

day13_微服务监控Nginx(微服务集成SBA)

文章目录 1 微服务系统监控1.1 监控系统的意义1.2 SBA监控方案1.3 SBA实战1.3.1 创建SBA服务端1.3.2 微服务集成SBA 1.4 微服务集成logback1.5 配置邮件告警 2 Nginx2.1 Nginx简介2.2 下载和安装2.2.1 方式1&#xff1a;window本地安装2.2.1.1 下载2.2.1.2 安装2.2.1.3 目录结构…

Spring Boot异常处理和单元测试

1.SpringBoot异常处理 1.1.自定义错误页面 SpringBoot默认的处理异常的机制&#xff1a;SpringBoot 默认的已经提供了一套处理异常的机制。一旦程序中出现了异常 SpringBoot 会向/error 的 url 发送请求。在 springBoot 中提供了一个叫 BasicErrorController 来处理/error 请…

[C++]类和对象,explicit,static,友元,构造函数——喵喵要吃C嘎嘎4

希望你开心&#xff0c;希望你健康&#xff0c;希望你幸福&#xff0c;希望你点赞&#xff01; 最后的最后&#xff0c;关注喵&#xff0c;关注喵&#xff0c;关注喵&#xff0c;大大会看到更多有趣的博客哦&#xff01;&#xff01;&#xff01; 喵喵喵&#xff0c;你对我真的…

数据中台开源技术栈:一图看懂全面的数据管理与应用架构

随着数字化时代的到来&#xff0c;数据管理和应用架构变得越来越重要。数据平台作为一个集中管理和利用数据的架构&#xff0c;为组织提供了促进数据驱动决策和业务创新的能力。本文通过一幅图表&#xff0c;将数据平台技术栈的组成部分清晰呈现&#xff0c;助您深入了解数据中…

在NAT模式下,局域网内的其他电脑要访问使用NAT模式的虚拟机或设备

在NAT模式下&#xff0c;局域网内的其他电脑要访问使用NAT模式的虚拟机或设备 可以通过以下几种方式&#xff1a; 1、端口映射&#xff1a;在NAT模式下&#xff0c;你可以配置端口映射&#xff0c;类似于Docker中的端口映射。这样&#xff0c;局域网内的其他电脑就可以通过特…

【机器学习】详解正则化思想

我们的生活当中真正有意义或者有价值的部分可以概括为两句话&#xff1a;一句话是&#xff1a;弄清楚某个东西是怎么一回事&#xff0c;另一句话是&#xff0c;弄清楚某个东西是怎么一回事。头一句话&#xff0c;我们弄清楚的那个东西对于我们而言是未知的&#xff0c;但是已经…

【CSS】简单的抽屉面板展开收起自然过渡效果的css

目录 效果展示css固定梯形按钮至抽屉面板中间梯形按钮css过渡动画 效果展示 1.收起时点击蓝色梯形按钮展开 2. 展开时点击蓝色按钮收起 3.展开收起时需要过渡自然&#xff0c;有抽屉推拉效果 css 固定梯形按钮至抽屉面板中间 .toggle{ position: absolute;left:-21px;top…

能换发型的相机app有哪些?5款APP帮你一键换发型

能换发型的相机app有哪些&#xff1f;在当前的数字化时代&#xff0c;发型变换不再受限于传统理发店的繁琐流程。只需一款合适的相机app&#xff0c;便能轻松尝试各种新颖发型。这些app凭借先进的图像处理技术&#xff0c;将发型与用户的照片精准融合&#xff0c;实现逼真的换发…