P_ProcOrdInspLotUsgeDcsnCodeR

@AbapCatalog.sqlViewName: 'PPROCORDUSDR'
@AbapCatalog.compiler.compareFilter: true
@AbapCatalog.preserveKey: true
@AccessControl.authorizationCheck: #NOT_REQUIRED
@ObjectModel.usageType: {serviceQuality: #C, sizeCategory: #L, dataClass: #TRANSACTIONAL }
@VDM.viewType:  #COMPOSITE
@VDM.private: true
@ClientHandling.algorithm: #SESSION_VARIABLE
//@EndUserText.label: 'Process Order Inspection Lots with Usage Decision Valuation R'

define view P_ProcOrdInspLotUsgeDcsnCodeR
  as select from P_ProcessOrderHeader as _ProcessOrder 
  inner join I_InspectionLot as _InspLot on _InspLot.ManufacturingOrder              = _ProcessOrder.OrderID
//    inner join   I_MfgOrderBasic _ProcessOrder on  _InspLot.ManufacturingOrder              = _ProcessOrder.ManufacturingOrder

//                                               and _ProcessOrder.ManufacturingOrderCategory = '40'

{
  key _ProcessOrder.OrderID as ProcessOrder,
//      _ProcessOrder.ProductionPlant,

//      _ProcessOrder.ProductionSupervisor,

      'R'                              as InspLotUsageDecisionValuation
}
where
       _InspLotUsageDecision.InspLotUsageDecisionValuation = 'R'
  and(
       InspectionLotOrigin                                 = '04'
    or InspectionLotOrigin                                 = '03'
  )
group by
  _ProcessOrder.OrderID
//  _ProcessOrder.ProductionPlant,

//  _ProcessOrder.ProductionSupervisor