C_PurDocListPOAll

@ClientHandling.algorithm: #SESSION_VARIABLE
@ObjectModel.usageType.dataClass: #MIXED
@ObjectModel.usageType.serviceQuality: #C
@ObjectModel.usageType.sizeCategory: #L
@AbapCatalog.sqlViewName: 'CDOCLPOALL'
@EndUserText.label: 'Purchase Order : Header + Item'
@VDM.viewType: #CONSUMPTION
@AccessControl.authorizationCheck: #PRIVILEGED_ONLY
@AccessControl.personalData.blocking: #BLOCKED_DATA_EXCLUDED
@VDM.private : true

define view C_PurDocListPOAll

  as select distinct from I_PurchaseOrderItem as I_PurchaseOrderItem
    left outer join       I_PurchaseOrder     as ekko on I_PurchaseOrderItem.PurchaseOrder = ekko.PurchaseOrder

  association [0..1] to lfa1                     as _Suppl               on  $projection.Supplier = _Suppl.lifnr
  //        association [0..1] to lfa1                           as _Supplyingplant on  $projection.SupplyingPlant  = _Supplyingplant.lifnr

  association [1..1] to C_Purdoclistcalfieldspo  as pdi_calc             on  $projection.PurchaseOrder             = pdi_calc.PurchasingDocument
                                                                         and I_PurchaseOrderItem.PurchaseOrderItem = pdi_calc.PurchasingDocumentItem
  association [1..*] to C_PURDOCLISTWBSELEMENT   as wbsobj               on  $projection.PurchaseOrder             = wbsobj.PurchaseOrder
                                                                         and I_PurchaseOrderItem.PurchaseOrderItem = wbsobj.PurchaseOrderItem
  association [1..1] to P_PurOrditemDeliveryDate as _PurgDocScheduleLine on  $projection.PurchaseOrder     = _PurgDocScheduleLine.PurchasingDocument
                                                                         and $projection.PurchaseOrderItem = _PurgDocScheduleLine.PurchasingDocumentItem


