Smart Table and Variants

The class

" @keywords smarttable smartfilterbar variant management annotations controlconfiguration odata
" @summary with variant management - UI_PRODUCTLIST
CLASS z2ui5_cl_smps_app_313 DEFINITION PUBLIC.

  PUBLIC SECTION.
    INTERFACES z2ui5_if_app.

    " No attributes: the two smart controls below are driven by the OData
    " service, not by a model this class serializes. Everything a PUBLIC
    " attribute would hold travels to the browser on every roundtrip.

  PROTECTED SECTION.
  PRIVATE SECTION.
ENDCLASS.


CLASS z2ui5_cl_smps_app_313 IMPLEMENTATION.

  METHOD z2ui5_if_app~main.

    IF client->check_on_navigated( ).

      " An earlier revision of this app ran the same two smart controls against
      " the BookingSupplement entity of /sap/opu/odata/DMO/API_TRAVEL_U_V2/. It
      " was kept here commented out and is gone with the move to
      " z2ui5_cl_ui5_view_builder - the service and entity set are the only part
      " of it that was not already in the code below.

      DATA(view) = z2ui5_cl_ui5_view_builder=>factory(
          )->ele( n = `View` ns = `mvc`
              )->a( n = `displayBlock`         v = `true`
              )->a( n = `height`               v = `100%`
              )->a( n = `xmlns`                v = `sap.m`
              )->a( n = `xmlns:mvc`            v = `sap.ui.core.mvc`
              )->a( n = `xmlns:smartFilterBar` v = `sap.ui.comp.smartfilterbar`
              )->a( n = `xmlns:smartTable`     v = `sap.ui.comp.smarttable` ).

      DATA(page) = view->ele( `Shell`
          )->ele( `Page`
              )->a( n = `title`          v = `abap2UI5 - Smart Controls with Variants`
              )->a( n = `showNavButton`  b = client->check_app_prev_stack( )
              )->a( n = `navButtonPress` v = client->_event_nav_app_leave( ) ).

      page->ele( n = `SmartFilterBar` ns = `smartFilterBar`
          )->a( n = `id`             v = `smartFilterBar`
          )->a( n = `entitySet`      v = `ProductType_2`
          )->a( n = `persistencyKey` v = `SmartFilterPKey`
          )->ele( n = `controlConfiguration` ns = `smartFilterBar`
              )->tag( n = `ControlConfiguration` ns = `smartFilterBar`
                  )->a( n = `key`                                      v = `ProductType`
                  )->a( n = `visibleInAdvancedArea`                    b = abap_true
                  )->a( n = `preventInitialDataFetchInValueHelpDialog` b = abap_false ).

      " a statement of its own, so the table is the filter bar's sibling on
      " the page - chained behind an end( ) it landed INSIDE the filter bar,
      " in the content aggregation of the Grid the FilterBar extends
      page->ele( n = `SmartTable` ns = `smartTable`
          )->a( n = `id`                      v = `smartFiltertable`
          )->a( n = `smartFilterId`           v = `smartFilterBar`
          )->a( n = `tableType`               v = `ResponsiveTable`
          )->a( n = `editable`                b = abap_false
          )->a( n = `initiallyVisibleFields`  v = `ProductType,ProductType_Text`
          )->a( n = `entitySet`               v = `ProductType_2`
          )->a( n = `useVariantManagement`    b = abap_true
          )->a( n = `useExportToExcel`        b = abap_true
          )->a( n = `useTablePersonalisation` b = abap_true
          )->a( n = `header`                  v = `Test`
          )->a( n = `showRowCount`            b = abap_true
          )->a( n = `enableExport`            b = abap_false
          )->a( n = `enableAutoBinding`       b = abap_false ).

      client->view_display( val = view->stringify( ) switch_default_model_path = `/sap/opu/odata/sap/UI_PRODUCTLIST/` ).

    ENDIF.

  ENDMETHOD.

ENDCLASS.