P_EntProjProjectRespPersn

@AbapCatalog.sqlViewName: 'PENTPPROJRESPPER'
@AbapCatalog.compiler.compareFilter: true
@AbapCatalog.preserveKey: true

@VDM.private: true
@VDM.viewType: #COMPOSITE

@ObjectModel.usageType.serviceQuality: #C
@ObjectModel.usageType.sizeCategory: #S
@ObjectModel.usageType.dataClass: #ORGANIZATIONAL

@AccessControl.authorizationCheck: #NOT_REQUIRED
@ClientHandling.algorithm: #SESSION_VARIABLE

@EndUserText.label: 'Enterprise Project Responsible Person'

define view P_EntProjProjectRespPersn

  as select from I_Project as Project
{
      //Project.ResponsiblePerson, //responsible person is no longer filled on cloud --> empty key field

      Project._EntProjProjectRespPersn.PersonWorkAgreement as ResponsiblePerson,
      Project._EntProjProjectRespPersn._WorkforcePerson.PersonExternalID     as Employee,
      Project._EntProjProjectRespPersn._WorkforcePerson.PersonFullName       as EmployeeFullName,
      Project._EntProjProjectRespPersn._WorkforcePerson._BusinessUser.UserID as ProjManagerUserID,
      cast ( '00000000' as persno preserving type )                         as ProjectResponsiblePerson,

      //Access control fields

      cast(  '' as blocked preserving type ) as ResponsiblePersonIsBlocked,      
      Project._EntProjProjectRespPersn._WorkforcePerson.AuthorizationGroup,
      Project._EntProjProjectRespPersn._BusinessPartner.IsBusinessPurposeCompleted //,

      
      //Project._ResponsiblePerson        

}
where
 // (

  //     Project.ResponsiblePerson                            =  '00000000'

  //  or Project.ResponsiblePerson                            is null

 // )

 // and  

  Project._EntProjProjectRespPersn.PersonWorkAgreement <> '00000000'
  and  Project._EntProjProjectRespPersn.PersonWorkAgreement is not null

group by
  //Project.ResponsiblePerson,

  Project._EntProjProjectRespPersn.PersonWorkAgreement,
  Project._EntProjProjectRespPersn._WorkforcePerson.PersonExternalID,
  Project._EntProjProjectRespPersn._WorkforcePerson.PersonFullName,
  Project._EntProjProjectRespPersn._WorkforcePerson._BusinessUser.UserID,


  //Access control fields

  Project._EntProjProjectRespPersn._WorkforcePerson.AuthorizationGroup,
  Project._EntProjProjectRespPersn._BusinessPartner.IsBusinessPurposeCompleted;