I_TranspBusPerfMntrFlxblIntvl

@EndUserText:   {label:              'Flxbl Intvl for Transp Bus Perf Mon'}

@ClientHandling.algorithm:           #SESSION_VARIABLE

@Metadata:      {allowExtensions:              true,
                 ignorePropagatedAnnotations:  true}

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

@AccessControl: {authorizationCheck:           #NOT_REQUIRED}

@ObjectModel:   {representativeKey:            'CalendarDate',
                 usageType:                    {serviceQuality: #D,
                                               sizeCategory:   #L,
                                               dataClass:      #MIXED},
                 supportedCapabilities:        #DERIVATION_FUNCTION}

@VDM:           {viewType:                     #COMPOSITE}

@Analytics:     {dataCategory:                 #DIMENSION,
                 internalName:                 #LOCAL}

@VDM.lifecycle.status:#DECOMMISSIONED


define view I_TranspBusPerfMntrFlxblIntvl
  as select from I_CalendarDate
{
  key CalendarDate,
      @ObjectModel.foreignKey.association: '_CalendarYear'
      CalendarYear,
      @ObjectModel.foreignKey.association: '_CalendarQuarter'
      CalendarQuarter,
      @ObjectModel.foreignKey.association: '_CalendarMonth'
      CalendarMonth,
      CalendarWeek,
      CalendarDay,
      @ObjectModel.foreignKey.association: '_YearMonth'
      YearMonth,
      YearQuarter,
      YearWeek,
      @ObjectModel.foreignKey.association: '_WeekDay'
      WeekDay,
      FirstDayOfWeekDate,
      FirstDayOfMonthDate,
      CalendarDayOfYear,
      YearDay,

      cast(cast(case
        when CalendarMonth = '01'
            then concat (cast((cast(CalendarYear as abap.int4) - 1) as abap.char(11)), '11')
        when CalendarMonth = '02'
            then concat (cast((cast(CalendarYear as abap.int4) - 1) as abap.char(11)), '12')
        when CalendarMonth between '03' and '11'
            then concat (CalendarYear, concat ('0', cast((cast(CalendarMonth as abap.int2) - 2) as abap.char(11))))
        when CalendarMonth = '12'
            then concat (CalendarYear, '10')
        else '000000'
      end as abap.numc(6)) as /scmtms/vdm_lmonthstrt_yrmnth preserving type)                                                        as TranspAnlytsIntvlStrtDteYrMnth,

      cast(cast(case
        when CalendarMonth = '01'
          then concat(concat (cast((cast(CalendarYear as abap.int4) - 1) as abap.char(11)), '11'),'01')
        when CalendarMonth = '02'
          then concat(concat (cast((cast(CalendarYear as abap.int4) - 1) as abap.char(11)), '12'), '01')
        when CalendarMonth between '03' and '11'
          then concat (CalendarYear, concat('0',concat (cast((cast(CalendarMonth as abap.int2) - 2) as abap.char(11)), '01')))
        when CalendarMonth = '12'
          then concat (CalendarYear, '1001')
        else '00000000'
      end as abap.dats) as /scmtms/vdm_lmonthstrt_dte preserving type)                                                              as TranspAnlytsIntvlStrtDte,

      cast(cast(cast(case
        when CalendarMonth = '01'
            then concat(concat (cast((cast(CalendarYear as abap.int4) - 1) as abap.char(11)), '11'),'01000000')
        when CalendarMonth = '02'
          then concat(concat (cast((cast(CalendarYear as abap.int4) - 1) as abap.char(11)), '12'), '01000000')
        when CalendarMonth between '03' and '11'
          then concat (CalendarYear, concat('0',concat (cast((cast(CalendarMonth as abap.int2) - 2) as abap.char(11)), '01000000')))
        when CalendarMonth = '12'
          then concat (CalendarYear, '1001000000')
        else '0'
      end as abap.numc(15)) as abap.dec(15,0)) as /scmtms/vdm_intvlstrtmo_dtetme preserving type)                                   as TranspAnlytsIntvlStrtDteTime,

      cast(cast(cast(concat(CalendarDate, '235959') as abap.numc(15)) as abap.dec(15,0)) as /scmtms/vdm_caldate_enddtetme)          as CalendarDateEndDateTime,
      cast(cast(cast(cast('19500101120000' as abap.char(15)) as abap.numc(15)) as abap.dec(15,0)) as /scmtms/vdm_abap_min_datetime) as ABAPMinimumDateTime,
      cast(cast(cast(cast('99991231120000' as abap.char(15)) as abap.numc(15)) as abap.dec(15,0)) as /scmtms/vdm_abap_max_datetime) as ABAPMaximumDateTime,
      cast('19500101' as /scmtms/vdm_abap_min_date)                                                                                 as ABAPMinimumDate,
      cast('99991231' as /scmtms/vdm_abap_max_date)                                                                                 as ABAPMaximumDate,

      /* Associations */
      _WeekDay,
      _CalendarMonth,
      _CalendarQuarter,
      _CalendarYear,
      _YearMonth
}