anchor.diff:          io_xml->add( iv_name = 'AREA_ATTRIBUTES'
                        ig_data = area_attributes ).
   
  -        io_xml->add( iv_name = 'STARTUP_LIST'
  -                     ig_data = startup_list ).
  -
         CATCH cx_root INTO DATA(error).
           lcx_exception=>raise( |Error serializing SHMA { ms_item-obj_name }| ).
       ENDTRY.
  
positive.code:   METHOD lif_object~serialize.
  
      DATA: area_name       TYPE shm_area_name,
            area_attributes TYPE shma_attributes,
            startup_list    TYPE db_startup_table.
  
      area_name = ms_item-obj_name.
  
  
negative.code:       CHANGING
          cg_data = area_attributes ).
  
      TRY.
          CALL METHOD ('\PROGRAM=SAPLSHMA\CLASS=LCL_SHMA_HELPER')=>('INSERT_AREA')
            EXPORTING
              area_name           = area_name
              attributes          = area_attributes
              force_overwrite     = abap_true
              no_class_generation = abap_true
              silent_mode         = abap_true.
  