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. Mybatis Oracle 更新时报错17090

     更新数据库时报错   查看数据库里的数据是已经更新了 . 我开始用的是注解@Update("......")调试了好久都找不到原因,因为单独执行更新语句是正确的,在项目里运行,数 ...

  2. 【Selenium】4.创建你的第一个Selenium IDE脚本

    http://newtours.demoaut.com/ 这个网站将会用来作为我们测试的网址. 通过录制来创建一个脚本 让我们来用最普遍的方法——录制来创建一个脚本.然后,我们将会用回放的功能来执行录 ...

  3. android studio 引入第三方类库jar包

    第三方类库jar包 这就简单多了,直接将jar包拷贝到app/libs下,然后在app下的build.gradle中添加此jar的依赖.如下: dependencies { compile 'com. ...

  4. 将Cocos2dX渲染到MFC窗口上

    引用:http://www.cnblogs.com/windeer/archive/2012/11/18/2767750.html 引言 现在智能手机已经慢慢进入大众化,移动类应用开始火爆起来,游戏类 ...

  5. MSDeploy

    http://blogs.iis.net/jamescoo/default.aspx   Web Deployment Tool Now Works With Credential Store Feb ...

  6. 高DPI设置时禁用显示的方法

    在注册表 [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers] 中添加exe的完 ...

  7. OnScrollListener分页加载

    scrollState有三种状态,分别是SCROLL_STATE_IDLE.SCROLL_STATE_TOUCH_SCROLL.SCROLL_STATE_FLING    *SCROLL_STATE_ ...

  8. RF--换行

    引自:http://blog.csdn.net/lvtingting2007/article/details/42173991

  9. 【request_firmware】 linux内核下载模块固件接口【转】

    转自:http://blog.csdn.net/magod/article/details/6049558 [-] 8 处理固件 1481 内核固件接口 1482 它如何工作 14.8. 处理固件 作 ...

  10. maven私有库配置

    私有库的配置 协同开发过程中私有库可以为团队提升很大效率,之前我的私有库一直存在问题导致jar包导入异常.现在在这分享一下私有库配置的几个点,可能因为我们学校比较简陋所以配置的比较简单,欢迎大家补充 ...