P_RealTimeOrderKeyStatus

@AbapCatalog.sqlViewName: 'PRTORDKST'
@ClientHandling.algorithm: #SESSION_VARIABLE
@ObjectModel.representativeKey: 'ControllingObject'
@ObjectModel.usageType.dataClass: #MASTER
@ObjectModel.usageType.serviceQuality: #B
@ObjectModel.usageType.sizeCategory: #L

@AbapCatalog.compiler.compareFilter: true
@AbapCatalog.preserveKey: true
@AccessControl.authorizationCheck: #NOT_REQUIRED
@VDM.viewType: #COMPOSITE
@VDM.private: true

define view P_RealTimeOrderKeyStatus
  as select from I_StatusObjectStatusBasic
{
  key StatusObject                                as ControllingObject,
  key StatusCode,

      cast( 1 as fco_ord_key_stat_sort_sequence ) as SortSequence,

      case substring(StatusObject, 1, 2)
        when 'OR'
            then substring(StatusObject, 3, 12)
        when 'OP'
            then substring(StatusObject, 3, 12)
        else ''
      end                                         as OrderID
}
where
      StatusCode       = 'I0042' //Partially Released

  and StatusIsInactive = ''

union all select from I_StatusObjectStatusBasic
{
  key StatusObject                                as ControllingObject,
  key StatusCode,

      cast( 2 as fco_ord_key_stat_sort_sequence ) as SortSequence,

      case substring(StatusObject, 1, 2)
        when 'OR'
            then substring(StatusObject, 3, 12)
        when 'OP'
            then substring(StatusObject, 3, 12)
        else ''
      end                                         as OrderID
}
where
      StatusCode       = 'I0002' //Released

  and StatusIsInactive = ''

union all select from I_StatusObjectStatusBasic
{
  key StatusObject                                as ControllingObject,
  key StatusCode,

      cast( 3 as fco_ord_key_stat_sort_sequence ) as SortSequence,

      case substring(StatusObject, 1, 2)
        when 'OR'
            then substring(StatusObject, 3, 12)
        when 'OP'
            then substring(StatusObject, 3, 12)
        else ''
      end                                         as OrderID
}
where
      StatusCode       = 'I0009' //Confirmed

  and StatusIsInactive = ''

union all select from I_StatusObjectStatusBasic
{
  key StatusObject                                as ControllingObject,
  key StatusCode,

      cast( 4 as fco_ord_key_stat_sort_sequence ) as SortSequence,

      case substring(StatusObject, 1, 2)
        when 'OR'
            then substring(StatusObject, 3, 12)
        when 'OP'
            then substring(StatusObject, 3, 12)
        else ''
      end                                         as OrderID
}
where
      StatusCode       = 'I0012' //Delivered

  and StatusIsInactive = ''

union all select from I_StatusObjectStatusBasic
{
  key StatusObject                                as ControllingObject,
  key StatusCode,

      cast( 5 as fco_ord_key_stat_sort_sequence ) as SortSequence,

      case substring(StatusObject, 1, 2)
        when 'OR'
            then substring(StatusObject, 3, 12)
        when 'OP'
            then substring(StatusObject, 3, 12)
        else ''
      end                                         as OrderID
}
where
      StatusCode       = 'I0045' //Technicaly  Completed

  and StatusIsInactive = ''

union all select from I_StatusObjectStatusBasic
{
  key StatusObject                                as ControllingObject,
  key StatusCode,

      cast( 6 as fco_ord_key_stat_sort_sequence ) as SortSequence,

      case substring(StatusObject, 1, 2)
        when 'OR'
            then substring(StatusObject, 3, 12)
        when 'OP'
            then substring(StatusObject, 3, 12)
        else ''
      end                                         as OrderID
}
where
      StatusCode       = 'I0046' //Closed

  and StatusIsInactive = ''