您的位置：首页 > 运维架构

CLASS CL_DD_DOCUMENT 显示ALV top_of_page

2009-12-07 09:52 302 查看

Class cl_dd_document defines a dynamic document. You need an instance of it for each dynamic document that you create.

Use the methods of this class to construct your dynamic document.

Integration

Class

cl_dd_document inherits from superclass cl_dd_area .

例子：

FORM f_top_of_page1 USING p_cl_dd TYPE REF TO cl_dd_document.

" 定义登录用户的描述
DATA: l_name TYPE string ,

name_first LIKE adrp-name_first ,
name_last  LIKE adrp-name_last .

" 定义登录日期
DATA: l_date TYPE string .

" 定义缓冲区变量
DATA: m_p TYPE i ,
m_buffer TYPE string .

DATA: lc_text(100) TYPE c.

" 得到登录用户的描述
SELECT SINGLE adrp~name_first
adrp~name_last
INTO (name_first,name_last)
FROM adrp
INNER JOIN usr21 ON adrp~persnumber = usr21~persnumber
WHERE usr21~bname = sy-uname .

IF sy-subrc = 0 .
CONCATENATE name_last name_first INTO l_name .
ELSE .
l_name = sy-uname .
ENDIF.
CLEAR name_first .
CLEAR name_last .

" 拼接制表日期
CONCATENATE sy-datum+0(4) '.'
sy-datum+4(2) '.'
sy-datum+6(2) INTO l_date .

lc_text = 'ALV_HTML表头'.

" 开始输出表头标题
CONCATENATE  '<HTML><CENTER><H1>' lc_text '测试' '</H1></CENTER></HTML>' INTO m_buffer.

CALL METHOD p_cl_dd->html_insert
EXPORTING
contents = m_buffer
CHANGING
position = m_p.

" 输出制表人和制表日期
CONCATENATE '<P ALIGN = CENTER >出表人： ' l_name
'                  '
'                  '
'                  '
'                  '
'                  '
'                  '
' 出表日期：' l_date INTO m_buffer .

CALL METHOD p_cl_dd->html_insert
EXPORTING
contents = m_buffer
CHANGING
position = m_p.

CALL METHOD p_cl_dd->new_line.     "换行
CALL METHOD p_cl_dd->new_line.

DATA text TYPE sdydo_text_element. "Dynamic Documents

CONCATENATE sy-uzeit+0(2) ':'      "拼接制表时间
sy-uzeit+2(2) ':'
sy-uzeit+4(2) INTO text.

CONCATENATE '时间:  ' text INTO text.

CALL METHOD p_cl_dd->add_text  "插入文本
EXPORTING
text         = text
sap_emphasis = 'Strong'.
CALL METHOD p_cl_dd->add_gap    "插入位置
EXPORTING
width = 2.
CALL METHOD p_cl_dd->add_icon  " 插入图片
EXPORTING
sap_icon = 'ICON_DATE'.
ENDFORM.                    " f_top_of_page1

   CALL METHOD p_cl_dd->underline. 画一条横线

   CALL METHOD p_cl_dd->add_text
    EXPORTING
        text          = text
*      TEXT_TABLE   =
*      FIX_LINES       =
*      SAP_STYLE      = cl_dd_document=>WARNING
        sap_color       = cl_dd_document=>list_total_int
      sap_fontsize    = cl_dd_document=>large
        sap_fontstyle   = cl_dd_document=>serif
        sap_emphasis = cl_dd_document=>emphasis "加粗还是斜体 STRONG是加粗
*      STYLE_CLASS   =
*  CHANGING
*      DOCUMENT      = .

例：

   CALL METHOD p_cl_dd->add_text
     EXPORTING
      text         = text
      sap_emphasis = 'Strong'
      sap_style = 'Key'.                         " 显示文字的STYLE设置

   问题1：

   若ALVHTML表头，出现了滚动条，不能整个显示ALV HTML的内容，则

   在Call function 'REUSE_ALV_GRID_DISPLAY_LVC'

      Exporting

      i_callback_html_top_of_page       = 'F_TOP_OF_PAGE1'    "调用ALV表头显示FORM

      I_HTML_HEIGHT_TOP                   = 23 .                             "指定ALV表头宽度

效果：

CALL METHOD p_cl_dd->add_link
    EXPORTING
*      NAME                   =
      url                    = 'http://www.baidu.com'
      tooltip                = '百度'
      text                   = 'BaiDu连接'
*      DESTINATION_IN_DOC_SET =
*      DESTINATION_IN_DOC_POS =
*      TABINDEX               =
*      HOTKEY                 =
*    IMPORTING
*      LINK                   = .

效果：

Use

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签： class sap buffer date string html

相关文章推荐

新的分享

章节导航