项目进度状态表中单元格颜色显示

关注

VIP免费原创最新推荐文章于 2026-04-24 16:39:41 发布 4.2k 阅读 AI 写同款· GEO 优化 ›

限时加码！20+主流AI编程工具免费用购周边加赠Coding Plan Lite，Claude Code、Cursor等即刻畅享，学习进阶更高效！阅读详情

居然无法将文字颜色全部改成红色。。。

*&---------------------------------------------------------------------*
*& Report  ZTEST_PS_RPT_0003
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  ZTEST_PS_RPT_0003.

tables:AUFK,AFKO,AFVC,PRPS,AFVV,AFRU.

type-pools:slis.

data:begin of itab occurs 0,
  aufnr like aufk-aufnr,    "网络号
  ktext like aufk-ktext,    "网络名称
  gstrp like afko-gstrp,    "网络开始日期
  gltrp like afko-gltrp,    "网络完成日期
  vornr like afvc-vornr,    "作业号
  ltxa1 like afvc-ltxa1,    "作业描述
  posid like prps-posid,    "WBS元素
  post1 like prps-post1,    "WBS描述
  dauno like afvv-dauno,    "工作时长(天)
  fsavd like afvv-fsavd,    "计划开始日期
  fsedd like afvv-fsedd,    "计划完成日期
  isdd like afvv-isdd,      "实际开始日期
  iedd like afvv-iedd,      "实际完成日期
  abarb like afru-abarb,    "作业报工量
  budat like afru-budat,    "报工日期
  fidat type i,             "距离完工天数
  state type string,        "作业系统状态
  coltab type slis_t_specialcol_alv,"单元格颜色
end of itab.

data:begin of itab_aufk occurs 0,
  aufnr like aufk-aufnr,
  ktext like aufk-ktext,
  pspel like aufk-pspel,
end of itab_aufk.

data:BEGIN OF itab_afko occurs 0,
  aufnr like afko-aufnr,
  aufpl like afko-aufpl,
  gstrp like afko-gstrp,    "网络开始日期
  gltrp like afko-gltrp,    "网络完成日期
  end of itab_afko.

data:BEGIN OF itab_afvc occurs 0,
  vornr like afvc-vornr,    "作业号
  ltxa1 like afvc-ltxa1,    "作业描述
  aufpl like afvc-aufpl,    "订单中工序的工艺路线号
  projn like afvc-projn,
  aplzl like afvc-aplzl,
  end of itab_afvc.

data:BEGIN OF itab_prps occurs 0,
  posid like prps-posid,    "WBS元素
  post1 like prps-post1,    "WBS描述
  pspnr like prps-pspnr,
end of itab_prps.

data:BEGIN OF itab_afvv occurs 0,
  aufpl like afvv-aufpl,
  aplzl like afvv-aplzl,
  dauno like afvv-dauno,    "工作时长(天)
  fsavd like afvv-fsavd,    "计划开始日期
  fsedd like afvv-fsedd,    "计划完成日期

end of itab_afvv.

data:BEGIN OF itab_afru occurs 0,
  aufnr like afru-aufnr,
  aufpl like afru-aufpl,
  vornr like afru-vornr,
  abarb like afru-abarb,    "作业报工量
  budat like afru-budat,