Chinaunix首页 | 论坛 | 博客
  • 博客访问: 151524
  • 博文数量: 54
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 508
  • 用 户 组: 普通用户
  • 注册时间: 2013-09-18 09:25
个人简介

好男人就是我,我就是你兵哥

文章分类

全部博文(54)

我的朋友

分类: Web开发

2013-10-11 17:27:20

*在上下文节点中,创建一个EDIT节点,然后在DO_PREPARE_OUT中写入如下代码就行

  data:    lr_collection type ref to cl_crm_bol_entity_col,
            lr_entity     type ref to if_bol_bo_property_access.
           lr_entity = me->typed_context->edit->collection_wrapper->get_current( ).
  CHECK LR_ENTITY IS INITIAL.


  DATA:  lr_ref_any     TYPE REF TO data,
         lr_value_node  TYPE REF TO cl_bsp_wd_value_node.
  data:ls_result  type CRMST_HEADER_OBJECT_BUIL.
    me->typed_context->edit->collection_wrapper->clear( ).
    ls_result-bp_description = '01'.
    ls_result-title_key = '好帮手'.
    GET REFERENCE OF ls_result INTO lr_ref_any.
    CREATE OBJECT lr_value_node
      TYPE
        cl_bsp_wd_value_node
      EXPORTING
        iv_data_ref          = lr_ref_any.
    me->typed_context->edit->collection_wrapper->clear( ).
    me->typed_context->edit->collection_wrapper->add( lr_value_node ).
阅读(546) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~