P_SettlmtMgmtDoc

@AbapCatalog: {
    sqlViewName: 'PWLF_WBRK',
    compiler.compareFilter: true,
    preserveKey: true
    }
@AccessControl.authorizationCheck: #NOT_REQUIRED
@ObjectModel: {
    usageType.serviceQuality: #B,
    usageType.dataClass: #TRANSACTIONAL,
    usageType.sizeCategory: #XXL
    }
@ClientHandling: {
    type: #INHERITED,
    algorithm: #SESSION_VARIABLE
    }
@VDM: {
    viewType: #BASIC,
    private: true
    }
@Metadata.ignorePropagatedAnnotations: true

define view P_SettlmtMgmtDoc
  as select from wbrk

{
  key wbrk.wbeln                                                                                      as SettlmtMgmtDoc,
      cast( wbrk.lfart as wlf_settlmt_doc_type preserving type )                                      as SettlmtDocType,
      cast( wbrk.lftyp as wlf_settlmt_doc_cat preserving type )                                       as SettlmtDocCat,
      cast( wbrk.wrart as wlf_settlmt_process_type preserving type )                                  as SettlmtProcessType,
      cast( wbrk.wbtyp as wlf_settlmt_process_cat preserving type )                                   as SettlmtProcessCat,
      wbrk.wrtyp                                                                                      as LogisticsDataEntryCat,
      wbrk.abart                                                                                      as SettlmtCat,
      wbrk.wdtyp                                                                                      as SettlmtMgmtDocCat,
      wbrk.wfdat                                                                                      as PostingDate,
      wbrk.rfbsk                                                                                      as SettlmtMgmtAcctgTransfSts,
      wbrk.bldat                                                                                      as DocumentDate,
      wbrk.xblnr                                                                                      as DocumentReferenceID,
      wbrk.zuonr                                                                                      as AssignmentReference,
      wbrk.estatus                                                                                    as SettlmtApplSts,
      wbrk.status_group                                                                               as SettlmtApplStsGrp,

      /* Pricing */
      cast( wbrk.kalsm as wlf_suplr_kalsm_d preserving type )                                         as SupplierPricingProcedure,
      cast( wbrk.kalsmd as wlf_cust_kalsm_d preserving type )                                         as CustomerPricingProcedure,
      cast( wbrk.knumv as wlf_knumv_k preserving type )                                               as SupplierPricingDocument,
      cast( wbrk.knumvd as wlf_knumv_d preserving type )                                              as CustomerPricingDocument,

      /* Partners */
      wbrk.lifre                                                                                      as InvoicingParty,
      wbrk.lnrzb                                                                                      as PayeeParty,
      wbrk.lifnr_fi                                                                                   as AlternativeInvoicingParty,
      wbrk.kunre                                                                                      as BillToParty,
      wbrk.kunrg                                                                                      as PayerParty,

      /* Organizational Data */
      cast( wbrk.bukrs as wlf_suplr_bukrs preserving type )                                           as CompanyCode,
      cast( wbrk.bukrs_deb  as wlf_bukrs_customer_regu preserving type )                              as IntercompanyCompanyCode,
      // strictly internal, techincally required for association in R_SettlmtMgmtDoc should not be used in any consumption

      case wbrk.bukrs_deb
      when ''
        then wbrk.bukrs
        else wbrk.bukrs_deb
      end                                                                                             as CustSettlmtCompanyCode,

      wbrk.ekorg                                                                                      as PurchasingOrganization,
      wbrk.ekgrp                                                                                      as PurchasingGroup,
      wbrk.vkorg                                                                                      as SalesOrganization,
      wbrk.vtweg                                                                                      as DistributionChannel,
      wbrk.spart                                                                                      as Division,
      wbrk.vkbur                                                                                      as SalesOffice,
      wbrk.vkgrp                                                                                      as SalesGroup,

      /* Administrative Data */
      cast( wbrk.ernam as wlf_created_by preserving type )                                            as CreatedByUser,
      cast( wbrk.erdat as wlf_created_on preserving type )                                            as CreationDate,
      cast( wbrk.erzet as wlf_created_at preserving type )                                            as CreationTime,
      cast( wbrk.aedat as wlf_changed_on preserving type )                                            as LastChangeDate,

      /* Currency and Exchange Rate */
      wbrk.waerl                                                                                      as SettlmtDocCurrency,
      cast( wbrk.wkurs as wlf_ukurs_curr_no_cnext preserving type )                                   as ExchangeRate,
      wbrk.kurst                                                                                      as ExchangeRateType,
      wbrk.kufix                                                                                      as ExchangeRateIsFixed,
      cast( wbrk.wkurs_dat as vdm_v_exchange_rate_date preserving type )                              as ExchangeRateDate,

      /* Amount fields */
      cast( wbrk.brtwr as wlf_brtwrk_lf preserving type )                                             as SupplierTotalGrossAmount,
      cast( wbrk.netwr as wlf_netwrk_lf preserving type )                                             as SupplierTotalNetAmount,
      cast( wbrk.mwsbk as wlf_suplr_mwsbk preserving type )                                           as SupplierTotalTaxAmount,
      cast( wbrk.brtwrd as wlf_brtwrd_lf preserving type )                                            as CustomerTotalGrossAmount,
      cast( wbrk.netwrd as wlf_netwrd_lf preserving type )                                            as CustomerTotalNetAmount,
      cast( wbrk.mwsbkd as wlf_cust_mwsbk preserving type )                                           as CustomerTotalTaxAmount,

      /* Payment terms and method */
      cast( wbrk.zterm as farp_dzterm preserving type )                                               as SupplierPaymentTerms,
      cast( wbrk.zbd1t as farp_dzbd1t preserving type )                                               as SupplierCashDiscount1Days,
      cast( wbrk.zbd2t as farp_dzbd2t preserving type )                                               as SupplierCashDiscount2Days,
      cast( wbrk.zbd3t as farp_dzbd3t preserving type )                                               as SupplierNetPaymentDays,
      cast( wbrk.zbd1p as dzbd1p_farp preserving type )                                               as SupplierCashDiscount1Percent,
      cast( wbrk.zbd2p as dzbd2p_farp preserving type )                                               as SupplierCashDiscount2Percent,
      cast( wbrk.zlsch as farp_schzw_bseg preserving type )                                           as SupplierPaymentMethod,
      wbrk.ztermd                                                                                     as CustomerPaymentTerms,
      cast( wbrk.zbd1td as wlf_cust_dzbd1t preserving type )                                          as CustomerCashDiscount1Days,
      cast( wbrk.zbd2td as wlf_cust_dzbd2t preserving type )                                          as CustomerCashDiscount2Days,
      cast( wbrk.zbd3td as wlf_cust_dzbd3t preserving type )                                          as CustomerNetPaymentDays,
      cast( wbrk.zbd1pd as wlf_cust_dzbd1p preserving type )                                          as CustomerCashDiscount1Percent,
      cast( wbrk.zbd2pd as wlf_cust_dzbd2p preserving type )                                          as CustomerCashDiscount2Percent,
      wbrk.zlschd                                                                                     as CustomerPaymentMethod,

      /* Cash Discount */
      cast( wbrk.gskto as wlf_suplr_skfbp preserving type )                                           as SuplrTotEligibleAmtForCshDisc,
      cast( wbrk.gsktod as wlf_cust_skfbp preserving type )                                           as CustTotEligibleAmtForCshDisc,

      /* Reversal Information */
      cast( wbrk.fksto as wlf_fksto preserving type )                                                 as SettlmtMgmtDocIsCancelled,
      wbrk.lfaks                                                                                      as CancelledSettlmtMgmtDoc,
      wbrk.fksto_part                                                                                 as SettlmtMgmtDocIsPrtlyRvsd,
      cast ( wbrk.fksto_party as wlf_partner_reversal_cat preserving type )                           as SettlmtMgmtDocPartRvslCat,

      cast( wbrk.valtg as wlf_wvaltk preserving type )                                                as SupplierAdditionalValueDays,
      cast( wbrk.valdt as wlf_wvaldk preserving type )                                                as SupplierFixedValueDate,
      cast( wbrk.valtgd as wlf_wvaltd preserving type )                                               as CustomerAdditionalValueDays,
      cast( wbrk.valdtd as wlf_wvaldd preserving type )                                               as CustomerFixedValueDate,

      /* Tax */
      cast( wbrk.txkrs  as wlf_txkrs_no_cnext  preserving type )                                      as TaxExchangeRate,
      cast( wbrk.txkrs_ic as wlf_txkrs_ic_no_cnext preserving type )                                  as IntercompanyTaxExchangeRate,
      cast( wbrk.landl as fac_landl preserving type )                                                 as SupplyingCountry,
      wbrk.landtx                                                                                     as TaxDepartureCountry,
      wbrk.land1tx                                                                                    as TaxDestinationCountry,
      wbrk.xegdr                                                                                      as IsEUTriangularDeal,
      wbrk.landtx_bukrs                                                                               as SettlmtCoCodeTaxCountry,
      wbrk.landtx_bukrs_deb                                                                           as SettlmtIntcoCoCodeTaxCountry,

      /* VAT Registration */
      cast( wbrk.stceg as wlf_suplr_stceg preserving type )                                           as SupplierVATRegistration,
      cast( wbrk.stcegd as wlf_cust_stceg preserving type )                                           as CustomerVATRegistration,

      /* Payment */
      wbrk.lzbkz                                                                                      as StateCentralBankPaymentReason,
      cast( wbrk.kkber as farp_kkber preserving type )                                                as CreditControlArea,
      cast( wbrk.cmwae as wlf_creditcontrolareacurrency preserving type )                             as CreditControlAreaCurrency,
      wbrk.cm_amount                                                                                  as ReleasedCreditAmount,
      cast( wbrk.lfgru as wlf_wfgru_header preserving type )                                          as SettlmtDocActivityReason,
      cast( wbrk.kidno as farp_kidno preserving type )                                                as PaymentReference,
      wbrk.wpycur_p1                                                                                  as SupplierPaymentCurrency,
      cast( wbrk.wkurs_p1 as wlf_wkurs_p1_no_cnext preserving type )                                  as SupplierPaytCurrencyExchRate,
      wbrk.wpycur_p2                                                                                  as CustomerPaymentCurrency,
      cast( wbrk.wkurs_p2 as wlf_wkurs_p2_no_cnext preserving type )                                  as CustomerPaytCurrencyExchRate,

      /* One-time Partners */
      wbrk.cpdk_addr                                                                                  as OneTimeCustomerAddressID,
      wbrk.cpdl_addr                                                                                  as OneTimeSupplierAddressID,

      /* Settlement Related Reference Document */
      wbrk.contract_type                                                                              as SettlmtReltdRefDocCat,
      wbrk.contract                                                                                   as SettlmtReltdRefDoc,

      /* Settlement Related Condition Contract */
      wbrk.contr_type                                                                                 as CndnContrType,
      cast( case wbrk.contract_type
         when '1'
           then wbrk.contract
         when '2'
           then '          '
         when '3'
           then '          '
         when '4'
           then '          '
         else '          '
      end as wlf_related_coco_num preserving type )                                                   as SettlmtReltdCndnContr,

      /* Settlement Related Trading Contract*/
      cast( case wbrk.contract_type
         when '1'
           then '          '
         when '2'
           then wbrk.contract
         when '3'
           then '          '
         when '4'
           then '          '
         else '          '
      end as wlf_related_tkonn preserving type )                                                      as SettlmtReltdTrdgContr,

      /* Settlement Related Purchasing Document*/
      cast( case wbrk.contract_type
         when '1'
           then '          '
         when '2'
           then '          '
         when '3'
           then wbrk.contract
         when '4'
           then '          '
         else '          '
      end as wlf_related_ebeln preserving type )                                                      as SettlmtReltdPurgDoc,

      /* Settlement Related Billing Document*/
      cast( case wbrk.contract_type
         when '1'
           then '          '
         when '2'
           then '          '
         when '3'
           then '          '
         when '4'
           then wbrk.contract
         else '          '
      end  as wlf_related_vbeln preserving type )                                                     as SettlmtReltdBillgDoc,

      /* Collection Data */
      wbrk.collection_type                                                                            as SettlmtDocSmmrznCat,
      wbrk.coll_status                                                                                as SettlmtMgmtDocCollSts,
      wbrk.is_collection                                                                              as SettlmtMgmtDocIsCollvDoc,
      wbrk.coll_block                                                                                 as CollSettlmtBlkgReason,

      wbrk.settle_category                                                                            as SettlmtClassificationCat,
      wbrk.settl_party                                                                                as SettlmtPartnerCat,
      wbrk.settl_status_v                                                                             as SupplierSettlmtStatus,
      wbrk.settl_status_c                                                                             as CustomerSettlmtStatus,
      wbrk.settl_doctype_v                                                                            as SupplierSettlmtDocCat,
      wbrk.settl_doctype_c                                                                            as CustomerSettlmtDocCat,
      wbrk.settl_block_v                                                                              as SupplierSettlmtBlkgReason,
      wbrk.settl_block_c                                                                              as CustomerSettlmtBlkgReason,
      cast( cast( concat( '0', wbrk.monat) as abap.numc( 3 ) ) as fins_fiscalperiod preserving type ) as FiscalPeriod,

      /* Trading Expense Data */
      wbrk.settle_doc                                                                                 as TrdgExpnSettlmtDoc,
      wbrk.doc_settled                                                                                as TrdgExpnDocSettled,
      wbrk.ref_value_ref                                                                              as TrdgExpnCurrency,

      cast( case wbrk.partner_exp_type
      when '1'
      then wbrk.partner_exp
      when '2'
      then '          '
      when ' '
      then case wbrk.lifre
         when ' '
           then '          '
           else wbrk.partner_exp
         end
      else '          '
      end   as wlf_trdg_expn_supplier preserving type )                                               as TrdgExpnSupplier,

      cast( case wbrk.partner_exp_type
      when '1'
      then '          '
      when '2'
      then wbrk.partner_exp
      when ' '
      then case wbrk.kunrg
         when ' '
           then '          '
           else wbrk.partner_exp
         end
      else '          '
      end    as wlf_trdg_expn_customer preserving type )                                              as TrdgExpnCustomer,
      wbrk.ref_value                                                                                  as TrdgExpnAmount,

      wbrk.settl_date_type                                                                            as SettlmtDateCat,
      wbrk.act_settl_date                                                                             as ActualSettlmtDate,
      wbrk.settl_date_seq_id                                                                          as SettlmtDateSequentialID,
      wbrk.settlement_date                                                                            as SettlmtDate,
      cast( wbrk.ref_settl_date as wb2_ref_settlement_date preserving type )                          as RefSettlmtDate,
      wbrk.incomp_reason                                                                              as SettlmtMgmtDocIncmpltnsRsn,
      wbrk.rfbsk_comb_sett                                                                            as CombinedSettlmtPostgSts,

      /* Intrastat */
      wbrk.intrastat_rel                                                                              as DocIntrastatRelevance,
      wbrk.intrastat_flow_d                                                                           as IntrastatDeclnGdsFlwCat,

      /* Incoterms */
      wbrk.incov                                                                                      as IncotermsVersion,
      wbrk.inco1                                                                                      as IncotermsClassification,
      wbrk.inco2                                                                                      as IncotermsTransferLocation,
      wbrk.inco2_l                                                                                    as IncotermsLocation1,
      wbrk.inco3_l                                                                                    as IncotermsLocation2,

      wbrk.process_type                                                                               as SettlmtBusProcVar,
      wbrk.use_case                                                                                   as SettlmtBusProcCat,
      wbrk.mndid                                                                                      as SEPAMandate,

      /* Units */
      wbrk.total_menge                                                                                as TotalSettlmtQuantity,
      wbrk.total_wfkme                                                                                as TotalSettlmtQuantityUnit,
      wbrk.total_ntgew                                                                                as TotalSettlmtNetWeight,
      wbrk.total_brgew                                                                                as TotalSettlmtGrossWeight,
      wbrk.total_gewei                                                                                as TotalSettlmtWeightUnit,
      wbrk.total_volum                                                                                as TotalSettlmtVolume,
      wbrk.total_voleh                                                                                as TotalSettlmtVolumeUnit,
      wbrk.total_anzpu                                                                                as TotalSettlmtPointsQty,
      wbrk.total_punei                                                                                as TotalSettlmtPointsQtyUnit,

      /* Worker related information */
      wbrk.pernr                                                                                      as PersonWorkAgreement,
      wbrk.pers_kostl                                                                                 as PersonnelCostCenter,
      wbrk.pers_kokrs                                                                                 as PersonnelControllingArea,

      wbrk.post_party                                                                                 as PostingPartnerCat,
      wbrk.settl_start_date                                                                           as SettlmtPeriodStartDate,
      cast( wbrk.act_settl_date as wb2_settlement_end_date preserving type )                          as SettlmtPeriodEndDate,
      wbrk.process_variant                                                                            as CndnContrProcVar,
      wbrk.process_category                                                                           as CndnContrProcessCategory,
      wbrk.jrnl_entr_crtn_dte_utc                                                                     as JournalEntryCreationDate,
      wbrk.jrnl_entr_crtn_tme_utc                                                                     as JournalEntryCreationTime,
      wbrk.settlmt_compn_rsn                                                                          as SettlmtCompensationReason,
      wbrk.kappl                                                                                      as ConditionApplication,
      wbrk.deviating_settl_item                                                                       as SettlmtHasDvtgCndnContrData,
      wbrk.no_text_h                                                                                  as SettlmtMgmtDocHasNoTexts,
      cast( wbrk.output_control_is_active as wlf_settlmt_mgmt_outp_cat preserving type )              as SettlmtMgmtOutpCat,
      wbrk.compn_variant                                                                              as SettlmtCompnVar,
      wbrk.rrlcg                                                                                      as SettlmtDocListType,
      cast( wbrk.vkont as vkont_gfn_kk preserving type )                                              as ContractAccount,
      wbrk.visibility_group                                                                           as ApplElmntBehaviorGrp,
      wbrk.authorization_category                                                                     as SettlmtMgmtAuthznCat,
      cast( wbrk.corr_document as wlf_settlmt_mgmt_adjmt_cat preserving type )                        as SettlmtMgmtAdjmtCat,

      /* Entity Tag */
      cast( wbrk.entity_tag as wlf_change_state )                                                     as SettlmtMgmtDocChangeState

}
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"WBRK"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/