anchor.diff:        RETURN.
       ENDIF.
   
  +    " If alias contains package, remove it
  +    lv_paket = ls_header-paket && '/'.
  +    IF ls_header-alias_name CS lv_paket.
  +      ls_header-alias_name = replace(
  +        val  = ls_header-alias_name
  +        sub  = lv_paket
  +        with = '/'
  +        occ  = 1 ).
  +    ENDIF.
  +
       CLEAR: ls_header-paket,
              ls_header-crea_name,
              ls_header-crea_tstut,
  
positive.code: 
        ls_paket-paket = iv_package.
  
        CALL FUNCTION 'SOTR_CREATE_CONCEPT'
          EXPORTING
            paket                         = ls_paket
            crea_lan                      = <ls_sotr>-header-crea_lan
            alias_name                    = <ls_sotr>-header-alias_name
            object                        = lv_object
            entries                       = <ls_sotr>-entries
            concept_default               = <ls_sotr>-header-concept
  
negative.code:   METHOD get_sotr_4_concept.
  
      DATA: ls_header  TYPE zif_abapgit_definitions=>ty_sotr-header,
            lv_paket   LIKE ls_header-alias_name,
            lt_entries TYPE zif_abapgit_definitions=>ty_sotr-entries.
  
      FIELD-SYMBOLS: <ls_entry> LIKE LINE OF lt_entries.
  