I_IntcoValueChainDocStatus

@AbapCatalog:{
  sqlViewName: 'IVCM_ICODOCST',
  compiler.compareFilter: true,
  preserveKey: true
}

@AccessControl.authorizationCheck: #NOT_REQUIRED

@ObjectModel: {
   usageType: {
     dataClass:      #CUSTOMIZING,
     serviceQuality: #C,
     sizeCategory:   #S
   },
   representativeKey: 'IntcoValueChainDocumentStatus'
}

@VDM.lifecycle.contract.type:#SAP_INTERNAL_API
@VDM: {
  viewType: #BASIC
}

@ClientHandling.algorithm: #SESSION_VARIABLE

@EndUserText.label: 'Status of Intercompany Value Chain Document'
define view I_IntcoValueChainDocStatus
  as select from dd07l
  association [0..*] to I_IntcoValueChainDocStsTxt as _Text on $projection.IntcoValueChainDocumentStatus = _Text.IntcoValueChainDocumentStatus
{

  key cast(domvalue_l as vcm_document_status) as IntcoValueChainDocumentStatus,

      case   domvalue_l
         when 'C'   then 3  // Completed

         when 'E'   then 1  // Processed with Errors

         when 'PP'  then 5  // Partially Processed

         when 'PD'  then 2  // Pending

         when 'PR'  then 5  // In Process

         when 'O'   then 0  // Open

         when 'RE'  then 5  // Repeating

         when 'S'   then 5  // Scheduled

         when 'CN'  then 0  // Cancelled

         when 'CP'  then 0  // Cancelled

         when 'D'   then 0  // Deleted

      -- else            0
      end                                     as IntcoValueChainDocStsCritlty,

      _Text
}
where
      dd07l.domname  = 'VCM_DOCUMENT_STATUS'
  and dd07l.as4local = 'A'
  and dd07l.as4vers  = '0000'