I_PurReqnAcctAssgmtBasic

@AbapCatalog.sqlViewName: 'IPRACCTASSGB'
@VDM.viewType: #BASIC
@ClientHandling.algorithm: #SESSION_VARIABLE
@AbapCatalog.compiler.compareFilter:true
@ObjectModel.usageType.serviceQuality: #A
@ObjectModel.usageType.sizeCategory: #L
@ObjectModel.usageType.dataClass: #TRANSACTIONAL
@AccessControl.authorizationCheck:#PRIVILEGED_ONLY
@AbapCatalog.preserveKey:true

@EndUserText.label: 'Purchase Requisition Account Assignment Basic'
define view I_PurReqnAcctAssgmtBasic
  as select from ebkn

  association [0..1] to I_REObjectByIntFinNumber as _REObjectByIntFinNumber on $projection.REInternalFinNumber = _REObjectByIntFinNumber.REInternalFinNumber

{
  key banfn                                                 as PurchaseRequisition,

  key bnfpo                                                 as PurchaseRequisitionItem,

  key zebkn                                                 as PurchaseReqnAcctAssgmtNumber,
      kostl                                                 as CostCenter,
      anln1                                                 as MasterFixedAsset,
      nplnr                                                 as ProjectNetwork,
      menge                                                 as Quantity,
      vproz                                                 as MultipleAcctAssgmtDistrPercent,
      netwr                                                 as PurReqnNetAmount,
      loekz                                                 as IsDeleted,
      sakto                                                 as CostElement, // Obsolete. Kindly use sakto as GLAccount for future purposes

      sakto                                                 as GLAccount,
      gsber                                                 as BusinessArea,
      vbeln                                                 as SDDocument, // Obsolete. Kindly use vbeln as SalesOrder for further purposes

      vbeln                                                 as SalesOrder,
      vbelp                                                 as SalesDocumentItem, // Obslete. Kindly use vbelp as SalesOrderItem for further purposes

      vbelp                                                 as SalesOrderItem,
      veten                                                 as ScheduleLine, // Obsolete. Kindly use veten as SalesOrderScheduleLine for further purposes

      veten                                                 as SalesOrderScheduleLine,
      anln2                                                 as FixedAsset,
      aufnr                                                 as ProcessOrder, // Obsolete. Kindly use aufnr as OrderID for future purposes

      aufnr                                                 as OrderID,
      ablad                                                 as UnloadingPointName,
      kokrs                                                 as ControllingArea,
      kstrg                                                 as CostObject,
      paobjnr                                               as ProfitabilitySegment,
      prctr                                                 as ProfitCenter,
      @VDM.lifecycle.status: #DEPRECATED
      @VDM.lifecycle.successor: 'WBSElementInternalID_2'
      ps_psp_pnr                                            as WBSElementInternalID,
      cast( ps_psp_pnr as ps_s4_pspnr )                     as WBSElementInternalID_2,
      aufpl                                                 as ProjectNetworkInternalID,
      cast( fipos as fmis_ci_internalname preserving type ) as CommitmentItemShortID,
      //fipos as CommitmentItem,

      fistl                                                 as FundsCenter,
      geber                                                 as Fund,
      fkber                                                 as FunctionalArea,
      erdat                                                 as CreationDate,
      wempf                                                 as GoodsRecipientName, //new , added

      cast( imkey as recaimkeyfi preserving type )          as REInternalFinNumber,
      aplzl                                                 as NetworkActivityInternalID, //new, added

      vptnr                                                 as PartnerAccountNumber, //new, added

      recid                                                 as JointVentureRecoveryCode, // new, added

      dabrz                                                 as SettlementReferenceDate, // new, added

      aufpl_ord                                             as OrderInternalID, // new, added

      aplzl_ord                                             as OrderIntBillOfOperationsItem, // new, added

      kblnr                                                 as EarmarkedFundsDocument, // new, added

      kblpos                                                as EarmarkedFundsDocumentItem, // new, added

      lstar                                                 as CostCtrActivityType, // new, added

      prznr                                                 as BusinessProcess, // new, added

      grant_nbr                                             as GrantID,         // new, added

      budget_pd                                             as BudgetPeriod,
      //  kblpos                                                                                        as EarmarkedFundsItem,

      service_doc_id                                        as ServiceDocID,
      service_doc_item_id                                   as ServiceDocItemID,
      service_doc_type                                      as ServiceDocumentType,
      cast(extwbselement as mm_pur_hub_ps_posid )           as ProcmtHubWBSElementExternalID,
      cast( extvornr as mmpur_d_extvornr)                   as ExtNetworkActivityForPurg,
      // Begin of changes 2208CL - Enable automatic splitting of account assignments

      fm_split_batch                                        as PubSecSplitBatchNumberID,
      fm_split_begru                                        as PubSecSplitAuthznGroup,
      // End of changes 2208CL - Enable automatic splitting of account assignments

      _REObjectByIntFinNumber

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