P_ProductWorkSchedulingWD

@AbapCatalog.sqlViewName: 'PPRDWORKSCHEDWD'
@VDM.viewType: #COMPOSITE
@VDM.private: true
@ClientDependent: true
@AbapCatalog.compiler.compareFilter: true
//@EndUserText.label: 'Product Work Scheduling Union (draft)'

@AccessControl.authorizationCheck: #NOT_REQUIRED
define view P_ProductWorkSchedulingWD as 
    select from I_ProductWorkScheduling as ActiveDocument
        left outer join P_ProductWorkSchedulingD as DraftDocument on  DraftDocument.ActiveProduct = ActiveDocument.Product
                                                                   and DraftDocument.ActivePlant = ActiveDocument.Plant    
    {
        key cast ( hextobin('00000000000000000000000000000000') as sysuuid_x )      as Draftkey,
        key ActiveDocument.Product                                                    as ActiveProduct,
        key ActiveDocument.Plant                                                    as ActivePlant,
        cast ( hextobin('00000000000000000000000000000000') as sysuuid_x )          as ParentDraftKey,        
        ActiveDocument.Product,
        ActiveDocument.Plant,
        ActiveDocument.MaterialBaseQuantity,
        ActiveDocument.UnlimitedOverDelivIsAllowed,
        ActiveDocument.OverDelivToleranceLimit,
        ActiveDocument.UnderDelivToleranceLimit,
        cast( 'X' as boole_d )                                                      as IsActiveEntity, 
        cast( ' ' as boole_d )                                                      as HasActiveEntity, 
        cast(
        case
          when DraftDocument.DraftKey is null 
          then ' ' 
          else 'X'
        end  as boole_d)                                                                         as HasDraftEntity,
        cast ( hextobin('00000000000000000000000000000000') as sysuuid_x )          as RootDraftKey,
        cast(DraftDocument.rootdraftkey as sysuuid_x )   as DraftAdministrativeDataUUID
    }
    
union all
    
    select from P_ProductWorkSchedulingD as  DraftDocument
        inner join P_ProductPlantD as DraftPlantDocument on  DraftPlantDocument.Draftkey = DraftDocument.ParentDraftKey  
        inner join P_ProductD as DraftRootDocument on DraftRootDocument.Draftkey = DraftDocument.rootdraftkey 
        inner join I_DraftAdministrativeData  as DraftAdministrativeData 
                                                on   DraftAdministrativeData.DraftUUID       = DraftDocument.rootdraftkey
              
{
    key DraftDocument.DraftKey, 
    key DraftDocument.ActiveProduct,
    key DraftDocument.ActivePlant,
    DraftDocument.ParentDraftKey ,  
    DraftRootDocument.product,
    DraftPlantDocument.plant,
    DraftDocument.materialbasequantity,
    DraftDocument.unlimitedoverdelivisallowed,
    DraftDocument.overdelivtolerancelimit,
    DraftDocument.underdelivtolerancelimit,
    cast( ' ' as boole_d )                                                  as IsActiveEntity,
    DraftDocument.HasActiveEntity, 
    cast( ' ' as boole_d )                                                  as HasDraftEntity ,
    DraftDocument.rootdraftkey  ,
    cast(DraftDocument.rootdraftkey as sysuuid_x )   as DraftAdministrativeDataUUID    }
         where
        DraftAdministrativeData.CreatedByUser = $session.user or DraftAdministrativeData.InProcessByUser = $session.user
    

       
  
  
  
  
 /*+[internal] {
"BASEINFO":
{
"FROM":
[
"I_DRAFTADMINISTRATIVEDATA",
"I_PRODUCTWORKSCHEDULING",
"P_PRODUCTD",
"P_PRODUCTPLANTD",
"P_PRODUCTWORKSCHEDULINGD"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/