anchor.diff:      lv_program_name = main_name( ).
       ls_progdir = read_progdir( lv_program_name ).
   
  +    serialize_texts( iv_prog_name = lv_program_name
  +                     io_xml       = io_xml ).
  +
       IF ls_progdir-subc = 'F'.
         lt_dynpros = serialize_dynpros( lv_program_name ).
         io_xml->add( iv_name = 'DYNPROS'
  
positive.code:   ENDMETHOD.
  
  
    METHOD serialize_xml.
  
      DATA: lt_includes TYPE ty_sobj_name_tt,
  
negative.code:       IMPORTING
          !iv_group      TYPE rs38l-area
          !iv_short_text TYPE tftit-stext .
      METHODS serialize_texts
          IMPORTING
              iv_prog_name TYPE programm
              !io_xml      TYPE REF TO zcl_abapgit_xml_output.
      METHODS deserialize_texts
          IMPORTING
              iv_prog_name  TYPE programm
              !io_xml       TYPE REF TO zcl_abapgit_xml_input.
  ENDCLASS.
  
  
  