anchor.diff:          badi         = ls_badi_definition
           filter_obj   = lo_filter_object
         TABLES
  -        fcodes       = lt_function_codes
  -        cocos        = lt_control_composites
  -        intas        = lt_customer_includes
  -        scrns        = lt_screens
  +        fcodes       = ls_classic_badi_implementation-function_codes
  +        cocos        = ls_classic_badi_implementation-control_composites
  +        intas        = ls_classic_badi_implementation-customer_includes
  +        scrns        = ls_classic_badi_implementation-screens
           methods      = lt_methods
         EXCEPTIONS
           read_failure = 1
  
positive.code:     INTERFACES lif_object.
  
    PRIVATE SECTION.
      CONSTANTS: BEGIN OF co_badi_component_name,
                   filters            TYPE string VALUE 'FILTERS',
                   function_codes     TYPE string VALUE 'FUNCTION_CODES',
  
negative.code: 
      lv_package = iv_package.
  
      CREATE OBJECT lo_filter_values_object
        EXPORTING
          filter_object = lo_filter_object
          filter_values = ls_classic_badi_implementation-filters.
  
      CALL FUNCTION 'SXO_IMPL_SAVE'
        EXPORTING
          impl             = ls_classic_badi_implementation-implementation_data
          flt_ext          = lv_filter_type_enhanceability
          filter_val_obj   = lo_filter_values_object
          genflag          = abap_true
          no_dialog        = abap_true
        TABLES
          fcodes_to_insert = ls_classic_badi_implementation-function_codes
          cocos_to_insert  = ls_classic_badi_implementation-control_composites
          intas_to_insert  = ls_classic_badi_implementation-customer_includes
          sscrs_to_insert  = ls_classic_badi_implementation-screens
        CHANGING
          korrnum          = lv_korrnum
          devclass         = lv_package
  