@AbapCatalog.sqlViewName: 'PWBSOBJ'
@ClientHandling.algorithm: #SESSION_VARIABLE
//@EndUserText.label: 'Project Cost Object WBS'
@VDM.private:true
@VDM.viewType: #COMPOSITE
@AccessControl.authorizationCheck: #NOT_REQUIRED
define view P_WBSObject
as select from I_WBSElement as WBSElement
//association [0..*] to P_Objecttypetext as _ObjTypeText on $projection.ObjectType = _ObjTypeText.ObjectType
{
WBSElement.WBSElementInternalID,
WBSElement.ProjectInternalID,
WBSElement.WBSElement,
WBSElement.WBSDescription,
WBSElement.WBSElementObject,
WBSElement.ResponsiblePerson,
WBSElement.ResponsiblePersonName,
WBSElement.ApplicantCode,
WBSElement.ApplicantName,
WBSElement.CompanyCode,
WBSElement.BusinessArea,
WBSElement.ControllingArea,
WBSElement.ProfitCenter,
WBSElement.ProjectType,
WBSElement.WBSElementIsBillingElement,
WBSElement.WBSElementShortID,
WBSElement.ReqgCostCenterControllingArea,
WBSElement.RequestingCostCenter,
WBSElement.RespCostCenterControllingArea,
WBSElement.ResponsibleCostCenter,
WBSElement.PriorityCode,
WBSElement.Currency,
WBSElement.Plant,
WBSElement.FreeDefinedAttribute01,
WBSElement.FreeDefinedAttribute02,
WBSElement.FreeDefinedAttribute03,
WBSElement.FreeDefinedAttribute04,
WBSElement.FreeDefinedIndicator1,
WBSElement.FreeDefinedIndicator2,
WBSElement.FunctionalArea,
WBSElement.BasicStartDate,
WBSElement.ActualStartDate,
WBSElement.BasicEndDate,
WBSElement.ActualEndDate,
WBSElement.SchedldBasicEarliestStartDate,
WBSElement.ScheduledBasicLatestEndDate,
WBSElement.SchedldBasicLatestStartDate,
WBSElement.SchedldBasicEarliestEndDate,
WBSElement.ControllingObjectClass,
WBSElement.WBSElementHierarchyLevel,
WBSElement._Project.Project,
WBSElement._Project.ProjectDescription,
WBSElement._Project.ProjectObject,
substring(WBSElementObject,1,2) as ObjectType,
WBSElement.WBSElement as Object,
WBSElement.WBSElementInternalID as ObjectInternalID,
WBSElement._Project.Currency as ControllingAreaCurrency
//_ObjTypeText
}