P_BOMItemChanges

@AbapCatalog.sqlViewName: 'PBOMITEMCHANGES'
@AbapCatalog.compiler.compareFilter: true
@AbapCatalog.preserveKey: true
@ClientHandling.algorithm: #SESSION_VARIABLE
@VDM.private: true
@VDM.viewType: #BASIC
@AccessControl.authorizationCheck: #NOT_REQUIRED

define view P_BOMItemChanges as select distinct from stas as ItemHistory
    inner join   I_MaterialBOMLink as mast        on  ItemHistory.stlal = mast.BillOfMaterialVariant
                                                  and ItemHistory.stlnr = mast.BillOfMaterial
    inner join   stpo              as ItemChanges on  ItemChanges.stlnr = ItemHistory.stlnr
                                                  and ItemChanges.stlkn = ItemHistory.stlkn
                                                  and ItemChanges.stlty = ItemHistory.stlty
    inner join   I_ChangeMaster    as aenr        on ItemHistory.aennr = aenr.ChangeNumber
{
  key ItemChanges.stlnr     as BillOfMaterial,
  key ItemChanges.stlty     as BillOfMaterialCategory,
  key ItemHistory.stlal     as BillOfMaterialVariant,
  key ItemHistory.aennr     as EngineeringChangeDocument,
  key ItemHistory.bom_versn as BillOfMaterialVersion,
  key mast.Material,
  key mast.Plant,
  key mast.BillOfMaterialVariantUsage,
      aenr.ChangeNumberStatus,
      aenr.ChangeNumberValidFromDate,
      aenr.ChangeNumberCreatedByUser,
      aenr.ChangeNumberCreationDate
}
where
      ItemChanges.stlty = 'M'
  and ItemHistory.stlty = 'M'

//Code added to support Sales Order BOM 

union all select distinct from stas              as ItemHistory
    inner join   I_SalesOrderBOMLink as kdst      on  ItemHistory.stlal = kdst.BillOfMaterialVariant
                                                  and ItemHistory.stlnr = kdst.BillOfMaterial
    inner join   stpo              as ItemChanges on  ItemChanges.stlnr = ItemHistory.stlnr
                                                  and ItemChanges.stlkn = ItemHistory.stlkn
                                                  and ItemChanges.stlty = ItemHistory.stlty
    inner join   I_ChangeMaster    as aenr        on ItemHistory.aennr = aenr.ChangeNumber
{
  key ItemChanges.stlnr     as BillOfMaterial,
  key ItemChanges.stlty     as BillOfMaterialCategory,
  key ItemHistory.stlal     as BillOfMaterialVariant,
  key ItemHistory.aennr     as EngineeringChangeDocument,
  key ItemHistory.bom_versn as BillOfMaterialVersion,
  key kdst.Material,
  key kdst.Plant,
  key kdst.BillOfMaterialVariantUsage,
      aenr.ChangeNumberStatus,
      aenr.ChangeNumberValidFromDate,
      aenr.ChangeNumberCreatedByUser,
      aenr.ChangeNumberCreationDate
}
where
      ItemChanges.stlty = 'K'
  and ItemHistory.stlty = 'K'
  
union all select distinct from stpo_draft_v2  as ItemDraftChanges
  inner join          I_ChangeMaster as aenr on ItemDraftChanges.engineeringchangedocument = aenr.ChangeNumber
  inner join          stko_draft_v2 as  HeaderDraftChanges  on  ItemDraftChanges.parentdraftuuid = HeaderDraftChanges.draftuuid
{
  key ItemDraftChanges.billofmaterial             as BillOfMaterial,
  key ItemDraftChanges.billofmaterialcategory     as BillOfMaterialCategory,
  key ItemDraftChanges.billofmaterialvariantforedit      as BillOfMaterialVariant,
  key ItemDraftChanges.engineeringchangedocument  as EngineeringChangeDocument,
  key ItemDraftChanges.billofmaterialversionforedit      as BillOfMaterialVersion,
  key HeaderDraftChanges.materialforedit  as Material,
  key HeaderDraftChanges.plantforedit as Plant,
  key HeaderDraftChanges.billofmaterialvariantusage as BillOfMaterialVariantUsage,
  aenr.ChangeNumberStatus,
      aenr.ChangeNumberValidFromDate,
      aenr.ChangeNumberCreatedByUser,
      aenr.ChangeNumberCreationDate
}

where
     HeaderDraftChanges.material <> ''
  or HeaderDraftChanges.material is not null
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"I_CHANGEMASTER",
"I_MATERIALBOMLINK",
"I_SALESORDERBOMLINK",
"STAS",
"STKO_DRAFT_V2",
"STPO",
"STPO_DRAFT_V2"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/