P_ScheduleAgmtMassUpdate

@AbapCatalog.sqlViewName: 'PSAGREEMENT'
@VDM.private: true
@VDM.viewType: #CONSUMPTION
@AbapCatalog.compiler.compareFilter: true
@AccessControl.authorizationCheck: #PRIVILEGED_ONLY
@EndUserText.label: 'Private View for Scheduling Agreement'
@ClientHandling.algorithm: #SESSION_VARIABLE
@ObjectModel.usageType.serviceQuality: #C
@ObjectModel.usageType.sizeCategory: #XL
@ObjectModel.usageType.dataClass: #TRANSACTIONAL
@Metadata.ignorePropagatedAnnotations: true
@VDM.lifecycle.status:#DEPRECATED
@VDM.lifecycle.successor: 'C_SchedgAgrmtMassUpdt'

define view P_ScheduleAgmtMassUpdate
  as select from I_Schedgagrmthdr as _Header
  association [1..1] to C_SchedAgrmtMassUpdtValdtySts as _ShdStatusVH on $projection.SchedulingAgreement = _ShdStatusVH.SchedulingAgreement
  association [1..1] to P_ScheduleItemCount           as _SACount     on $projection.SchedulingAgreement = _SACount.SchedulingAgreement
{

  key cast(SchedulingAgreement as abap.char(16))                                                                                 as     FormattedPurchasingDocItem,

      SchedulingAgreement,

      cast('' as ebelp)                                                                                                          as     SchedulingAgreementItem,

      //---------------------------------------------------------------------------------

      // Hierarchy Fields - Would be used for creating SA and Item tree on the UI

      //----------------------------------------------------------------------------------


      cast ( '0' as abap.char(1))                                                                                                as     HierarchyNodeLevel,

      cast ( ' ' as abap.char(16))                                                                                               as     ParentNode,

      cast ('expanded' as abap.char(8))                                                                                          as     DrillDownState,


      _Header.PaymentTerms                                                                                                       as     PaymentTerms,

      @Semantics.currencyCode:true
      _Header.DocumentCurrency                                                                                                   as     DocumentCurrency,

      _Header.ExchangeRate                                                                                                       as     ExchangeRate,

      _Header.ExchangeRateIsFixed                                                                                                as     ExchangeRateIsFixed,

      _Header.IncotermsClassification                                                                                            as     IncotermsClassification,

      _Header.IncotermsLocation1                                                                                                 as     IncotermsLocation1,

      _Header.IncotermsLocation2                                                                                                 as     IncotermsLocation2,

      _Header.IncotermsVersion                                                                                                   as     IncotermsVersion,

      cast('' as producttype)                                                                                                    as     ProductType,

      cast('' as mrpre)                                                                                                          as     FirmTradeOffZoneBindMRP,

      cast('' as evers)                                                                                                          as     ShippingInstruction,

      cast('' as bstyp)                                                                                                          as     PurchasingDocumentCategory,

      cast('' as qzgtyp)                                                                                                         as     QualityCertificateType,

      cast('' as bstae)                                                                                                          as     ConfirmationControl,

      cast('' as adrn2)                                                                                                          as     ReferenceDeliveryAddressID,

      cast('00000000' as drdat)                                                                                                  as     ItemLastTransmissionDate,

      cast('0' as mhdrz)                                                                                                         as     MinRemainingShelfLife,

      cast('' as mtart)                                                                                                          as     MaterialType,

      cast('' as eloek)                                                                                                          as     PurchasingDocumentDeletionCode,

      cast('' as txz01)                                                                                                          as     PurchasingDocumentItemText,

      cast('_' as matnr)                                                                                                         as     Material,

      cast('_' as ewerk)                                                                                                         as     Plant,

      cast('' as vdm_storage_location)                                                                                           as     StorageLocation,

      cast('' as bednr)                                                                                                          as     RequirementTracking,

      cast ('0' as etfz2)                                                                                                        as     SchedLineSemiFirmOrderInDays,

      cast ('0' as etfz1)                                                                                                        as     ScheduleLineFirmOrderInDays,

      cast ('00000000' as abdat)                                                                                                 as     SchedAgrmtCumQtyReconcileDate,

      cast ('' as labnr)                                                                                                         as     PurgDocOrderAcknNumber,

      cast ('' as kzabs)                                                                                                         as     IsOrderAcknRqd,

      cast ('' as webre)                                                                                                         as     InvoiceIsGoodsReceiptBased,

      cast ('' as repos)                                                                                                         as     InvoiceIsExpected,

      cast ('_' as knttp)                                                                                                        as     AccountAssignmentCategory,

      cast ('0' as untto)                                                                                                        as     UnderdelivTolrtdLmtRatioInPct,

      cast ('' as uebtk)                                                                                                         as     UnlimitedOverdeliveryIsAllowed,

      cast ('0' as uebto)                                                                                                        as     OverdelivTolrtdLmtRatioInPct,

      cast ('0' as mahn3)                                                                                                        as     NoDaysReminder3,

      cast ('0' as mahn2)                                                                                                        as     NoDaysReminder2,

      cast ('0' as mahn1)                                                                                                        as     NoDaysReminder1,

      cast ('' as schpr)                                                                                                         as     PurgDocEstimatedPrice,

      cast ('' as prsdr)                                                                                                         as     PriceIsToBePrinted,

      cast ('' as spinf)                                                                                                         as     IsInfoRecordUpdated,

      cast ('' as insmk)                                                                                                         as     StockType,

      cast ('' as mwskz)                                                                                                         as     TaxCode,

      cast ('' as idnlf)                                                                                                         as     SupplierMaterialNumber,

      cast ('' as infnr)                                                                                                         as     PurchasingInfoRecord,

      cast ('_' as matkl)                                                                                                        as     MaterialGroup,

      _Header.PurchasingDocumentType,

      _Header.PurchasingOrganization,

      _Header.CompanyCode,

      _Header. PurchasingGroup,

      cast('' as inco1)                                                                                                          as     ItemIncotermsClassification,

      _Header._PurchasingDocumentType._Text[1: Language = $session.system_language ].PurchasingDocumentTypeName,

      _Header._CompanyCode.CompanyCodeName                                                                                       as     CompanyCodeName,

      _Header.PurchasingDocumentOrderDate,

      cast ('' as kalsm_d)                                                                                                       as     TaxCalculationProcedure,

      cast('' as mtbez)                                                                                                          as     MaterialTypeName,

      _PurchasingDocumentCategory._Text[1: Language = $session.system_language ].PurchasingDocumentCategoryName,


      case ValidityStartDate
      when (' ') then '00000000'
      else ValidityStartDate
      end                                                                                                                        as     ValidityStartDate,



      case ValidityEndDate
      when (' ') then '00000000'
      else ValidityEndDate
      end                                                                                                                        as     ValidityEndDate,

      _Header.Supplier,


      cast('_' as pstyp)                                                                                                         as     PurchasingDocumentItemCategory,

      _Header._PurchasingGroup.PurchasingGroupName,

      _ShdStatusVH.PurchaseContractValidityStatus,

      _ShdStatusVH.PurContrValidityStatusName,

      cast('' as productgroupdescription)                                                                                        as     MaterialGroupName,



      //---------------------------------------------------------------------------------

      //Updatable Partner Fields

      //----------------------------------------------------------------------------------


      cast ('' as defpa)                                                                                                         as     DefaultPartner,

      cast ('00000000' as pernr_d)                                                                                               as     EmploymentInternalID, //Personnel Number


      cast('' as parza)                                                                                                          as     PartnerCounter,

      cast('_' as parvw)                                                                                                         as     PartnerFunction,

      cast ('0000000000' as parnr)                                                                                               as     SupplierContact, //Number of Contact Person


      cast ('_' as lifn2)                                                                                                        as     ReferenceSupplier,

      cast ('_' as ltsnr)                                                                                                        as     SupplierSubrange,

      cast(' ' as boolean)                                                                                                       as     IsStrategicPartner,

      _SACount.NumberOfContractItems,

      cast('' as suppliername)                                                                                                   as     PreferredSupplierName

      //SupplyingSupplier,


      //InvoicingParty


}
where
  _Header.PurchasingDocumentDeletionCode = ' '


