首页
学习
活动
专区
工具
TVP
发布
社区首页 >专栏 >一个SAP CRM WebClient UI component元数据的解析工具

一个SAP CRM WebClient UI component元数据的解析工具

作者头像
Jerry Wang
发布2020-03-11 16:12:56
2370
发布2020-03-11 16:12:56
举报
REPORT ZBSP.
PARAMETERS: name TYPE O2APPLNAME DEFAULT 'SMCHS'.
 types LTYPE_VIEWLINE type CL_BSP_WD_REP_VIEW=>GTYPE_VIEWLINE .
types:
    begin of GTYPE_OP_MAPPING,
             NAME type STRING,
             OP_PLUG type STRING,
             SWITCH_ID    type SFW_SWITCH_ID,
             REACTION     type SFW_SHOWHIDE,
           end of GTYPE_OP_MAPPING .
types:
    begin of GTYPE_IP_FOLLOW_UP,
             NAME type STRING,
             NAVLINK type STRING,
             SWITCH_ID    type SFW_SWITCH_ID,
             REACTION     type SFW_SHOWHIDE,
           end of GTYPE_IP_FOLLOW_UP .
 types:
    begin of GTYPE_NAVLINK,
               NAME         type STRING,
               TARGETS_DONE type FLAG,
               TARGETS      type TBSP_WD_REP_NAVIGATION_TARGETS,
               SFW_DATA     type BSP_WD_SFW_DATA boxed,
             end of GTYPE_NAVLINK .
 types:
    begin of GTYPE_VIEWLINE,
               VIEW              type STRING,
               ACTIVE            type ABAP_BOOL,
               VIEW_ID           type N length 4,
               PARENT_VIEWSET    type STRING,
               PARENT_VIEWAREA   type STRING,
               PARENT            type ref to CL_BSP_WD_REP_VIEW,
               INITIALS          type TBSP_WD_REP_VIEWAREA_ASSIGNS,
               INITIALS_DONE     type ABAP_BOOL,
               NAVLINKS          type sorted table of GTYPE_NAVLINK
                                      with non-unique key NAME
                                      initial size 0,
               REP_VIEW          type ref to CL_BSP_WD_REP_VIEW,
               IS_WINDOW         type ABAP_BOOL,
               IS_INTF_VIEW      type ABAP_BOOL,
               IS_DEFAULT_WINDOW type ABAP_BOOL,
               IP_FOLLOW_UPS     type hashed table of GTYPE_IP_FOLLOW_UP
                                      with unique key NAME
                                      initial size 0,
               OP_MAPPINGS       type hashed table of GTYPE_OP_MAPPING
                                      with unique key NAME
                                      initial size 0,
               SFW_DATA          type BSP_WD_SFW_DATA boxed,
      end of GTYPE_VIEWLINE .
 types:
    LTYPE_VIEW_TAB type hashed table of LTYPE_VIEWLINE
                               with unique key VIEW ACTIVE
                               initial size 0 .
data:   LV_LOADER type ref to CL_BSP_WD_STREAM_LOADER,
        LV_XML    type STRING,
        lv_root   type string.
  create object LV_LOADER.
  LV_XML = LV_LOADER->LOAD_FROM_BSP_PAGE( IV_BSP_APPL                 = name
                                          IV_BSP_PAGE                 = 'Repository.xml' ). "#EC NOTEXT
data:   LT_VIEWS  type LTYPE_VIEW_TAB,
        LT_USAGES type BSP_WD_CMP_USAGE_DESCR_TAB,
        result TYPE REF TO CL_BSP_WD_REPOSITORY.
* "parse" repository xml data directly into memory
  call transformation BSP_WD_RT_REP_RUNTIME
    source xml        lv_xml
    result VIEWS    = LT_VIEWS
           ROOTVIEW = lv_root
           USAGES   = LT_USAGES.
           "PCCNODES = RESULT->INTF_CONTROLLER_CNODES
           "CEVENTS  = RESULT->INTF_CONTROLLER_EVENTS
           "MODEL    = RESULT->BOL_COMPONENT_SET.
BREAK-POINT.
本文参与 腾讯云自媒体分享计划,分享自作者个人站点/博客。
原始发表:2020-03-09 ,如有侵权请联系 cloudcommunity@tencent.com 删除

本文分享自 作者个人站点/博客 前往查看

如有侵权,请联系 cloudcommunity@tencent.com 删除。

本文参与 腾讯云自媒体分享计划  ,欢迎热爱写作的你一起参与!

评论
登录后参与评论
0 条评论
热度
最新
推荐阅读
领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档