CALL FUNCTION 'RSWR_GET_DEPLOY_PORTAL_INFO'
IMPORTING
E_PORTAL_SERVER_PREFIX = my_portal
EXCEPTIONS
NO_PORTAL_CONFIGUED = 1
OTHER = 2.
IF SY-SUBRC <> 0.
ENDIF.
CONTATENATE my_portal '/irj/portal' INTO myurl..
CALL FUNCTION 'PRGN_GENER_EXECUTE_URL'
EXPORTING
node_date = myurl.