ABAP 屏幕 function ALV 报错信息，添加红绿灯

1、function ALV 添加红绿灯

• 定义的内表里面字段：

status TYPE char2, " 状态，‘1’红色，'2'黄色,‘3’绿色

• 在ALV 调用的时候

        gs_layout-lights_fieldname  = 'STATUS'.

• 判断正确与错误的时候
   IF flag = 'X'.
        "itab-status = '@5C@'.  "添加红灯，如果单独加一个要么显示红色，要磨显示绿色，就用这行代码
        itab-status = '1'.  "添加红灯
        MOVE 'ICON' TO  gs_layout-lights_fieldname.
      ELSE..
       "itab-status = '@5B@'.  " 添加绿灯，如果单独加一个要么显示红色，要磨显示绿色，就用这行代码
        itab-status = '3'.  " 添加绿灯
        MOVE 'STATUS' TO  gs_layout-lights_fieldname.
      ENDIF.
• 效果
• 

---

2、write到屏幕上的，只添加红灯或者绿灯，

• •        ICON(4) TYPE  C,
         INT1 TYPE  I,
         END OF ITAB.
    DATA: WA LIKE LINE OF ITAB.
    WA-INT1 = '-3'.
    APPEND WA TO ITAB.
    CLEAR WA.
    WA-INT1 = '3'.
    APPEND WA TO ITAB .
    CLEAR WA.
    START-OF-SELECTION.
    LOOP AT ITAB INTO WA .
      IF WA-INT1     WA-ICON = '@5C@'.
      ELSE.
        WA-ICON = '@5B@'.
      ENDIF.        .
    MODIFY ITAB FROM WA.
    ENDLOOP.
    START-OF-SELECTION.
    LOOP AT ITAB INTO WA .
      WRITE: / WA-ICON , WA-INT1.
    ENDLOOP.

 

• • 效果图：

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/23495244/viewspace-691168/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/23495244/viewspace-691168/