anchor.diff:        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.
   
   
  
positive.code:     lv_program_name = main_name( ).
      ls_progdir = read_progdir( lv_program_name ).
  
      IF ls_progdir-subc = 'F'.
        lt_dynpros = serialize_dynpros( lv_program_name ).
        io_xml->add( iv_name = 'DYNPROS'
  
negative.code:   ENDMETHOD.
  
  
    METHOD serialize_texts.
      DATA: lt_tpool_i18n TYPE tt_tpool_i18n,
            lt_tpool      TYPE textpool_table.
  
      FIELD-SYMBOLS <ls_tpool> LIKE LINE OF lt_tpool_i18n.
      " Table d010tinf stores info. on languages in which program is maintained
      " Select all active translations of program texts
      " Skip master language - it was already serialized
      SELECT DISTINCT language
        INTO CORRESPONDING FIELDS OF TABLE lt_tpool_i18n
        FROM d010tinf
        WHERE r3state = 'A'
        AND   prog = iv_prog_name
        AND   language <> mv_language.
  
      SORT lt_tpool_i18n BY language ASCENDING.
      LOOP AT lt_tpool_i18n ASSIGNING <ls_tpool>.
        READ TEXTPOOL iv_prog_name
          LANGUAGE <ls_tpool>-language
          INTO lt_tpool.
        <ls_tpool>-textpool = add_tpool( lt_tpool ).
      ENDLOOP.
  
      IF lines( lt_tpool_i18n ) > 0.
        io_xml->add( iv_name = 'I18N_TPOOL'
                     ig_data = lt_tpool_i18n ).
      ENDIF.
    ENDMETHOD.
  
  
    METHOD serialize_xml.
  
      DATA: lt_includes TYPE ty_sobj_name_tt,
  