#332, db display improvement, part2

This commit is contained in:
sbcgua 2016-09-09 17:35:29 +03:00
parent 42474897b3
commit 3bc3763914

View File

@ -27,7 +27,9 @@ CLASS lcl_gui_page_db_display IMPLEMENTATION.
METHOD lif_gui_page~render. METHOD lif_gui_page~render.
DATA: lv_data TYPE lcl_persistence_db=>ty_content-data_str. DATA: lv_data TYPE lcl_persistence_db=>ty_content-data_str,
ls_action TYPE lcl_persistence_db=>ty_content,
lv_action TYPE string.
TRY. TRY.
lv_data = lcl_app=>db( )->read( lv_data = lcl_app=>db( )->read(
@ -36,20 +38,30 @@ CLASS lcl_gui_page_db_display IMPLEMENTATION.
CATCH lcx_not_found ##NO_HANDLER. CATCH lcx_not_found ##NO_HANDLER.
ENDTRY. ENDTRY.
lv_data = lcl_xml_pretty=>print( lv_data ). ls_action-type = ms_key-type.
ls_action-value = ms_key-value.
lv_action = lcl_html_action_utils=>dbkey_encode( ls_action ).
lv_data = escape( val = lv_data lv_data = lcl_xml_pretty=>print( lv_data ).
format = cl_abap_format=>e_html_attr ). lv_data = escape( val = lv_data
format = cl_abap_format=>e_html_attr ).
CREATE OBJECT ro_html. CREATE OBJECT ro_html.
ro_html->add( header( io_include_style = styles( ) ) ). ro_html->add( header( io_include_style = styles( ) ) ).
ro_html->add( title( 'CONFIG DISPLAY' ) ). ro_html->add( title( 'CONFIG DISPLAY' ) ).
ro_html->add( '<div class="db_entry">' ). ro_html->add( '<div class="db_entry">' ).
ro_html->add( '<table class="toolbar"><tr><td>' ).
ro_html->add( |<table class="tag"><tr><td class="label">Type:</td>| && ro_html->add( |<table class="tag"><tr><td class="label">Type:</td>| &&
| <td>{ ms_key-type }</td></tr></table>| ). | <td>{ ms_key-type }</td></tr></table>| ).
ro_html->add( |<table class="tag"><tr><td class="label">Key:</td>| && ro_html->add( |<table class="tag"><tr><td class="label">Key:</td>| &&
| <td>{ ms_key-value }</td></tr></table>| ). | <td>{ ms_key-value }</td></tr></table>| ).
ro_html->add( '</td><td class="right">' ).
ro_html->add_anchor( iv_txt = 'Edit' iv_act = |db_edit?{ lv_action }| ).
ro_html->add( '</td></tr></table>' ).
ro_html->add( |<pre>{ lv_data }</pre>| ). ro_html->add( |<pre>{ lv_data }</pre>| ).
ro_html->add( '</div>' ). ro_html->add( '</div>' ).
@ -77,6 +89,10 @@ CLASS lcl_gui_page_db_display IMPLEMENTATION.
_add ' width: 50em;'. _add ' width: 50em;'.
_add '}'. _add '}'.
_add 'div.db_entry table.toolbar {'.
_add ' width: 50em;'.
_add '}'.
_add 'table.tag {'. _add 'table.tag {'.
_add ' display: inline-block;'. _add ' display: inline-block;'.
_add ' border: 1px #b3c1cc solid;'. _add ' border: 1px #b3c1cc solid;'.