I_ChmlSuplrMatlActiveDraft

--Label of view
@EndUserText.label: 'Chemical Supplier Material with Active and Draft Data'

@AbapCatalog:
{
  -- SQL view name (16 characters)
  sqlViewName: 'ICSMADR',

  --If it's true, the filter conditions are compared and, if they match, the associated join expression is evaluated only once
  compiler.compareFilter: true,
  preserveKey: true
}

--Access Control: Authorizations Checks
@AccessControl:
{
  authorizationCheck: #CHECK,
  // blocking of personal data required because of link to business partner / supplier

  personalData.blocking: #REQUIRED
}

--Client Handling of the view
@ClientHandling.algorithm: #SESSION_VARIABLE

--VDM view type
@VDM.viewType: #COMPOSITE


@ObjectModel:
{
  --Performance Annotations
  usageType:
  {
    dataClass: #MIXED,
    sizeCategory: #M,
    serviceQuality: #C
  }
}

define view I_ChmlSuplrMatlActiveDraft
  --Select data from basic view of supplier material
  as select from           I_ChmlSuplrMatl      as SupplierMaterial
  --join data from draft table of supplier material
    left outer to one join I_ChmlSuplrMatlDraft as SupplierMaterialDraft on  SupplierMaterial.ChmlSuplrMatlUUID      = SupplierMaterialDraft.ActiveChmlSuplrMatlUUID
                                                                         and SupplierMaterialDraft.LastChangedByUser = $session.user
{
      --UUID of active supplier material
  key SupplierMaterial.ChmlSuplrMatlUUID              as ActiveChmlSuplrMatlUUID,

      SupplierMaterial.ResponsibleUnit                as ResponsibleUnit,

      --UUID of active or draft supplier material
      case
        when SupplierMaterialDraft.ChmlSuplrMatlUUID is not null then SupplierMaterialDraft.ChmlSuplrMatlUUID
        else SupplierMaterial.ChmlSuplrMatlUUID
      end                                             as ChmlSuplrMatlUUID,

      --Indicator: Is Active Entity
      cast( case
              when SupplierMaterialDraft.ChmlSuplrMatlUUID is not null then ' '
              else 'X'
            end as sdraft_is_active preserving type ) as ChmlSuplrMatlIsActiveEntity,
      
      // needed for DCL

      SupplierMaterial.BusinessPartnerSupplier,
      SupplierMaterial._BusinessPartnerSupplier
            
}