anchor.diff:  
     ENDMETHOD.                    "deserialize_textpool
   
  -  METHOD deserialize_cua.
  -
  -    DATA: ls_tr_key TYPE trkey.
  -
  -
  -    IF is_cua-adm IS INITIAL.
  -      RETURN.
  -    ENDIF.
  -
  -    SELECT SINGLE devclass INTO ls_tr_key-devclass
  -      FROM tadir
  -      WHERE pgmid = 'R3TR'
  -      AND object = ms_item-obj_type
  -      AND obj_name = ms_item-obj_name.                  "#EC CI_GENBUFF
  -    IF sy-subrc <> 0.
  -      _raise 'not found in tadir'.
  -    ENDIF.
  -
  -    ls_tr_key-obj_type = ms_item-obj_type.
  -    ls_tr_key-obj_name = ms_item-obj_name.
  -    ls_tr_key-sub_type = 'CUAD'.
  -    ls_tr_key-sub_name = ms_item-obj_name.
  -
  -    sy-tcode = 'SE41'. " evil hack, workaround to handle fixes in note 2159455
  -    CALL FUNCTION 'RS_CUA_INTERNAL_WRITE'
  -      EXPORTING
  -        program   = ms_item-obj_name
  -        language  = gc_english
  -        tr_key    = ls_tr_key
  -        adm       = is_cua-adm
  -        state     = 'I'
  -      TABLES
  -        sta       = is_cua-sta
  -        fun       = is_cua-fun
  -        men       = is_cua-men
  -        mtx       = is_cua-mtx
  -        act       = is_cua-act
  -        but       = is_cua-but
  -        pfk       = is_cua-pfk
  -        set       = is_cua-set
  -        doc       = is_cua-doc
  -        tit       = is_cua-tit
  -        biv       = is_cua-biv
  -      EXCEPTIONS
  -        not_found = 1
  -        OTHERS    = 2.
  -    IF sy-subrc <> 0.
  -      _raise 'error from RS_CUA_INTERNAL_WRITE'.
  -    ENDIF.
  -
  -    lcl_objects_activation=>add( iv_type = 'CUAD'
  -                                 iv_name = ms_item-obj_name ).
  -
  -  ENDMETHOD.                    "deserialize_cua
  -
     METHOD lif_object~serialize.
   
       serialize_program( io_xml   = io_xml
  
positive.code:     deserialize_textpool( lt_tpool ).
  
    ENDMETHOD.                    "lif_serialize~deserialize
  
    METHOD deserialize_dynpros.
  
      DATA: lv_name   TYPE dwinactiv-obj_name,
            ls_dynpro LIKE LINE OF it_dynpros.
  
  
  * ls_dynpro is changed by the function module, a field-symbol will cause
  * the program to dump since it_dynpros cannot be changed
      LOOP AT it_dynpros INTO ls_dynpro.
  
        CALL FUNCTION 'RPY_DYNPRO_INSERT'
          EXPORTING
            header                 = ls_dynpro-header
            suppress_exist_checks  = abap_true
          TABLES
            containers             = ls_dynpro-containers
            fields_to_containers   = ls_dynpro-fields
            flow_logic             = ls_dynpro-flow_logic
          EXCEPTIONS
            cancelled              = 1
            already_exists         = 2
            program_not_exists     = 3
            not_executed           = 4
            missing_required_field = 5
            illegal_field_value    = 6
            field_not_allowed      = 7
            not_generated          = 8
            illegal_field_position = 9
            OTHERS                 = 10.
        IF sy-subrc <> 2 AND sy-subrc <> 0.
          _raise 'error from RPY_DYNPRO_INSERT'.
        ENDIF.
  * todo, RPY_DYNPRO_UPDATE?
  
        CONCATENATE ls_dynpro-header-program ls_dynpro-header-screen
          INTO lv_name RESPECTING BLANKS.
        ASSERT NOT lv_name IS INITIAL.
  
        lcl_objects_activation=>add( iv_type = 'DYNP'
                                     iv_name = lv_name ).
  
      ENDLOOP.
  
    ENDMETHOD.                    "deserialize_dynpros
  
  ENDCLASS.                    "lcl_object_prog IMPLEMENTATION
  
  
negative.code: 
    ENDMETHOD.                    "deserialize_includes
  
    METHOD deserialize_xml.
  
      DATA: lv_complete  TYPE rs38l-area,
  