P_UpdatedOpenItem

@AbapCatalog.sqlViewName: 'PAGRIUU'
@AbapCatalog.compiler.compareFilter: true
@AbapCatalog.preserveKey: true
@AccessControl.authorizationCheck: #MANDATORY
//@EndUserText.label: 'Updated Open Item'

@ClientHandling.algorithm: #SESSION_VARIABLE
@ObjectModel.representativeKey: 'AccountingDocumentItem'
@ObjectModel.usageType.sizeCategory: #XXL
@ObjectModel.usageType.dataClass:  #MIXED
@ObjectModel.usageType.serviceQuality: #D
@VDM.viewType: #CONSUMPTION
//@UI.presentationVariant.sortOrder.by: 'LastChangeDate, ChangeDocumentCreationDate, ChangeDocumentCreationTime'

//@UI.presentationVariant.sortOrder.direction: #ASC

@VDM.private: true
define view P_UpdatedOpenItem as
select distinct from I_OperationalAcctgDocItem as Item

    inner join I_AccountingDocument      as Header on

        // Make sure that Item is A/R item


        Item.FinancialAccountType      = 'D' and

      // Make sure that Item is only searched in relevant categories


        (
            Item.AccountingDocumentCategory = '' or

            Item.AccountingDocumentCategory = 'S' or

            Item.AccountingDocumentCategory = 'A'
        )  and
        Item.CompanyCode               = Header.CompanyCode  and
        Item.FiscalYear                = Header.FiscalYear and
        Item.AccountingDocument        = Header.AccountingDocument
        inner join P_ResItemSession as Session on client = $session.client
        inner join I_ChangeDocument          as ChangeDocument on
        (
            ChangeDocument.ChangeDocObjectClass = 'BELEG' or
            ChangeDocument.ChangeDocObjectClass = 'BELEGR'
        ) and
        ChangeDocument.ChangeDocObject           = concat(
            Session.client, concat(
                Header.CompanyCode, concat(
                    Header.AccountingDocument, Header.FiscalYear
                )
            )
        )
        inner join I_ChangeDocumentItem as ChangeDocumentItem on
            ChangeDocumentItem.ChangeDocObjectClass = ChangeDocument.ChangeDocObjectClass
        and ChangeDocumentItem.ChangeDocObject      = ChangeDocument.ChangeDocObject
        and ChangeDocumentItem.ChangeDocument       = ChangeDocument.ChangeDocument
        and ChangeDocumentItem.DatabaseTable = 'BSEG'
//        and ChangeDocumentItem.ChangeDocDatabaseTableField = 'RSTGR'

{

  key Item.CompanyCode,

  key Item.FiscalYear,

  key Item.AccountingDocument,

  key Item.AccountingDocumentItem,

      Item.AssignmentReference,

      Header.AccountingDocumentHeaderText,   //as HeaderText,


      Item.DocumentItemText,                 //as ItemtText,


      Item.PaymentDifferenceReason,

      Header.AccountingDocumentCreationDate as CreationDate,

      Header.CreationTime                   as CreationTime,

      Header.LastChangeDate                 as LastChangeDate,

      ChangeDocument.CreationDate           as ChangeDocCreationDate,//ChangeDocumentCreationDate


      ChangeDocument.CreationTime           as ChangeDocumentCreationTime,

      Item.PostingDate,
      Item.DocumentDate,
      Item.NetDueDate,
      Item.DebitCreditCode,
      @Semantics.amount.currencyCode: 'TransactionCurrency'
      Item.CashDiscountBaseAmount,
      @Semantics.amount.currencyCode: 'TransactionCurrency'
      Item.CashDiscountAmount,
      Item.PaymentTerms,
      Item.CashDiscount1Days,
      Item.CashDiscount2Days,
      Item.NetPaymentDays,
      Item.CashDiscount1Percent,
      Item.CashDiscount2Percent,
      Item.DueCalculationBaseDate,
      Item.FixedCashDiscount,
      Item.PaymentBlockingReason,
      Item.TransactionCurrency,
      Item.CompanyCodeCurrency,
      Item.AmountInCompanyCodeCurrency,
      Item.AmountInTransactionCurrency,
      Item.Customer,
      Item.BillingDocument,
      Item.AccountingDocumentType
}

where
  ( LastChangeDate is not null and LastChangeDate <> '00000000' )