fix error message (#425)

This commit is contained in:
oblomov 2023-07-26 19:52:32 +02:00 committed by GitHub
parent f09ef6abf1
commit 2567e31b68
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 5 additions and 11 deletions

View File

@ -1006,19 +1006,15 @@ CLASS z2ui5_lcl_fw_app IMPLEMENTATION.
ms_error-x_error = ms_error-x_error->previous.
ENDWHILE.
* ms_error-x_error->get_source_position( IMPORTING program_name = DATA(lv_prog) ).
DATA(lv_txt) = ms_error-x_error->get_text( ).
* DATA(lv_classname) = segment( val = lv_prog index = 1 sep = `=` ).
* DATA(lv_link2) = client->get( )-s_config-origin && `/sap/bc/adt/oo/classes/` && lv_classname && `/source/main`.
* DATA(lv_source) = `<p><a href="` && lv_link2 && `" style="color:blue; font-weight:600;">Source Code</a></p>`.
DATA(lv_descr) = escape( val = lv_txt format = cl_abap_format=>e_xml_attr ).
DATA(ls_get) = client->get( ).
DATA(lv_url) = ls_get-s_config-origin && ls_get-s_config-pathname.
SHIFT lv_url LEFT DELETING LEADING ` `.
DATA(lv_url_app) = lv_url && ls_get-s_config-search.
"`?app_start=` && lv_classname.
lv_url = escape( val = lv_url format = cl_abap_format=>e_xml_attr ).
lv_url_app = escape( val = lv_url_app format = cl_abap_format=>e_xml_attr ).
DATA(lv_xml) = `<mvc:View ` && |\n| &&
` xmlns="sap.m" ` && |\n| &&
@ -1054,9 +1050,7 @@ CLASS z2ui5_lcl_fw_app IMPLEMENTATION.
` />` &&
`<Button ` && |\n| &&
` press="` && client->_event_client( action = client->cs_event-location_reload t_arg = VALUE #( ( lv_url_app ) ) ) && `" ` && |\n| &&
` text="Restart" ` && |\n| &&
` ` && |\n| &&
` /></additionalContent></IllustratedMessage></Shell></mvc:View>`.
` text="Restart" /></additionalContent></IllustratedMessage></Shell></mvc:View>`.
client->view_display( lv_xml ).

View File

@ -181,7 +181,7 @@ CLASS z2ui5_cl_xml_view DEFINITION
!src TYPE clike OPTIONAL
RETURNING
VALUE(result) TYPE REF TO z2ui5_cl_xml_view .
METHODS tilecontent
METHODS tile_content
IMPORTING
!unit TYPE clike OPTIONAL
!footer TYPE clike OPTIONAL
@ -3177,7 +3177,7 @@ CLASS Z2UI5_CL_XML_VIEW IMPLEMENTATION.
ENDMETHOD.
METHOD tilecontent.
METHOD tile_content.
result = _generic( name = `TileContent`
ns = ``