anchor.diff:            lv_branch  TYPE t_sha1.
   
   
  -    ref_discovery(
  +    find_branch(
         EXPORTING
           is_repo    = is_repo
           iv_service = lc_service
  
positive.code:           lv_pkt2    TYPE string.
  
  
      ref_discovery(
        EXPORTING
          is_repo    = is_repo
          iv_service = lc_service
  
negative.code:     <ls_field>-fieldname = 'DEVCLASS'.
      <ls_field>-fieldtext = 'Target Package'.                "#EC NOTEXT
  
      APPEND INITIAL LINE TO lt_fields ASSIGNING <ls_field>.
      <ls_field>-tabname   = 'TEXTL'.
      <ls_field>-fieldname = 'LINE'.
      <ls_field>-fieldtext = 'Branch'.                        "#EC NOTEXT
      <ls_field>-value     = 'refs/heads/master'.
      <ls_field>-field_attr = '05'.
  
      lv_icon_ok = icon_okay.
      lv_icon_br = icon_workflow_fork.
  
      CALL FUNCTION 'POPUP_GET_VALUES_USER_BUTTONS'
        EXPORTING
          popup_title       = 'Clone'
          programname       = sy-repid
          formname          = 'BRANCH_POPUP'
          ok_pushbuttontext = 'OK'
          icon_ok_push      = lv_icon_ok
          first_pushbutton  = 'Select branch'
          icon_button_1     = lv_icon_br
        IMPORTING
          returncode        = lv_returncode
        TABLES
          fields            = lt_fields
        EXCEPTIONS
          error_in_fields   = 1
          OTHERS            = 2. "#EC NOTEXT
      IF sy-subrc <> 0.
        _raise 'Error from POPUP_GET_VALUES'.
      ENDIF.
  