P_PrepaymentRefDocTotalAmtTC

@AbapCatalog.viewEnhancementCategory: [#PROJECTION_LIST]
@AccessControl.authorizationCheck           : #NOT_REQUIRED
@VDM.private                                : true
@VDM.viewType                               : #COMPOSITE
@ObjectModel.usageType.sizeCategory         : #L
@ObjectModel.usageType.serviceQuality       : #A
@ObjectModel.usageType.dataClass            : #TRANSACTIONAL
@Metadata.ignorePropagatedAnnotations       : true
@EndUserText.label: 'Prepayment Document Total Amount'

-- This view will get the Total price for Applicable documents in Work Center
-- Based on Pricing Option configuration, one of below 3 options will be used for
-- Total Amount derivations:
--    VLOGP: Using CMM_VLOGP data
--    CPE: Using CPE tables data
--    Net Price: Net Price from the document
-- This view retrieves data for Trading Contracts

define view entity P_PrepaymentRefDocTotalAmtTC

  -- Valid Doc Types
  as select from           I_PrepayWrkCtrAllowedDocTypes as DocTypes

  -- Document Header
    inner join             I_PreAgrmtTradingContract     as Document                  on Document.TradingContractType = DocTypes.PrepaymentAgrmtRefDocumentType
                                                                                      and Document.CustomerName is initial

  -- Document Item
    inner join             I_PreAgrmtTradingContractItem as DocumentItem              on DocumentItem.TradingContract = Document.TradingContract

  -- Material and Commodity
    inner join             I_PrepaymentMaterial          as Material                  on Material.Material = DocumentItem.Material

  -- Trading Contract Status
    inner join             I_PreAgrmtTradingContractStat as ContractApplicationStatus on ContractApplicationStatus.ContractApplicationStatus = Document.TrdgContrApplicationStatus

  -- Pricing Options config
    left outer to one join I_PrepaymentWrkCtrLinkConfign as WCPrcConfig               on WCPrcConfig.PrepaymentAgrmtWorkCenterType = DocTypes.PrepaymentAgrmtWorkCenterType

  -- CMM Price
  association [0..1] to P_PrepayDocVersLogPrcgValTC    as CMMPrice on  CMMPrice.PrepaymentWrkCtrDocPricingOptn = WCPrcConfig.PrepaymentWrkCtrDocPricingOptn
                                                                   and Material.Commodity                      is not initial
                                                                   and CMMPrice.PrepaymentAgrmtRefBusObject    = 'BUS2124'
                                                                   and CMMPrice.PrepaymentDocumentNumber       = Document.TradingContract 
                                                                   and CMMPrice.PrepaymentDocumentItemNumber   = DocumentItem.TradingContractItem
                                                                   and CMMPrice.CompanyCode                    = Document.CompanyCode
                                                                   and CMMPrice.Counterparty                   = Document.SupplierName
  -- CPE Price
  association [0..1] to I_PrepaymentDocumentMarketData as CPEPrice on  CPEPrice.PrepaymentWrkCtrDocPricingOptn = WCPrcConfig.PrepaymentWrkCtrDocPricingOptn
                                                                   and CPEPrice.TradingContract                = Document.TradingContract
                                                                   and Material.Commodity                      is not initial
                                                                   and CPEPrice.PrepaymentRefDocCondition      = Document.PrepaymentRefDocCondition
                                                                   and CPEPrice.PrepaymentRefDocConditionItem  = DocumentItem.TradingContractItem
                                                                   and CPEPrice.CompanyCode                    = Document.CompanyCode
                                                                   and CPEPrice.Counterparty                   = Document.SupplierName
{
  key DocTypes.PrepaymentAgrmtWorkCenterType       as PrepaymentAgrmtWorkCenterType,
  key DocTypes.PrepaymentAgrmtRefDocumentCat       as PrepaymentAgrmtRefDocumentCat,
  key 'BUS2124'                                    as PrepaymentAgrmtRefBusObject,
  key Document.TradingContract                     as DocNumber,
  key DocumentItem.TradingContractItem             as DocumentItemNumber,

      cast('00000' as abap.numc(5))                as PurchasingDocumentItem,
      lpad( Document.TradingContract, 25, '0' )    as PrepaymentAgrmtRefDocument,
      Document.CompanyCode                         as CompanyCode,
      Document.TradingContractType                 as DocumentType,
      Document.SupplierName                        as Counterparty,
      Document.TrdgContrApplicationStatus          as TrdgContrApplicationStatus,
      DocumentItem.PrepaymentRefDocItmValdFromDte  as PrepaymentRefDocItmValdFromDte,
      DocumentItem.PrepaymentRefDocItmValdToDte    as PrepaymentRefDocItmValdToDte,
      DocumentItem.Material                        as Material,
      Material.Commodity,

      @Semantics.quantity.unitOfMeasure: 'TrdgContractItemUnitOfMeasure'
      DocumentItem.TradingContractItemQuantity,
      DocumentItem.TrdgContractItemUnitOfMeasure,


      @Semantics.amount.currencyCode: 'PrepaymentTotalAmtCrcy'
     cast(cast(
           case when WCPrcConfig.PrepaymentWrkCtrDocPricingOptn = '01'          -- CMM Pricing
                     and Material.Commodity is not initial
                then curr_to_decfloat_amount( CMMPrice.PrepaymentTotalAmt)

                when WCPrcConfig.PrepaymentWrkCtrDocPricingOptn = '02'          -- CPE Pricing
                     and Material.Commodity is not initial
                then curr_to_decfloat_amount(CPEPrice.PrepaymentTotalAmt)

                when WCPrcConfig.PrepaymentWrkCtrDocPricingOptn = '03'          -- Item Net Amount
                     or WCPrcConfig.PrepaymentWrkCtrDocPricingOptn is null
                     or Material.Commodity is initial
                then  curr_to_decfloat_amount(DocumentItem.TrdgContrTotalNetAmount)


                else  0  end as abap.dec(23,2) ) as abap.curr(23,2) ) as PrepaymentTotalAmt,


      DocumentItem.TrdgContrTotalNetAmountCrcy     as PrepaymentTotalAmtCrcy,

      case when WCPrcConfig.PrepaymentWrkCtrDocPricingOptn = '01'               -- CMM Pricing
                and CMMPrice.PrepaymentDocCmmdtyMarketQty is initial
                and Material.Commodity is not initial
           then 'X'

           when WCPrcConfig.PrepaymentWrkCtrDocPricingOptn = '02'               -- CPE Pricing
                and Material.Commodity is not initial
           then CPEPrice.PrepaymentTotalAmtIsFixedPrice

           when WCPrcConfig.PrepaymentWrkCtrDocPricingOptn = '03'               -- Item Net Amount
                or WCPrcConfig.PrepaymentWrkCtrDocPricingOptn is null
                or Material.Commodity is initial
           then 'X'

           else '' end                             as PrepaymentTotalAmtIsFixedPrice,

           WCPrcConfig.IncludeCropSeason

}  where DocTypes.PrepaymentAgrmtRefDocumentCat = 'TC' and
         DocTypes.PrepaymentAgrmtWorkCenterType = '1'