union all select from I_SchedgAgrmtItm as _Item
  left outer join I_Schedgagrmthdr as _Headr on _Item.SchedulingAgreement = _Headr.SchedulingAgreement
{

  key cast(concat(concat(_Item.SchedulingAgreement, '/'), SchedulingAgreementItem) as abap.char(16))                             as     FormattedPurchasingDocItem,


      _Item.SchedulingAgreement,

      SchedulingAgreementItem,

      //---------------------------------------------------------------------------------

      // Hierarchy Fields - Would be used for creating SA and Item tree on the UI

      //----------------------------------------------------------------------------------

      cast  ( '1' as abap.char( 1 ))                                                                                             as     HierarchyNodeLevel,

      _Item.SchedulingAgreement                                                                                                  as     ParentNode,

      cast ('leaf' as abap.char(8))                                                                                              as     DrillDownState,

      cast('' as farp_dzterm)                                                                                                    as     PaymentTerms,

      @Semantics.currencyCode:true
      cast('' as waers)                                                                                                          as     DocumentCurrency,

      cast('0' as wkurs)                                                                                                         as     ExchangeRate,

      cast('' as kufix)                                                                                                          as     ExchangeRateIsFixed,

      cast ('' as inco1)                                                                                                         as     IncotermsClassification,

      cast('' as inco2_l)                                                                                                        as     IncotermsLocation1,

      cast('' as inco3_l)                                                                                                        as     IncotermsLocation2,

      cast('' as incov)                                                                                                          as     IncotermsVersion,

      ProductType,

      FirmTradeOffZoneBindMRP,

      ShippingInstruction,

      _Item.PurchasingDocumentCategory,

      QualityCertificateType,

      ConfirmationControl,

      ReferenceDeliveryAddressID,

      case ItemLastTransmissionDate
      when (' ') then '00000000'
      else ItemLastTransmissionDate
      end                                                                                                                        as     ItemLastTransmissionDate,

      MinRemainingShelfLife,

      MaterialType,

      _Item.PurchasingDocumentDeletionCode,

      PurchasingDocumentItemText,

      Material,

      Plant,

      StorageLocation,

      RequirementTracking,

      SchedLineSemiFirmOrderInDays,

      ScheduleLineFirmOrderInDays,

      SchedAgrmtCumQtyReconcileDate,

      PurgDocOrderAcknNumber,

      IsOrderAcknRqd,

      InvoiceIsGoodsReceiptBased,

      InvoiceIsExpected,

      AccountAssignmentCategory,

      UnderdelivTolrtdLmtRatioInPct,

      UnlimitedOverdeliveryIsAllowed,

      OverdelivTolrtdLmtRatioInPct,

      NoDaysReminder3,

      NoDaysReminder2,

      NoDaysReminder1,

      PurgDocEstimatedPrice,

      PriceIsToBePrinted,

      IsInfoRecordUpdated,

      StockType,

      TaxCode,

      SupplierMaterialNumber,

      PurchasingInfoRecord,

      MaterialGroup,

      cast('_' as bsart)                                                                                                         as     PurchasingDocumentType,

      _Headr.PurchasingOrganization,

      _Headr.CompanyCode,

      cast('_' as ekgrp)                                                                                                         as     PurchasingGroup,

      _Item.IncotermsClassification                                                                                              as     ItemIncotermsClassification,

      cast('' as batxt)                                                                                                          as     PurchasingDocumentTypeName,

      _Item._CompanyCode.CompanyCodeName                                                                                         as     CompanyCodeName,

      cast ('00000000' as ebdat)                                                                                                 as     PurchasingDocumentOrderDate,

      _Plant._Address._Country.TaxCalculationProcedure,

      _Item._Material._MaterialType._Text[1: Language = $session.system_language ].MaterialTypeName,

      _PurgDocumentCategory._Text[1: Language = $session.system_language ].PurchasingDocumentCategoryName,

      cast('00000000' as kdatb)                                                                                                  as     ValidityStartDate,

      cast('00000000' as kdate)                                                                                                  as     ValidityEndDate,

      cast('_' as md_supplier)                                                                                                   as     Supplier,

      _Item.PurchasingDocumentItemCategory,

      cast('' as mm_a_purg_grp_name)                                                                                             as     PurchasingGroupName,

      cast('_' as  mm_contract_status_id)                                                                                        as     PurchaseContractValidityStatus,

      cast('_' as  mm_contract_status)                                                                                           as     PurContrValidityStatusName,

      _Item._MaterialGroup._Text[1: Language = $session.system_language ].MaterialGroupName,

      //---------------------------------------------------------------------------------

      //Updatable Partner Fields

      //----------------------------------------------------------------------------------


      cast ('' as defpa)                                                                                                         as     DefaultPartner,

      cast ('00000000' as pernr_d)                                                                                               as     EmploymentInternalID, //Personnel Number


      cast('' as parza)                                                                                                          as     PartnerCounter,

      cast('_' as parvw)                                                                                                         as     PartnerFunction,

      cast ('0000000000' as parnr)                                                                                               as     SupplierContact, //Number of Contact Person


      cast ('_' as lifn2)                                                                                                        as     ReferenceSupplier,

      cast ('_' as ltsnr)                                                                                                        as     SupplierSubrange,

      cast(' ' as boolean)                                                                                                       as     IsStrategicPartner,

      cast ('1' as mm_a_contractitems)                                                                                           as     NumberOfContractItems,

      cast('' as suppliername)                                                                                                   as     PreferredSupplierName


      //cast('' as llief) as SupplyingSupplier,


      //cast('' as lifre) as InvoicingParty

}
where
      _Headr.PurchasingDocumentDeletionCode = ' '
  and _Item.PurchasingDocumentDeletionCode  = ' '




