P_RealTimeMfgOrderReserve

@AbapCatalog.sqlViewName: 'PRTMORSRV'
@AbapCatalog.compiler.compareFilter: true
@AccessControl.authorizationCheck: #NOT_REQUIRED
@ClientHandling.algorithm: #SESSION_VARIABLE
//@EndUserText.label: 'Event-based Order Reserves'

@VDM.viewType: #COMPOSITE
@VDM.private:true
@ObjectModel.usageType.serviceQuality: #C
@ObjectModel.usageType.sizeCategory: #XXL
@ObjectModel.usageType.dataClass: #TRANSACTIONAL
@AbapCatalog.preserveKey:true

define view P_RealTimeMfgOrderReserve
  with parameters
    P_FiscalPeriodStartDate    : budat,
    P_FiscalPeriodEndDate      : budat
  as select from acdoca   as _item
    inner join   I_Ledger as _ledger on  _ledger.Ledger     = _item.rldnr
    //and _ledger.IsLeadingLedger = 'X'  //support only leading leader in CE2005

                                     and _ledger.LedgerType = '' //standard ledger only

{

  key aufnr             as OrderID,
  key rldnr             as Ledger,

      sum(hsl)          as AmountInCompanyCodeCurrency,
      sum(ksl)          as AmountInGlobalCurrency,
      sum(osl)          as AmountInFreeDefinedCurrency1,
      sum(vsl)          as AmountInFreeDefinedCurrency2,
      sum(bsl)          as AmountInFreeDefinedCurrency3,
      sum(csl)          as AmountInFreeDefinedCurrency4,
      sum(dsl)          as AmountInFreeDefinedCurrency5,
      sum(esl)          as AmountInFreeDefinedCurrency6,
      sum(fsl)          as AmountInFreeDefinedCurrency7,
      sum(gsl)          as AmountInFreeDefinedCurrency8,

      /////////////////////////////////////////////////////////////////////////////////////

      // Period Amount Fields

      /////////////////////////////////////////////////////////////////////////////////////

      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                hsl
            end)  as PeriodAmountInCompanyCodeCrcy,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                ksl
            end)          as PeriodAmountInGlobalCurrency,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                osl
            end)        as PeriodAmountInFreeDfndCrcy1,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                vsl
            end)        as PeriodAmountInFreeDfndCrcy2,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                bsl
            end) as PeriodAmountInFreeDfndCrcy3,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                csl
            end) as PeriodAmountInFreeDfndCrcy4,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                dsl
            end) as PeriodAmountInFreeDfndCrcy5,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                esl
            end) as PeriodAmountInFreeDfndCrcy6,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                fsl
            end) as PeriodAmountInFreeDfndCrcy7,
      sum(case
            when (budat >= $parameters.P_FiscalPeriodStartDate and budat <= $parameters.P_FiscalPeriodEndDate) then
                gsl
            end) as PeriodAmountInFreeDfndCrcy8

}
where
      slalittype  = '09110'
  and bttype      = 'EBWP'
  and(
      budat <= $parameters.P_FiscalPeriodEndDate
  )
group by
  aufnr,
  rldnr
 
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"I_LEDGER",
"ACDOCA"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/