Please find the Code Snippets to Call a Webdynpro ABAP Application
from a R/3 Transaction
Create a ABAP Program from SE38 and associate a transaction
to it and Call the same.
REPORT ZWD1.
***data declarations
DATA:gv_url_string TYPE string,
gv_url_c(250) TYPE c.
CONSTANTS:gc_login_auth TYPE string VALUE '?sap-system-login-basic_auth=X',
gc_client TYPE string VALUE '&sap-client=',
gc_lang TYPE string VALUE '&sap-language='.
***Get the Url of Webdynpro Applicaion with HTTPS Protocol
CALL METHOD cl_wd_utilities=>construct_wd_url
EXPORTING
application_name = 'WDR_TEST_NAVIGATION'
in_protocol = 'HTTPS'
IMPORTING
out_absolute_url = gv_url_string.
***If the server and port have not got added, try without HTTPS Protocol
IF gv_url_string CS '//:/'.
CALL METHOD cl_wd_utilities=>construct_wd_url
EXPORTING
application_name = 'WDR_TEST_NAVIGATION'
IMPORTING
out_absolute_url = gv_url_string.
***If server and port have still not got added
IF gv_url_string CS '//:/'.
**Raise a Error Message
ENDIF.
ENDIF.
***Build the URL
CONCATENATE gv_url_string
gc_login_auth
gc_client sy-mandt
gc_lang sy-langu
INTO gv_url_c.
***Call the Browser
CALL FUNCTION 'CALL_BROWSER'
EXPORTING
url = gv_url_c
EXCEPTIONS
frontend_not_supported = 1
frontend_error = 2
prog_not_found = 3
no_batch = 4
unspecified_error = 5
OTHERS = 6.
REPORT ZWD1.
***data declarations
DATA:gv_url_string TYPE string,
gv_url_c(250) TYPE c.
CONSTANTS:gc_login_auth TYPE string VALUE '?sap-system-login-basic_auth=X',
gc_client TYPE string VALUE '&sap-client=',
gc_lang TYPE string VALUE '&sap-language='.
***Get the Url of Webdynpro Applicaion with HTTPS Protocol
CALL METHOD cl_wd_utilities=>construct_wd_url
EXPORTING
application_name = 'WDR_TEST_NAVIGATION'
in_protocol = 'HTTPS'
IMPORTING
out_absolute_url = gv_url_string.
***If the server and port have not got added, try without HTTPS Protocol
IF gv_url_string CS '//:/'.
CALL METHOD cl_wd_utilities=>construct_wd_url
EXPORTING
application_name = 'WDR_TEST_NAVIGATION'
IMPORTING
out_absolute_url = gv_url_string.
***If server and port have still not got added
IF gv_url_string CS '//:/'.
**Raise a Error Message
ENDIF.
ENDIF.
***Build the URL
CONCATENATE gv_url_string
gc_login_auth
gc_client sy-mandt
gc_lang sy-langu
INTO gv_url_c.
***Call the Browser
CALL FUNCTION 'CALL_BROWSER'
EXPORTING
url = gv_url_c
EXCEPTIONS
frontend_not_supported = 1
frontend_error = 2
prog_not_found = 3
no_batch = 4
unspecified_error = 5
OTHERS = 6.
Thanks for sharing this Information,
ReplyDeleteGot to learn new things from your Blog on Sap abap.
http://thecreatingexperts.com/sap-abap-training-in-chennai/
Both online and classroom training is provided.
Contact 8122241286