anchor.diff:    PUBLIC SECTION.
       METHODS lif_gui_page~render   REDEFINITION.
   
  +  PRIVATE SECTION.
  +    METHODS styles
  +      RETURNING VALUE(ro_html) TYPE REF TO lcl_html_helper.
  +
   ENDCLASS.
   
   CLASS lcl_gui_page_main IMPLEMENTATION.
  
positive.code: 
      CREATE OBJECT ro_html.
  
      ro_html->add( header( ) ).
      ro_html->add( title( iv_page_title = 'DATABASE PERSISTENCY' ) ).
  
      ro_html->add( '<div id="toc">' ).
      ro_html->add( '<table>' ).
      ro_html->add( '<tr>' ).
      ro_html->add( '<td><b>Type</b></td>' ).
      ro_html->add( '<td><b>Value</b></td>' ).
      ro_html->add( '<td><b>Data</b></td>' ).
      ro_html->add( '</tr>' ).
  
      LOOP AT lt_data ASSIGNING <ls_data>.
        lv_escaped = escape( val    = <ls_data>-data_str(150)
                             format = cl_abap_format=>e_html_attr ).
  
        lv_encode = lcl_html_action_utils=>dbkey_encode( <ls_data> ).
  
        ro_html->add( '<tr>' ).
        ro_html->add( '<td valign="top">' && <ls_data>-type && '</td>' ).
        ro_html->add( '<td valign="top">' && <ls_data>-value && '</td>' ).
        ro_html->add( '<td><pre>' && lv_escaped && '</pre>' ).
        ro_html->add( '<br><br>' ).
        ro_html->add( '<a href="sapevent:db_display?' && lv_encode && '">Display</a>' ).
        ro_html->add( '<a href="sapevent:db_edit?' && lv_encode && '">Edit</a>' ).
        ro_html->add( '<a href="sapevent:db_delete?' && lv_encode && '">Delete</a></td>' ).
        ro_html->add( '</tr>' ).
      ENDLOOP.
  
  
negative.code: 
      DATA: lt_data    TYPE lcl_persistence_db=>tt_content,
            lv_escaped TYPE string,
            lv_action  TYPE string,
            lo_db      TYPE REF TO lcl_persistence_db,
            lo_toolbar TYPE REF TO lcl_html_toolbar.
  
      FIELD-SYMBOLS: <ls_data> LIKE LINE OF lt_data.
  
  