FORM frm_html_top_of_page USING cl_dd TYPE REF TO cl_dd_document.

  DATA: m_p TYPE i.

  DATA: m_buff TYPE string.

  DATA:m_kunnr TYPE string.

  DATA:m_bukrs TYPE string.

  SELECT SINGLE name1 INTO m_kunnr FROM kna1 WHERE kunnr IN s_kunnr.

  CONCATENATE '客户：' m_kunnr '对账单' INTO m_kunnr.

*表头其实完全可以是一个html文件，自己使用html语言进行格式控制

  m_buff = '<html>'.

  CALL METHOD cl_dd->html_insert

    EXPORTING

      contents = m_buff

    CHANGING

      position = m_p.

  SELECT SINGLE butxt INTO m_bukrs FROM t001 WHERE bukrs IN s_bukrs.

  CONCATENATE '<center><H2>' m_bukrs  '</H2></Center>' INTO m_buff.

  CALL METHOD cl_dd->html_insert

    EXPORTING

      contents = m_buff

    CHANGING

      position = m_p.

  CONCATENATE '<center><H3>' m_kunnr  '</H3></Center>' INTO m_buff.

  CALL METHOD cl_dd->html_insert

    EXPORTING

      contents = m_buff

    CHANGING

      position = m_p.

  CONCATENATE '<center>对账日期：' sy-datum+() '年' sy-datum+() '月'  sy-datum+() '日' '</Center>' 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.

  gv_company_name = m_bukrs.

  gv_customer_name = m_kunnr.

  gv_date = '对账日期：' && sy-datum+() && '年' && sy-datum+() && '月' &&  sy-datum+() && '日'.

ENDFORM.
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

    EXPORTING

      i_callback_program          = sy-repid

      i_callback_pf_status_set    = 'FRM_PF_STATUS'

      i_callback_user_command     = 'FRM_USER_COMMAND'

      i_callback_html_top_of_page = 'FRM_HTML_TOP_OF_PAGE'

      is_layout                   = ls_layout

      it_fieldcat                 = gt_fieldcat

*     IT_SORT                     = GT_SORT

      i_default                   = 'X'

      i_save                      = 'A'

    TABLES

      t_outtab                    = gt_show

    EXCEPTIONS

      program_error               =

      OTHERS                      = .

  IF sy-subrc <> .

* Implement suitable error handling here

  ENDIF.

ALV表头HTML实现的更多相关文章

  1. ABAP ALV表头的实现

    ABAP实现ALV表头的DEMO: 效果: 源代码: *&------------------------------------------------------------------- ...

  2. ALV 表头 ADD_TEXT

    [转自http://lz357502668.blog.163.com/blog/static/16496743201252891452493/] CALL METHOD valid_reference ...

  3. ALV报表——表头实现

    ABAP实现ALV表头的DEMO: 运行效果: 代码: *********************************************************************** ...

  4. ALV常用参数详细描述

    调用功能模块: CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_interface_check        = ''               ...

  5. SAP PP 生产订单变更记录保存

    *&---------------------------------------------------------------------* *& 包括 ZXCO1U01 *&am ...

  6. 20170111 ABAP技术小结（全半角转换）

    DATA: it_po LIKE it_alv OCCURS 0 WITH HEADER LINE.************************************************** ...

  7. ALV的html表头

    在ALV的function的exporting里添加属性: I_CALLBACK_HTML_TOP_OF_PAGE = alv_top_of_page 定义form响应上述ALV属性 *&-- ...

  8. GRID方式ALV导出数据到本地丢掉最后一位的问题

    这是SAP的一个Bug,FM方式ALV Grid和Class ALV Grid都会出现,但是ALV List好像没有这个BUG.   在以下几个条件满足的时候就会出现这个问题: 1.字段对应的域Con ...

  9. ALV详解：Function ALV（二）

    声明:原创作品,转载时请注明文章来自SAP师太技术博客( 博/客/园www.cnblogs.com):www.cnblogs.com/jiangzhengjun,并以超链接形式标明文章原始出处,否则将 ...

随机推荐

  1. 成都PC网站建设需要考虑哪些费用呢

    亿合科技PC建设小编分享下:成都PC网站建设需要考虑哪些费用呢?随互联网的发展,越来越多人想建设自己网站,站长最关心的问题之一就是网站建设需要多少钱.每个网站建设的费用都是不一样的,但是都需要涵盖几个 ...

  2. JSP 运行

    Tomcat 上运行 JSP 应用程序 完成一些包装工作后,才能在 Tomcat 上运行 index.jsp 程序.通常需要按照以下步骤操作: 创建 JSP 应用程序.如果只使用一个页面,则称它为 i ...

  3. @Override的作用

    @Override是伪代码,表示重写(不写也可以,但是有些IDE会报warning),不过写上有如下好处: 1.可以当注释用,方便阅读:2.编译器可以给你验证@Override下面的方法名是否是你父类 ...

  4. 游戏制作之路：游戏引擎选择、Mac下和Windows下UnrealEngine 4体验对比、文档及其他

    UnrealEngine 4和Unity3d的选择 订阅了UrealEngine4(UE4)开发者.我开始做网站用的是ASP.NET和C#,之后做网站虽然换用更方便的PHP(因为做的都是小网站).我想 ...

  5. 执行robot framework 的测试用例 命令行pybot使用方式

    1.执行整个项目下的所有用例: pybot 项目路径.例如: pybot D:\robot 2.执行某个suit中的所有用例: pybot 项目路径\suit文件名称. 例如:pybot D:\rob ...

  6. jquery获取input表单值的代码

    [导读] jquery取radio单选按钮的值$("input[name=items]:checked") val();jquery radio取值,checkbox取值,sele ...

  7. Python2.6.6执行selenium自动化

    系统类型: [root@bogon home]# uname -aLinux bogon 2.6.32-431.el6.x86_64 #1 SMP Sun Nov 10 22:19:54 EST 20 ...

  8. [python]使用virtualenv处理python版本问题

    1. 更新virutalenv $ sudo easy_install --upgrade virtualenv   2. 新建virtualenv实例, 确保在your home directory ...

  9. [课程设计]Scrum 2.5 多鱼点餐系统开发进度(下单一览页面-菜式添加框架设计)

    Scrum 2.5 多鱼点餐系统开发进度  (下单一览页面-菜式添加框架设计) 1.团队名称:重案组 2.团队目标:长期经营,积累客户充分准备,伺机而行 3.团队口号:矢志不渝,追求完美 4.团队选题 ...

  10. border:0; VS border:none;

    border:none与border:0的区别体现为两点:一是理论上的性能差异,二是浏览器兼容性的差异. 性能差异: [border:0;]把border设为“0”像素效果等于border-width ...