P_AllocationSegmentCalc

@AbapCatalog.sqlViewName: 'PALOSEGMENTCALC'
@AbapCatalog.compiler.compareFilter: true
//@EndUserText.label: 'Allocation Segment Calculated Fields'

@AccessControl.authorizationCheck: #NOT_REQUIRED
@AccessControl.personalData.blocking: #NOT_REQUIRED

@ClientHandling.algorithm: #SESSION_VARIABLE

@ObjectModel.usageType.dataClass: #CUSTOMIZING
@ObjectModel.usageType.serviceQuality: #A
@ObjectModel.usageType.sizeCategory: #M

@VDM.viewType: #CONSUMPTION
@VDM.private: true
define view P_AllocationSegmentCalc as 
//select from I_AllocationSegment

select from I_AllocationSegmentTP  
{
  //I_AllocationSegment 

  //key DatabaseTable,

  key AllocationType, 
  key AllocationCycle, 
  key AllocationCycleStartDate, 
  key AllocationCycleSegment,  
  cast(case         
        when AllocationSegmentIsLocked = 'X'      
          then 'L'
        else   
          'A'
       end as fco_allocation_status) as AllocationStatus,
  case when AllocationSegmentIsLocked = 'X'
        then 1 //red

        else 3 //green

      end as CriticalityCode        
}