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. ERROR 1010 (HY000): Error dropping database (can't rmdir '.\qpweb', errno: 41) 删库失败问题的解决

    Win8 下,MySQL5.5,root 用户登录 MySQL 5.5 Command Line Client,删除 qpweb 数据,执行命令 drop database qpweb;报错信息:ER ...

  2. bootstrap入门-1.可视化布局

    下载地址:http://v3.bootcss.com/getting-started/#download   HTML模板: <!DOCTYPE html> <html> &l ...

  3. Datatable的查找和排序（Datatable.Select）

    Datatable  是一种常用的数据结构.数据类型有点类似于数据库中的表结构.在没有使用优秀的orm框架前,大部分的数据库的数据都是先变为Datatable 然后再通过代码转换变成 object. ...

  4. android 加载大图片

    引用:http://my.eoe.cn/littlebirds/archive/4646.html 尽量不要使用setImageBitmap或setImageResource或BitmapFactor ...

  5. linux命令-sftp(模拟ftp服务)和scp(文件异地直接复制)

    1)sftp sftp是模拟ftp的服务,使用22端口 针对远方服务器主机 (Server) 之行为 变换目录到 /etc/test 或其他目录 cd /etc/testcd PATH 列出目前所在目 ...

  6. ql Server 高频,高并发访问中的键查找死锁解析

    死锁对于DBA或是数据库开发人员而言并不陌生,它的引发多种多样,一般而言,数据库应用的开发者在设计时都会有一定的考量进而尽量避免死锁的产生.但有时因为一些特殊应用场景如高频查询,高并发查询下由于数据库 ...

  7. iOS禁用第三方键盘

    - (BOOL)application:(UIApplication *)application shouldAllowExtensionPointIdentifier:(NSString *)ext ...

  8. 如何使用double-check实现一个单例模式

    private object m_mutex = new object(); private bool m_initialized = false; private BigInstance m_ins ...

  9. 【Tomcat】Tomcat Session在Redis共享

    参考的优秀文章 Redis-backed non-sticky session store for Apache Tomcat 简单地配置Tomcat Session在Redis共享 我使用的是现有的 ...

  10. R----data.table包介绍学习

    相比dplyr包,data.table包能够更大程度地提高数据的处理速度,这里就简单介绍一下data.tale包的使用方法. data.table:用于快速处理大数据集的哦 数据的读取 data.ta ...