• ALV的html表头


    在ALV的function的exporting里添加属性:

    I_CALLBACK_HTML_TOP_OF_PAGE = alv_top_of_page
    定义form响应上述ALV属性

    *&---------------------------------------------------------------------*
    *&      Form  alv_top_of_page
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    FORM ALV_TOP_OF_PAGE USING CL_DD TYPE REF TO CL_DD_DOCUMENT.
      DATA: M_P TYPE I.
      DATA: M_BUFF TYPE STRING.
      DATA: LV_COMPANY LIKE T001-BUTXT,
            LV_MONTH(02TYPE C,
            LV_DAY(02TYPE C.
      DATA: LV_YEAR TYPE F.
        LV_YEAR = '2012'."P_ZYEAR.

    *    COMPUTE LV_YEAR = FRAC( LV_YEAR / 4 ).
    *    LV_MONTH = '02'."P_ZMONTH+1(2).
    *
    *    CASE LV_MONTH.
    *      WHEN 1 OR 3 OR 5 OR 7 OR 8 OR 10 OR 12.
    *        LV_DAY = '31'.
    *      WHEN 2.
    *        IF LV_YEAR = 0 .
    *          LV_DAY = '29'.
    *        ELSE.
    *          LV_DAY = '28'.
    *        ENDIF.
    *      WHEN 4 OR 6 OR 9 OR 11.
    *        LV_DAY = '30'.
    *    ENDCASE.

    *表头其实完全可以是一个html文件,自己使用html语言进行格式控制
      M_BUFF = '<html>'.
      CALL METHOD CL_DD->HTML_INSERT
        EXPORTING
          CONTENTS = M_BUFF
        CHANGING
          POSITION = M_P.

      M_BUFF = '<center><H2>研 发 费 用 明 细 表</H2></center>'.

      CALL METHOD CL_DD->HTML_INSERT
        EXPORTING
          CONTENTS = M_BUFF
        CHANGING
          POSITION = M_P.

    **  CONCATENATE '单位编号:' P_ZBUKRS  '会企01表' '<BR>' INTO M_BUFF.
    *CONCATENATE  '<table width="1200"><tr><td>'   '</td><td><div align="right"></div></td></tr></table>' INTO M_BUFF.
    *  CALL METHOD CL_DD->HTML_INSERT
    *    EXPORTING
    *      CONTENTS = M_BUFF
    *    CHANGING
    *      POSITION = M_P.


    *  CONCATENATE '单位名称:' LV_COMPANY P_ZYEAR '年'  LV_MONTH '月' LV_DAY '日' '单位:元'  '<BR>' INTO M_BUFF.
    CONCATENATE '<table width="1200"><tr><td width="480">编制单位:辰欣药业股份有限公司' '</td><td width="250"><div align="center">' P_DATUM  '</div></td><td width="454"><div align="right">单位:人民币元</div></td></tr></table>' INTO M_BUFF.

      CALL METHOD CL_DD->HTML_INSERT
        EXPORTING
          CONTENTS = M_BUFF
        CHANGING
          POSITION = M_P.

     M_BUFF = '</html>'.
      CALL METHOD CL_DD->HTML_INSERT
        EXPORTING
          CONTENTS = M_BUFF
        CHANGING
          POSITION = M_P.
    ENDFORM.                    "ALV_TOP_OF_PAGE

  • 相关阅读:
    对话框事件
    C# 实现retry
    Linq中的group by多表多字段,Sum求和
    词干提取(stemming)和词形还原(lemmatization)
    GIT简单应用实例
    像素、分辨率、dpi的区别和联系
    二值图像、灰度图像、彩色图像
    更好的做科研
    数据挖掘竞赛利器-Stacking和Blending方式
    如何成为一名成功的博士生
  • 原文地址:https://www.cnblogs.com/james1207/p/3293820.html
Copyright © 2020-2023  润新知