zoukankan      html  css  js  c++  java
  • ABAP-container拆分

    1.界面

    2.代码

     1 *&---------------------------------------------------------------------*
     2 *& Report  ZRICO_TEST22
     3 *&
     4 *&---------------------------------------------------------------------*
     5 *&
     6 *&
     7 *&---------------------------------------------------------------------*
     8 report z_sourav_splitter.
     9 
    10 type-pools:cndp.
    11 data:
    12   docking   type ref to cl_gui_docking_container,
    13   splitter  type ref to cl_gui_splitter_container,
    14   splitter1 type ref to cl_gui_splitter_container.
    15 
    16 parameters: p type char1.
    17 at selection-screen output.
    18 
    19   if docking is not bound.
    20     create object docking
    21       exporting
    22         repid     = sy-repid
    23         dynnr     = sy-dynnr
    24         side      = docking->dock_at_left
    25         extension = 800.
    26     if sy-subrc = 0.
    27       check splitter is not bound.
    28       create object splitter
    29         exporting
    30           link_dynnr = sy-dynnr
    31           link_repid = sy-repid
    32           height     = 50
    33           align      = 15
    34           parent     = docking
    35           rows       = 2
    36           columns    = 1.
    37       if sy-subrc = 0.
    38 *      PERFORM publish using:
    39 *       '1' '1' 'DEMOWORD97SAPLOGO',
    40 *       '2' '1' 'ENJOYSAP_LOGO',
    41 *       '1' '2' 'ENJOYSAP_LOGO',
    42 *       '2' '2' 'DEMOWORD97SAPLOGO'.
    43         check splitter1 is not bound.
    44         create object splitter1
    45           exporting
    46             link_dynnr = sy-dynnr
    47             link_repid = sy-repid
    48             height     = 50
    49             align      = 15
    50             parent     = splitter->get_container( row = 1 column = 1 )
    51             rows       = 1
    52             columns    = 2.
    53       endif.
    54     endif.
    55   endif.
    56 
    57 form publish using l_row type any
    58                    l_column type any
    59                    l_logo type w3objid.
    60   data: dock_sub_cont   type ref to cl_gui_container,
    61         url             type cndp_url,
    62         picture_control type ref to cl_gui_picture.
    63 
    64   call method splitter->get_container
    65     exporting
    66       row       = l_row
    67       column    = l_column
    68     receiving
    69       container = dock_sub_cont.
    70 
    71   create object picture_control
    72     exporting
    73       parent = dock_sub_cont.
    74 
    75   call function 'DP_PUBLISH_WWW_URL'
    76     exporting
    77       objid                 = l_logo
    78       lifetime              = cndp_lifetime_transaction
    79     importing
    80       url                   = url
    81     exceptions
    82       dp_invalid_parameters = 1
    83       no_object             = 2
    84       dp_error_publish      = 3
    85       others                = 4.
    86   if sy-subrc = 0.
    87     call method picture_control->load_picture_from_url_async
    88       exporting
    89         url = url.
    90   endif.
    91 endform.
    View Code
  • 相关阅读:
    你能用多长时间停车?
    中国威胁论好像还挺严重的
    热爱生命
    lunix下shell脚本批量获取文件,批量修改文件内容
    sql数据操作的若干心得(二)向表中自动插入自增的ID
    Asp.net开发之旅动态产生控件
    Asp.net开发之旅GridView中嵌入DropDownList的一点心得
    Asp.net开发之旅开发环境
    Asp.net开发之旅简单的引用母版页
    Sql数据操作的若干心得
  • 原文地址:https://www.cnblogs.com/ricoo/p/10184266.html
Copyright © 2011-2022 走看看