anchor.diff:  * See https://github.com/larshp/abapGit/
   
   CONSTANTS: gc_xml_version  TYPE string VALUE 'v0.2-alpha',  "#EC NOTEXT
  -           gc_abap_version TYPE string VALUE 'v0.32'.       "#EC NOTEXT
  +           gc_abap_version TYPE string VALUE 'v0.33'.       "#EC NOTEXT
   
   ********************************************************************************
   * The MIT License (MIT)
  
positive.code:         illegal_language      = 5
          illegal_formtype      = 6
          OTHERS                = 7.
      IF sy-subrc <> 0.
        _raise 'Error from FB_DELETE_FORM'.
      ENDIF.
  
  
negative.code:       CASE <ls_tadir>-object.
          WHEN 'SUSC'.
            <ls_tadir>-korrnum = '5000'.
          WHEN 'TTYP'.
            <ls_tadir>-korrnum = '6000'.
          WHEN 'TABL' OR 'VIEW'.
            <ls_tadir>-korrnum = '7000'.
          WHEN 'DTEL'.
            <ls_tadir>-korrnum = '8000'.
  