I_PPM_MyTask

@EndUserText.label: 'My Tasks'
@VDM.viewType: #COMPOSITE
@AbapCatalog.sqlViewName: 'IPPMMYTSK'
@AccessControl.authorizationCheck: #PRIVILEGED_ONLY
@AccessControl.personalData.blocking: #NOT_REQUIRED
@ClientHandling.algorithm: #SESSION_VARIABLE
@ObjectModel.usageType.serviceQuality: #X
@ObjectModel.usageType.sizeCategory:  #XL
@ObjectModel.usageType.dataClass:  #MIXED
@ObjectModel.representativeKey: 'TaskUUID'

@UI.headerInfo:{
  typeName:       'Project Task',
  typeNamePlural: 'Project Tasks'
}
@VDM.lifecycle.contract.type:  #SAP_INTERNAL_API

define view I_PPM_MyTask

  as select from P_PPM_DisBusinessPartnerForObj as BusinessPartnerForObject
    inner join            I_PPM_Task                     as Task                  on Task.TaskUUID = BusinessPartnerForObject.ReferencedObjectUUID
    inner join            I_PPM_ProjectSummaryTask       as ProjectSummaryTask    on ProjectSummaryTask.ProjectUUID = Task.ProjectUUID
    inner join            I_PPM_User                     as User                  on User.UserID = $session.user
    left outer join       I_PPM_Text                     as ProjectTextUserLang   on (
         ProjectTextUserLang.LanguageCode                                                                                    = $session.system_language
       )
                                                                                  and(
                                                                                    ProjectTextUserLang.ReferencedObjectUUID = ProjectSummaryTask.ProjectSummaryTaskUUID
                                                                                  )
//    left outer join       I_PPM_Text                     as ProjectTextMasterLang on (

//       ProjectTextMasterLang.LanguageCode                                                                                      = ProjectSummaryTask.MasterLanguage

//     )

//                                                                                  and(

//                                                                                    ProjectTextMasterLang.ReferencedObjectUUID = ProjectSummaryTask.ProjectSummaryTaskUUID

//                                                                                  )

    left outer join       I_PPM_Text                     as TaskTextUserLang      on (
            TaskTextUserLang.LanguageCode                                                                                 = $session.system_language
          )
                                                                                  and(
                                                                                    TaskTextUserLang.ReferencedObjectUUID = Task.TaskUUID
                                                                                  )
    left outer join I_EPPMGlobalSetting as _GlobalSetting on _GlobalSetting.EPPMUsageArea = '0007' and _GlobalSetting.EPPMGlobalSettingsCode = '0053'
//    left outer join       I_PPM_Text                     as _TaskTextMasterLang   on (

//         _TaskTextMasterLang.LanguageCode                                                                                    = ProjectSummaryTask.MasterLanguage

//       )

//                                                                                  and(

//                                                                                    _TaskTextMasterLang.ReferencedObjectUUID = Task.TaskUUID

//                                                                                  )


  association [1..1] to I_PPM_TaskReadyToStart as _ReadyToStart      on _ReadyToStart.TaskUUID = Task.TaskUUID
  association [1..1] to I_Indicator            as _ReadyToStartText  on $projection.IsTaskReadyToStart = _ReadyToStartText.IndicatorValue
  association [1..1] to I_PPM_TaskText         as _ProjectText       on _ProjectText.TaskUUID = ProjectSummaryTask.ProjectSummaryTaskUUID
  association [1..1] to I_PPM_TaskText         as _TaskText          on _TaskText.TaskUUID = Task.TaskUUID
  association [0..1] to I_UnitOfMeasure        as _RemainingWorkUnit on _RemainingWorkUnit.UnitOfMeasure = $projection.RemainingWorkExtQuantityUnit
{
  key Task.TaskUUID                                                                             as TaskUUID,
      Task.ExternalId                                                                           as ExternalId,
      ProjectSummaryTask.ProjectUUID                                                            as ProjectUUID,
      ProjectSummaryTask.ProjectSummaryTaskUUID                                                 as ProjectSummaryTaskUUID,
      Task.TaskProcessingStatus                                                                 as TaskProcessingStatus,
      Task.CreatedByUser                                                                        as CreatedByUser,
      Task.LastChangedByUser                                                                    as LastChangedByUser,
      ProjectSummaryTask.MasterLanguage                                                         as MasterLanguage,
      ProjectSummaryTask.Project                                                                as Project,
      _ProjectText.ObjectName                                                                   as ProjectName,
      _TaskText.ObjectName                                                                      as TaskName,
      ProjectTextUserLang.ObjectName                                                            as ProjectNameUserLanguage,
      ProjectSummaryTask.ProjectName                                                            as ProjectNameMasterLanguage,
      TaskTextUserLang.ObjectName                                                               as TaskNameUserLanguage,
      Task.TaskName                                                                             as TaskNameMasterLanguage,

      Task.LatestFinishDate                 as LatestFinishDateTime,  // this is wrong in C_PPM_MyTask!


      Task.LatestStartDate                  as LatestStartDateTime,   // this is wrong in C_PPM_MyTask!


      @DefaultAggregation: #NONE
      @Semantics.quantity.unitOfMeasure: 'RemainingWorkExtQuantityUnit'
// no cast accroding to DB-Tools, gicers ATC error, so hope the best

//      cast(

        unit_conversion(
          quantity => Task.RemainingWorkQuantityInSeconds,
          source_unit => cast('S' as abap.unit( 3 ) ),
          target_unit => Task.RemainingWorkExtQuantityUnit,
          error_handling => 'KEEP_UNCONVERTED' )                                                as RemainingWorkQuantity,
//       as abap.quan( 16, 2 ) )                                                                                                        as RemainingWorkQuantity,

      @Semantics.unitOfMeasure: true
      Task.RemainingWorkExtQuantityUnit,
      _ReadyToStart.IsTaskReadyToStart                                                          as IsTaskReadyToStart,
      Task.ActualStartDate                                                                      as ActualStartDateTime,
      _Severity.CriticalityCode,
      _Severity.Severity,
      Task._Priority.PriorityCode,
      _GlobalSetting.EPPMSettingsDefaultValue,
      Task._CreatedByUser,
      Task._LastChangedByUser,
      Task._Priority._Text                                                                      as _PriorityText,
      Task._ProcessingStatus,
      Task._Severity,
      Task._Severity._SeverityText                                                              as _SeverityText,
      _ReadyToStart,
      _ReadyToStartText,
      _RemainingWorkUnit,
      _RemainingWorkUnit.UnitOfMeasure,
      _RemainingWorkUnit._Text
}
where
        BusinessPartnerForObject.BusinessPartnerUUID = User.BusinessPartnerUUID
  and(
        Task.ObjectType                              =  'TPO'
    or  Task.ObjectType                              =  'TTO'
  )
  and(
        Task.EarliestStartDateTime                   >= 0
    and Task.EarliestFinishDateTime                  >= 0
  )
  and   Task.ProjectVersionNumber                    =  ' '
  and   Task.IsProjectMilestone                      <> 'X'
  and   Task.TaskParentProcessingStatus <> '21' // note_3328626

  and   Task.TaskParentProcessingStatus <> '41' // note_3385440