{

      -- Key fields
  key I_PurchaseOrderItem.PurchaseOrder,
  key I_PurchaseOrderItem.PurchaseOrderItem,
  key wbsobj.AccountAssignmentNumber,
      --  Fields from table I_PurchaseOrderItem
      I_PurchaseOrderItem.PurchaseOrderItemText,
      I_PurchaseOrderItem.Material,
      I_PurchaseOrderItem.MaterialGroup,
      I_PurchaseOrderItem.Plant,
      I_PurchaseOrderItem.BaseUnit,
      I_PurchaseOrderItem.StorageLocation,
      I_PurchaseOrderItem.CompanyCode,
      I_PurchaseOrderItem.PurchaseOrderQuantityUnit,
      I_PurchaseOrderItem.OrderPriceUnit                      as  PurchaseOrderPriceUnit,
      I_PurchaseOrderItem.AccountAssignmentCategory           as  AcctAssignmentCategory,
      I_PurchaseOrderItem.PurchasingDocumentDeletionCode      as  IsDeletedItem,
      I_PurchaseOrderItem.ManufacturerMaterial,
      I_PurchaseOrderItem.ManufacturerPartNmbr                as  MfrPartNumber,
      I_PurchaseOrderItem.OrderQuantity                       as  PurchaseOrderQty,
      I_PurchaseOrderItem.NetPriceQuantity                    as  PurchaseOrderNetPriceQuantity,
      I_PurchaseOrderItem.NetPriceAmount                      as  PurchaseOrderNetPriceAmount,
      I_PurchaseOrderItem.NetAmount                           as  PurchaseOrderNetAmount,
      I_PurchaseOrderItem.PurchaseOrderItemCategory,
      I_PurchaseOrderItem.IsStatisticalItem                   as  ItemIsStatistical,
      I_PurchaseOrderItem.IsReturnsItem,
      I_PurchaseOrderItem.OrderItemQtyToBaseQtyDnmntr,
      I_PurchaseOrderItem.OrderItemQtyToBaseQtyNmrtr,
      I_PurchaseOrderItem.IsCompletelyDelivered,
      I_PurchaseOrderItem.IsFinallyInvoiced,
      I_PurchaseOrderItem.GoodsReceiptIsExpected,
      I_PurchaseOrderItem.InvoiceIsGoodsReceiptBased,
      I_PurchaseOrderItem.InvoiceIsExpected,
      I_PurchaseOrderItem.ServicePerformer,
      _PurgDocScheduleLine.DeliveryDate                       as  DeliveryDate,
      -- Fields from WBSELEMENT
      COALESCE( wbsobj.WBSElementInternalID, '')              as WBSElementInternalID,
      COALESCE( wbsobj.WBSElementExternalID, '')              as WBSElementExternalID,
      wbsobj.SalesOrder,
      wbsobj.SalesOrderItem,
      COALESCE( wbsobj.WorkPackageFullName, '')               as WorkPackageFullName,
      wbsobj.WBSDescription,
      COALESCE( wbsobj.CostCenter, '' )                       as CostCenter,
      wbsobj.ControllingArea,
      -- Fields from table EKKO
      cast(ekko.ExchangeRate as abap.dec(9,5))                as  ExchangeRate,
      cast ('F' as abap.char( 1 ))                            as  PurchasingDocumentCategory,
      // ekko.Status as PurchaseOrderStatus,

      ekko.PurchaseOrderType                                  as  purchasingDocumentType,
      ekko.CreationDate                                       as  LastChangeDate,
      ekko.CreatedByUser,
      ekko.Supplier,
      ekko.PaymentTerms,
      ekko.PurchasingOrganization,
      ekko.PurchasingGroup,
      ekko.DocumentCurrency                                   as  Currency,
      cast( ekko.PurchaseOrderDate as abap.char(8))           as PurchaseOrderDate,
      ekko.SupplyingPlant                                     as  SupplyingPlant,
      ekko.PurchasingDocumentDeletionCode                     as  IsDeletedHeader,
      _Suppl.name1                                            as  SupplyingVendorName,
      //ekko._Supplier.SupplierName as  SupplyingVendorName,

      ekko._PurchasingGroup.PurchasingGroupName               as  PurchasingGroupName,
      ekko._PurchasingOrganization.PurchasingOrganizationName as  PurchasingOrganizationName,
      ekko._CompanyCode.CompanyCodeName                       as  CompanyCodeName,
      I_PurchaseOrderItem._Plant.PlantName                    as  PlantName,
      ekko.SupplyingPlant                                     as  name1_sp,
      ekko.IsEndOfPurposeBlocked,

      -- Calculated fields from DDL C_Purdoclistcalfieldspo
      pdi_calc.status                                         as  status,
      pdi_calc.wemng                                          as  GoodsReceiptQuantity,
      pdi_calc.wewrt                                          as  GoodsReceiptValue,
      pdi_calc.remng                                          as  InvoiceReceiptQuantity,
      pdi_calc.rewrt                                          as  InvoiceReceiptValue,
      pdi_calc.DocumentCurrency                               as  DocumentCurrency, // 2753251


      pdi_calc.valuemismatch,
      pdi_calc.qtymismatch,
      pdi_calc.confmiss,
      pdi_calc.wesbs                                          as  wesbs,

      -- Placeholder fields (to be calculated in ABAP)
      //cast('' as abap.char(40)) as MaterialName,

      // cast('' as abap.char(20)) as MaterialGroupName,

      //cast('' as abap.char(20)) as PurgDocumentTypeDescription,

      // cast('' as abap.char(40)) as StatusDescription,

      cast(1 as abap.int4)                                    as  cntf,
      cast(0 as abap.int4)                                    as  cntk,
      cast(0 as abap.int4)                                    as  cntl,
      cast(0 as abap.quan(15,3))                              as  releasequantity,
      ''                                                      as  contractitemusage,
      cast(0 as abap.curr(19,2))                              as  releasevalue,
      -- Source of Supply
      case ekko.Supplier when '' then cast(ekko.SupplyingPlant as abap.char(10))
                      else         cast(ekko.Supplier as abap.char(10))
      end                                                     as  sosid,
      case ekko.Supplier when '' then cast(_SupplyingPlant.PlantName as abap.char(100))
                      else         cast(_Suppl.name1 as abap.char(100))
      end                                                     as  sosname
      // _supplier

      // sup_addr.SupplierAddressCountry      as SupplierAddressCountry,

      // sup_addr.SupplierAddressCity         as SupplierAddressCity,


      //_MatText,

      //_MatGroupText,

      //_StatusText,

      //_PURCHASINGDOCUMENTTYPETEXT


}






















































/*+[internal] {
"BASEINFO":
{
"FROM":
[
"C_PURDOCLISTCALFIELDSPO",
"C_PURDOCLISTWBSELEMENT",
"I_COMPANYCODE",
"I_PLANT",
"I_PURCHASEORDER",
"I_PURCHASEORDERITEM",
"I_PURCHASINGGROUP",
"I_PURCHASINGORGANIZATION",
"P_PURORDITEMDELIVERYDATE",
"LFA1"
],
"ASSOCIATED":
[
"C_PURDOCLISTCALFIELDSPO",
"C_PURDOCLISTWBSELEMENT",
"P_PURORDITEMDELIVERYDATE",
"LFA1"
],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/