gs_data-msg = '这个单位是' && gs_data-uom && '是红灯' . gs_data-light = icon_led_red. ELSE. gs_data-msg = '这个单位是' && gs_data-uom && '是绿灯' . gs_data-light = icon_led_green. ENDIF. MODIFY gt_DAta FROM gs_data . CLEAR gs_data . ENDLOOP. ENDFORM. 1. 2. 3....
使用4位字符串或者 使用ABAP中固定的字符串可以展示.在ALV对应数据内容中加入到数据结构中及ALV数据中即可. @0A@ 或者ICON_RED_LIGHT.红灯 @08@ 或者ICON_GREEN_LIGHT.绿灯 @09@ 或者ICON_YELLOW_LIGHT.黄灯 实例展示 本案红绿灯使用的经典方式,通过不同字段判断状态属性的一个案例.通过不同值,经过逻辑判断,...
TYPES:BEGINOFty_Data,doccodeTYPEchar20,zrowidTYPEchar20,matcodeTYPEchar20,matnameTYPEchar20,uomTYPEchar20,memoTYPEchar20,lightTYPEiconname,"指示灯 msgTYPEstring,"消息ENDOFty_Data.data:gs_dataTYPEty_Data.data:gt_DAtaTYPETABLEofty_Data." alv 通用变量DATA:wa_layoutTYPElvc_s_layo.DATA:wa_fie...
方法/步骤 1 打开SAP客户端，登录ABAP开发账号 2 输入事务码 'SE38' 并输入已创建的程序，选择 '源代码'，并点击 '更改' 按钮 3 在展示ALV的内表中定义一个 LIGHT 指示灯字段参考 TYPE ICON_D 4 CONSTANTS定义指示灯的常量，具体如下图代码颜色为 RED YELLOW GREEN 5 ...
简单，定义一个字段,类型为ICON_D.然后把红绿灯的值赋这个字段即可。红绿灯的字段内容为@0A@这种格式的，具体的值可以从表ICON中查到！
.INCLUDE <icon>.CONSTANTS :gc_objid TYPE wwwdatatab-objid VALUE 'ZMMR_033'.CONSTANTS : gc_black TYPE char04 VALUE '@EB@', gc_red TYPE char04 VALUE '@0A@', gc_green TYPE char04 VALUE '@08@', gc_yellow TYPE char04 VALUE
PERFORM icon_create USING 'ICON_YELLOW_LIGHT' CHANGING it_alv-icons.PERFORM icon_create USING 'ICON_GREEN_LIGHT' CHANGING it_alv-icons.PERFORM icon_create USING 'ICON_RED_LIGHT' CHANGING it_alv-icons.完成之后别忘记modify it_alv.FORM icon_create USING name CHANGING p_icon.CALL ...
IF RP-IMP-CN-SUBRC=0.P_ES_SOCIAL_INSURANCE-ICON=ICON_GREEN_LIGHT. CONCATENATE SY-UNAME SY-DATUM TEXT-S03INTOP_ES_SOCIAL_INSURANCE-MESSAGE SEPARATEDBY'_'. ELSE. P_ES_SOCIAL_INSURANCE-ICON=ICON_RED_LIGHT. MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNOINTOP_ES_SOCIAL_INSURANCE-MESSAGE...
WA_ALV-STATU = ICON_RED_LIGHT. WA_ALV-MESSAGE = P_MESSAGE. * PERFORM PF_CREATE_LOG_1 USING WA_ALV-OBJKEY WA_ALV-MESSAGE 'E'. IF P_CHANGE_ENA = 'DIS'. PERFORM SET_STYLE USING 'ZSEL' 'DISABLE' CHANGING WA_ALV-CELLSTYLES. ENDIF. ENDFORM. "set_error_message *&---* *& Form...
'lt_return-messageINTOlv_errmsg.ENDIF.ENDLOOP.LOOPATgt_outtabASSIGNING<ls_outtab>WHEREzkhdd=cs_outtab-zkhddANDzddbb=cs_outtab-zddbb.<ls_outtab>-icon=icon_red_light.<ls_outtab>-msg=lv_errmsg.<ls_outtab>-zlcstatus='E11'."取状态域值描述CALLMETHODzcl_common_tool=>get_domain_text...