|
|
51CTO旗下网站
|
|
移动端

2.4 编辑Web Dynpro 应用程序(3)

《SAP Web Dynpro For ABAP开发技术详解-高端应用》本书主要介绍了与SAP Web开发技术——Web Dynpro For ABAP 相关的集成应用和高级应用,还讲解了Web Dynpro For ABAP高端应用的各个技术难点中各元素之间的关联及制约关系。本节为大家介绍编辑Web Dynpro 应用程序。

作者:孙东文来源:机械工业出版社|2017-11-14 15:41

2.4 编辑Web Dynpro 应用程序(3)

选中“Action”选项卡,新建动作GET_NUM 如图2-29 所示。

编辑结果如图2-30 所示。

动作对应事件处理程序编辑如下:

  1. METHOD ONACTIONGET_SUM .  
  2. DATA LO_EL_CONTEXT TYPE REF TO IF_WD_CONTEXT_ELEMENT.  
  3. DATA LS_CONTEXT TYPE WD_THIS->ELEMENT_CONTEXT.  
  4. DATA LV_SUM TYPE WD_THIS->ELEMENT_CONTEXT-SUM.  
  5. * get element via lead selection  
  6. LO_EL_CONTEXT = WD_CONTEXT->GET_ELEMENT( ).  
  7. * @TODO fill attribute  
  8. WDEVENT->GET_DATA(  
  9. EXPORTING  
  10. NAME = 'param' 
  11. IMPORTING  
  12. VALUE = LV_SUM 
  13. ).  
  14. * set single attribute  
  15. LO_EL_CONTEXT->SET_ATTRIBUTE(  
  16. NAME = `SUM`  
  17. VALUE = LV_SUM ).  
  18. ENDMETHOD. 

选中“Methods”选项卡,入站插头FROMMAIN 处理程序如下:

  1. method HANDLEFROMMAIN .  
  2. DATA LO_ND_NODE_TEST TYPE REF TO IF_WD_CONTEXT_NODE.  
  3. DATA LS_NODE_TEST TYPE WD_THIS->ELEMENT_NODE_TEST.  
  4. DATA LT_NODE_TEST TYPE WD_THIS->ELEMENTS_NODE_TEST.  
  5. * navigate from <CONTEXT> to <NODE_TEST> via lead selection  
  6. LO_ND_NODE_TEST=WD_CONTEXT->GET_CHILD_NODE( NAME=WD_THIS->WDCTX_NODE_TEST)  
  7. LO_ND_NODE_TEST->INVALIDATE( ).  
  8. * @TODO compute values  
  9. MOVE '语文' TO LS_NODE_TEST-SUBJECTS.  
  10. MOVE WD_COMP_CONTROLLER->TEST-ZZTENKOK TO LS_NODE_TEST-TEST.  
  11. APPEND LS_NODE_TEST TO LT_NODE_TEST.  
  12. MOVE '数学' TO LS_NODE_TEST-SUBJECTS.  
  13. MOVE WD_COMP_CONTROLLER->TEST-ZZTENSAN TO LS_NODE_TEST-TEST.  
  14. APPEND LS_NODE_TEST TO LT_NODE_TEST.  
  15. MOVE '自然' TO LS_NODE_TEST-SUBJECTS.  
  16. MOVE WD_COMP_CONTROLLER->TEST-ZZTENRIK TO LS_NODE_TEST-TEST.  
  17. APPEND LS_NODE_TEST TO LT_NODE_TEST.  
  18. MOVE '思品' TO LS_NODE_TEST-SUBJECTS.  
  19. MOVE WD_COMP_CONTROLLER->TEST-ZZTENSHA TO LS_NODE_TEST-TEST.  
  20. APPEND LS_NODE_TEST TO LT_NODE_TEST.  
  21. *  
  22. LO_ND_NODE_TEST->BIND_TABLE( NEW_ITEMS = LT_NODE_TEST SET_INITIAL_ELEME  
  23. NTS = ABAP_FALSE ).  
  24. endmethod. 

6)在ABAP 工作台中的窗体编辑界面编辑视图间导航链接。

在左侧程序的树形结构菜单上双击窗体W_FLASHISLAND,选中“Window”选项卡,编辑导航如图2-31 所示。

7)在ABAP 工作台中的Web Dynpro Application 编辑界面创建Web Dynpro Application,如图2-32 所示。


喜欢的朋友可以添加我们的微信账号:

51CTO读书频道二维码


51CTO读书频道活动讨论群:365934973

【责任编辑:book TEL:(010)68476606】

回书目   上一节   下一节
点赞 0
分享:
大家都在看
猜你喜欢

读 书 +更多

Solaris 内核结构(第2版)

本书描述了Solaris 10和OpenSolaris内核中所有主要子系统的算法和数据结构,对第1版进行了大幅修订,加入了很多新的内容。全书从头到尾都采...

订阅51CTO邮刊

点击这里查看样刊

订阅51CTO邮刊