union all select from I_PurchasingDocumentPartner as _Partner
  left outer join I_Schedgagrmthdr            as _Headr on _Headr.SchedulingAgreement = _Partner.PurchasingDocument
{
  key cast(concat(concat (concat(_Partner.PurchasingDocument, '/'), _Partner.PartnerFunction),_Partner.PartnerCounter) as abap.char( 16 ))                                                                                                  as  FormattedPurchasingDocItem,

      _Partner.PurchasingDocument                                                                                                                                                                                                           as  SchedulingAgreement,

      cast ('00000' as ebelp)                                                                                                                                                                                                               as  SchedulingAgreementItem,

      //---------------------------------------------------------------------------------

      // Hierarchy Fields - Would be used for creating SA and Item tree on the UI

      //----------------------------------------------------------------------------------


      cast  ( '1' as abap.char(1))                                                                                                                                                                                                          as  HierarchyNodeLevel,

      _Partner.PurchasingDocument                                                                                                                                                                                                           as  ParentNode,

      cast ('leaf' as abap.char(8))                                                                                                                                                                                                         as  DrillDownState,

      cast('' as farp_dzterm)                                                                                                                                                                                                               as  PaymentTerms,

      @Semantics.currencyCode:true
      cast('' as waers)                                                                                                                                                                                                                     as  DocumentCurrency,

      cast('0' as wkurs)                                                                                                                                                                                                                    as  ExchangeRate,

      cast('' as kufix)                                                                                                                                                                                                                     as  ExchangeRateIsFixed,

      cast ('' as inco1)                                                                                                                                                                                                                    as  IncotermsClassification,

      cast('' as inco2_l)                                                                                                                                                                                                                   as  IncotermsLocation1,

      cast('' as inco3_l)                                                                                                                                                                                                                   as  IncotermsLocation2,

      cast('' as incov)                                                                                                                                                                                                                     as  IncotermsVersion,

      cast('' as producttype)                                                                                                                                                                                                               as  ProductType,

      cast('' as mrpre)                                                                                                                                                                                                                     as  FirmTradeOffZoneBindMRP,

      cast('' as evers)                                                                                                                                                                                                                     as  ShippingInstruction,

      cast('' as bstyp)                                                                                                                                                                                                                     as  PurchasingDocumentCategory,

      cast('' as qzgtyp)                                                                                                                                                                                                                    as  QualityCertificateType,

      cast('' as bstae)                                                                                                                                                                                                                     as  ConfirmationControl,

      cast('' as adrn2)                                                                                                                                                                                                                     as  ReferenceDeliveryAddressID,

      cast('00000000' as drdat)                                                                                                                                                                                                             as  ItemLastTransmissionDate,

      cast('0' as mhdrz)                                                                                                                                                                                                                    as  MinRemainingShelfLife,

      cast('' as mtart)                                                                                                                                                                                                                     as  MaterialType,

      cast('' as eloek)                                                                                                                                                                                                                     as  PurchasingDocumentDeletionCode,

      cast('' as txz01)                                                                                                                                                                                                                     as  PurchasingDocumentItemText,

      cast('_' as matnr)                                                                                                                                                                                                                    as  Material,

      cast('_' as ewerk)                                                                                                                                                                                                                    as  Plant,

      cast('' as vdm_storage_location)                                                                                                                                                                                                      as  StorageLocation,

      cast('' as bednr)