设为首页 收藏本站
查看: 1199|回复: 0

[经验分享] 【原创】【ABAP】Opening SAP Transaction Code in SAP GUI Window from WebDynpro through

[复制链接]
累计签到:6 天
连续签到:1 天
发表于 2015-9-18 10:53:33 | 显示全部楼层 |阅读模式
  有很多种方法在浏览器中打开SAP GUI窗口
  第一种方式:在portal中创建带有TCode的iview,在webdynpro中调用该iview。可参考以下链接,说明很详细,还带有图片。
  http://www.saptechnical.com/Tutorials/WebDynproABAP/SAPGUI/Index.htm
  第二种方式:在桌面建立一个sap的shortcut,配置好相关信息后,把该文件上传至MIME repository,然后webdynpro中直接打开该文件。操作步骤如下:
  1. Create an SAP shortcut on the desktop. Choose 'Transaction' as type, input the Tcode,system, client, login id, password, etc.
DSC0000.png
  2. Upload this shortcut file to MIME repository of your WebDynpro. Find its path in the server.
  3. Create a new action, write the code as below.



METHOD onactionopense80 .
DATA: lo_window_manager TYPE REF TO if_wd_window_manager,
lo_api_component  TYPE REF TO if_wd_component,
lo_window         TYPE REF TO if_wd_window,
lv_url            TYPE string.
lo_api_component = wd_comp_controller->wd_get_api( ).
lo_window_manager = lo_api_component->get_window_manager( ).
lv_url = 'http://hostserver:50075/sap/bc/webdynpro/sap/yzr_test/se80.sap'.
lo_window_manager->create_external_window(
EXPORTING
url = lv_url
RECEIVING
window = lo_window ).
lo_window->open( ).
ENDMETHOD.

  here, yzr_test is your webdynpro component name; se80.sap is your shortcut name.
  4. Done and test.
  第三种方式:利用ICF service 去动态创建shortcut,而不是从MIME中读取文件。这种方式与第二种有点类似,只是获取shortcut的方式不同。
  操作步骤如下:
  1. 创建一个ICF service,在绑定的class中调用SWN_CREATE_SHORTCUT function module来产生我们需要的shortcut。通过request->get_form_field来接受传递过来的参数。为了返回文件形式的http response,我们需要在http头上加上'application/x-sapshortcut'标识。



METHOD if_http_extension~handle_request.
DATA lv_ftorg  TYPE string.
DATA lv_content TYPE string.
lv_ftorg = server->request->get_form_field( 'ftorg' ).
IF lv_ftorg IS INITIAL.
RETURN.
ENDIF.
CALL METHOD create_shortcut(
EXPORTING
iv_ftorg   = lv_ftorg
IMPORTING
ev_content = lv_content ).
server->response->set_header_field(
name  = 'Content-Type'
value = 'application/x-sapshortcut' ).
server->response->set_cdata( lv_content ).
ENDMETHOD.

  
create_shortcut内的代码:
  




  CALL FUNCTION 'SWN_CREATE_SHORTCUT'
EXPORTING
i_transaction           = 'SE80'
i_parameter             = 'S_FTORG-LOW=FTO_FR2200'
i_sysid                 = sy-sysid
i_client                = sy-mandt
i_user                  = sy-uname
i_language              = sy-langu
i_windowsize            = 'Maximized'
*     i_windowsize            = 'Normal window'
IMPORTING
shortcut_string         = rv_content
EXCEPTIONS
inconsistent_parameters = 1
OTHERS                  = 2.
IF sy-subrc <> 0.
*   MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*           WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

  这里,如果需要启动transaction code的时候跳过第一个屏幕,我们可以加一个星号在给定的i_transaction参数里,比如:‘*SE80’. 效果相当于CALL TRANSACTION 'SE80' AND SKIP FIRST SCREEN中的AND SKIP FIRST SCREEN功能。另外SWN_CREATE_SHORTCUT有一个限制,就是传入的tcode不能超过20个字符。如果你的tcode超过20个字符,比如在我的tcode之前加一个*号后达到21个字符,就没办法调用这个function。这时只能自己拼接shortcut的内容了。



  CONCATENATE '[System]' cl_abap_char_utilities=>cr_lf
'Name=' sy-sysid cl_abap_char_utilities=>cr_lf
'Description=' sy-sysid cl_abap_char_utilities=>cr_lf
'Client=' sy-mandt cl_abap_char_utilities=>cr_lf
'[User]' cl_abap_char_utilities=>cr_lf
'Name=' sy-uname cl_abap_char_utilities=>cr_lf
'Language=' sy-langu cl_abap_char_utilities=>cr_lf
'[Function]' cl_abap_char_utilities=>cr_lf
'Title=' cl_abap_char_utilities=>cr_lf
'Command=*SE80 S_FTORG-LOW=' iv_ftorg cl_abap_char_utilities=>cr_lf
'Type=Transaction' cl_abap_char_utilities=>cr_lf
'[Configuration]' cl_abap_char_utilities=>cr_lf
'GuiSize=Maximized' cl_abap_char_utilities=>cr_lf
INTO ev_content.

  2. webdynpro中调用该ICF service.
  http://hostname/sap/gts/yzr_icf_test
  3. done.
  References:
  https://forums.sdn.sap.com/thread.jspa?threadID=257365&tstart=50
  http://www.saptechnical.com/Tutorials/WebDynproABAP/SAPGUI/Index.htm

运维网声明 1、欢迎大家加入本站运维交流群:群②:261659950 群⑤:202807635 群⑦870801961 群⑧679858003
2、本站所有主题由该帖子作者发表,该帖子作者与运维网享有帖子相关版权
3、所有作品的著作权均归原作者享有,请您和我们一样尊重他人的著作权等合法权益。如果您对作品感到满意,请购买正版
4、禁止制作、复制、发布和传播具有反动、淫秽、色情、暴力、凶杀等内容的信息,一经发现立即删除。若您因此触犯法律,一切后果自负,我们对此不承担任何责任
5、所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其内容的准确性、可靠性、正当性、安全性、合法性等负责,亦不承担任何法律责任
6、所有作品仅供您个人学习、研究或欣赏,不得用于商业或者其他用途,否则,一切后果均由您自己承担,我们对此不承担任何法律责任
7、如涉及侵犯版权等问题,请您及时通知我们,我们将立即采取措施予以解决
8、联系人Email:admin@iyunv.com 网址:www.yunweiku.com

所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其承担任何法律责任,如涉及侵犯版权等问题,请您及时通知我们,我们将立即处理,联系人Email:kefu@iyunv.com,QQ:1061981298 本贴地址:https://www.yunweiku.com/thread-115286-1-1.html 上篇帖子: SAP RFC通信模式 下篇帖子: OPEN(SAP) UI5 学习入门系列之一:扫盲与热身(上)
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

扫码加入运维网微信交流群X

扫码加入运维网微信交流群

扫描二维码加入运维网微信交流群,最新一手资源尽在官方微信交流群!快快加入我们吧...

扫描微信二维码查看详情

客服E-mail:kefu@iyunv.com 客服QQ:1061981298


QQ群⑦:运维网交流群⑦ QQ群⑧:运维网交流群⑧ k8s群:运维网kubernetes交流群


提醒:禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.


本站大部分资源是网友从网上搜集分享而来,其版权均归原作者及其网站所有,我们尊重他人的合法权益,如有内容侵犯您的合法权益,请及时与我们联系进行核实删除!



合作伙伴: 青云cloud

快速回复 返回顶部 返回列表