Message Box Initial Focus

Shows how to set initial focus to MessageBox button.

Z2UI5_CL_SMPC_APP_036

Controls sap.m UI5 1.84

The facts

Repository: abap2UI5/samples-controls
Class: Z2UI5_CL_SMPC_APP_036
Source file: z2ui5_cl_smpc_app_036.clas.abap ↗
Library: sap.m
UI5 entity: sap.m.MessageBox
Demo kit sample: sap.m.sample.MessageBoxInitialFocus
SAP's own sample: running at sdk.openui5.org ↗
Minimum UI5: 1.84
In the playground: runs in the browser, with no system and nothing installed

Keywords: messagebox, message, box, sap.m, shows, set, initial, focus, verticallayout, text, button

Controls it builds

Read out of the builder chain by the abap2UI5 linter, not from the category this sample is filed under — which is what makes “which samples build one of these” a question the catalogue can answer at all.

Libraries

Run it here

The sample running, in this page — the app on its own, with no editor over it. Switch to Playground with this code

Nothing is installed and nothing is sent anywhere: the ABAP is compiled to JavaScript in this browser and runs against abap2UI5 itself.

The ABAP

z2ui5_cl_smpc_app_036.clas.abap — 104 lines Read it on GitHub ↗

" @keywords messagebox message box sap.m shows set initial focus verticallayout text button
" @summary Shows how to set initial focus to MessageBox button.
CLASS z2ui5_cl_smpc_app_036 DEFINITION PUBLIC.

  PUBLIC SECTION.
    INTERFACES z2ui5_if_app.

  PROTECTED SECTION.
    DATA client TYPE REF TO z2ui5_if_client.

    METHODS view_display.
    METHODS on_event.

  PRIVATE SECTION.
ENDCLASS.


CLASS z2ui5_cl_smpc_app_036 IMPLEMENTATION.

  METHOD z2ui5_if_app~main.

    me->client = client.
    IF client->check_on_navigated( ).
      view_display( ).
    ELSEIF client->check_on_event( ).
      on_event( ).
    ENDIF.

  ENDMETHOD.


  METHOD view_display.

    DATA(view) = z2ui5_cl_ui5_view_builder=>factory( ).

    view->ele( n = `View` ns = `mvc`
        )->a( n = `xmlns`     v = `sap.m`
        )->a( n = `xmlns:mvc` v = `sap.ui.core.mvc`
        )->a( n = `xmlns:l`   v = `sap.ui.layout`

        )->ele( n = `VerticalLayout` ns = `l`
            )->a( n = `id`    v = `messageBoxHost`
            )->a( n = `class` v = `sapUiContentPadding`
            )->a( n = `width` v = `100%`

            )->tag( `Text`
                )->a( n = `text` v = `Different approaches to set Initial focus`

            )->tag( `Button`
                )->a( n = `text`         v = `Action`
                )->a( n = `class`        v = `sapUiSmallMarginBottom`
                )->a( n = `press`        v = client->_event( `INITIAL_FOCUS_ON_ACTION` )
                )->a( n = `width`        v = `250px`
                )->a( n = `ariaHasPopup` v = `Dialog`

            )->tag( `Button`
                )->a( n = `text`         v = `Custom action`
                )->a( n = `class`        v = `sapUiSmallMarginBottom`
                )->a( n = `press`        v = client->_event( `INITIAL_FOCUS_ON_CUSTOM_ACTION` )
                )->a( n = `width`        v = `250px`
                )->a( n = `ariaHasPopup` v = `Dialog` ).

    client->view_display( view->stringify( ) ).

  ENDMETHOD.


  METHOD on_event.

    CASE client->get_event( ).

      WHEN `INITIAL_FOCUS_ON_ACTION`.

        " dependentOn ties the message box to the view's layout lifecycle (original: this.getView())
        client->message_box_display(
          text             = |Initial button focus is set by attribute \n initialFocus: sap.m.MessageBox.Action.CANCEL|
          type             = `warning`
          icon             = `WARNING`
          title            = `Focus on a Button`
          actions          = VALUE #( ( `OK` ) ( `CANCEL` ) )
          emphasizedaction = `OK`
          initialfocus     = `CANCEL`
          dependenton      = `messageBoxHost`
          styleclass       = `sapUiResponsivePadding--header sapUiResponsivePadding--content sapUiResponsivePadding--footer` ).

      WHEN `INITIAL_FOCUS_ON_CUSTOM_ACTION`.

        " dependentOn as above
        client->message_box_display(
          text             = |Initial button focus is set by attribute \n initialFocus: "Custom button" \n Note: The name is not case sensitive|
          type             = `show`
          icon             = `WARNING`
          title            = `Focus on a Custom Action`
          actions          = VALUE #( ( `YES` ) ( `NO` ) ( `Custom Action` ) )
          emphasizedaction = `Custom Action`
          initialfocus     = `Custom Action`
          dependenton      = `messageBoxHost`
          styleclass       = `sapUiResponsivePadding--header sapUiResponsivePadding--content sapUiResponsivePadding--footer` ).

    ENDCASE.

  ENDMETHOD.

ENDCLASS.