anchor.diff:  
     ENDMETHOD.  "on_screen_event
   
  +
  +  METHOD enrich_title_by_hostname.
  +
  +    DATA lv_host TYPE string.
  +
  +    FIND REGEX 'https?://([^/^:]*)' IN iv_repo_url SUBMATCHES lv_host.
  +    IF lv_host IS NOT INITIAL AND lv_host NE space.
  +      CLEAR: s_title.
  +      CONCATENATE 'Login:' lv_host INTO s_title IN CHARACTER MODE SEPARATED BY space.
  +    ENDIF.
  +
  +  ENDMETHOD.
  +
   ENDCLASS. " lcl_password_dialog IMPLEMENTATION
  
positive.code: 
    PRIVATE SECTION.
      CLASS-DATA gv_confirm TYPE abap_bool.
  
  ENDCLASS. "lcl_password_dialog DEFINITION
  
  
negative.code:     p_url      = iv_repo_url.
      p_user     = cv_user.
      gv_confirm = abap_false.
  
  
      enrich_title_by_hostname( iv_repo_url ).
  
      CALL SELECTION-SCREEN c_dynnr STARTING AT 5 5 ENDING AT 60 8.
  
  