P_CostAccountingDocument

@AbapCatalog.sqlViewName: 'PCOSTACCTDOC'
@AbapCatalog.compiler.compareFilter:true
@ClientHandling.algorithm: #SESSION_VARIABLE
@AccessControl.authorizationCheck: #NOT_REQUIRED
//@EndUserText.label: 'Cost Accounting Document'

@Metadata.ignorePropagatedAnnotations: true
@ObjectModel.usageType:{
    serviceQuality: #C,
    sizeCategory: #XXL,
    dataClass: #MIXED
}
@VDM: {
  viewType: #COMPOSITE,
  private: true
}
/*+[hideWarning] { "IDS" : [ "KEY_CHECK" ]  } */
define view P_CostAccountingDocument
  as select from I_GLAccountLineItemRawData as _Header
  
{
  key _Header.FiscalYear,
  key _Header.ReferenceDocument,
  key _Header.ControllingArea,
  key _Header.LedgerGLLineItem,
  key _Header.ReferenceDocumentType,
  key _Header.ReferenceDocumentContext,
      
      _Header._JournalEntry.AccountingDocumentHeaderText,
      _Header.DocumentDate,
      _Header.PostingDate,
      _Header.FiscalPeriod,      
      _Header.FiscalYearPeriod,
      cast(_Header._JournalEntry.AccountingDocumentCreationDate as farp_cpudt preserving type) as AccountingDocumentCreationDate,
      cast(_Header.AccountingDocCreatedByUser as fco_cc_createdby preserving type)    as AccountingDocCreatedByUser,
      _Header.IsReversal,
      _Header.IsReversed,   
      cast(_Header._JournalEntry.ExchangeRateDate as fin_currconvdat preserving type) as ExchangeRateDate,    
      cast(
        case
          when _Header.IsReversal = 'X' or _Header.ControllingBusTransacType = 'COIN' then ''
          else _Header.PredecessorReferenceDocument
      end as fis_prec_awref preserving type ) as PredecessorReferenceDocument,          
      _Header.ReversalReferenceDocument,      
      
      _Header.GlobalCurrency,
      @Semantics: { amount : {currencyCode: 'GlobalCurrency'} }
      cast(
        case _Header.OriginCtrlgDebitCreditCode
          when 'S' then _Header.AmountInGlobalCurrency
          else 0
      end as fis_ksl preserving type ) as AmountInGlobalCurrency,
      
      cast(_Header.ControllingBusTransacType as fins_co_bus_trans preserving type ) as ControllingBusTransacType,
      _Header.BusinessTransactionCategory,
      
      cast(
        case _Header.ControllingBusTransacType
          when 'COIN' then '1'
          else ( case _Header.IsReversal
                   when '' then ( case _Header.PredecessorReferenceDocument
                                    when '' then '1'
                                    else '3' end )
                   else '2' end )
      end as fco_posting_type ) as AllocationPostingType,
      
      cast(
        case _Header.IsReversal
            when '' then ''
            else _Header.ReversalReferenceDocument 
        end as reversedreferencedocument preserving type )  as ReversedReferenceDocument,
      _Header.IsSettled
}

where 
(
  (    
    (
      ( _Header.ControllingBusTransacType   = 'RKU1' and _Header.BusinessTransactionCategory = 'RKU1' )
      or ( _Header.ControllingBusTransacType   = 'RKU2' and _Header.BusinessTransactionCategory = 'RKU2' )
      or ( _Header.ControllingBusTransacType   = 'RKU1' and _Header.BusinessTransactionCategory = 'RKU3' )
      or( _Header.ControllingBusTransacType   = 'RKU2' and _Header.BusinessTransactionCategory = 'RKU3' )
      or( _Header.ControllingBusTransacType   = 'RKU3' and _Header.BusinessTransactionCategory = 'RKU3' )      
    )
    and _Header.ReferenceDocumentType = 'COBK'
  ) 
  or
  (
    _Header.ControllingBusTransacType = 'COIN' 
    and
    _Header.IsReversal = '' and _Header.IsReversed = ''    
    and
    ( 
       _Header.BusinessTransactionCategory = 'ABGA'
    or _Header.BusinessTransactionCategory = 'ACEA'
    or _Header.BusinessTransactionCategory = 'RFBU'
    or _Header.BusinessTransactionCategory = 'RFIC'
    or _Header.BusinessTransactionCategory = 'RFIV'
    or _Header.BusinessTransactionCategory = 'RFPI'
    or _Header.BusinessTransactionCategory = 'RFPO'
    or _Header.BusinessTransactionCategory = 'RMRP'    
    ) 
  )  
)
and _Header._Ledger.IsLeadingLedger   = 'X'
and _Header.IsSettlement = ''
and _Header.JournalEntryIsSecondaryEntry = ''
and _Header.LogicalSystem = ''
and _Header.AccountAssignmentType <> ''
and _Header.ReferenceDocument <> ''
and _Header.ControllingObject <> ''